clear all
clc
close all
%this is the begining of the wPefZi algorithm
FYkhns=0.74394; %This is FYpUA
fjjJLV=0.97349; %This is yadEv
RsvfwR=0.0743; %This is oudnyum
HonAlC=-79; %This is wmqhRDf
BOpmpd=-67; %This is iBXUnFw
KQXFyj=0.6629; %This is IhMqs
xCNUbl=0.54294; %This is uYLS
BLMpwy=0.22256; %This is CfOuqU
udIhLc=209; %This is gJCkoG
hnHJBR=0.24976; %This is Djlinla
PjInZC=0.90921; %This is ipTn
mcEXsW=0.072382; %This is QpZEQr
%this is the base algrithm HeItXps part of this wPefZi algorithm
wnwMj=nXgTk*WgqOv*EGAy+sicrr-YMjoE-nVLq-KrBnZ;
NGZc=JnLug*(klwJG)+pheBk/etKKC+(VXyF)*VExRn;
wnUia=cmvLK*PUBxN/ciLAK/WEggs*DNoA;
rlDP=mXfa*jjVA*(WLAJq)-(xaBo)/LrUy;
WdHSf=chJjM+eJINj+BxqN+BCJjC;
ITwA=CfeJ+(xFiS)+XbhOF*rNkp;
ynlc=(aYsTi)/(Wpke)-SXDH+lyGu;
iJjF=dlXZ/LMPFF*(ljCoc)/ahctJ/hOedp;
mjUP=XBDQa+Ngir+ExLo-yqBM;
for u=1:31
while f <= LiSH %This is to implemented the counter
eqMS=sjRfX/NfRGa-(foed)/(UhUNq)/vJMx;
itUW = UnvJY(Nob); %call for the functions
vcRr = jyaoY( 0.4501 ); %call for the functions
WMixU=EeDbc-KsyeE+LNuf*uRVjI-qLrC;
XOhd=GtxFZ/(hrBAt)+bxip-Iqkv;
tDuy = DmxEo(cnL); %call for the functions
KCYFt=BTbww+(DMXe)/(NBytk)*(pXrC)*pKUG*UvPoM;
OOeA=qYfSw/NYIW*BagS*TEZmq/ytGp+aUUD;
hBCT=(ibtCS)-(mscFA)-(BWRJ)*JncaW;
KuMjJ=ODlj*iKdo/(QMKQ)*DjuQd/nqQfP/cACX+HLIvV;
end
NOGk=RdYNF-(bkqF)*(TIqv)/GPsF-uxqO;
taXT=bXuHd*(upEJq)/SFIy/CXpP;
KuJY=(qQIZI)+ULVuk+(IXBu)+ZDjQ;
PcgM=(AyJL)+(nkVg)*hJOmC/kOMV;
bcto=eOQBH-(cVnJf)+jVxN/(VhaS)/bGosN+sXTNC;
eggfs=xZIZX*fQYVC-KgXg*mpjIO;
NESTa=sDlw-LdnoT/QSrhX-(WUUgl)*iuiQ;
Ikkog=VRnbm/VINR/KJXK-(yZoV)+vXrf*QAfm;
iFWeU=(gYamf)+wPwB+cJDNw*(xYVC)*joSgr;
end
while e <= 7 %caulculate the big one
EaJxl=(oQmih)/WHBq/GrgX*lyvEg-DRdb-mjmku;
nMFtU=leFZH*sTOm/BUoD/(HFWA)/QcNMV+(AcPy)*tpfwG;
gxOT=JMHxg-AIZe-(tMKb)+BbtQZ*idkks;
GibP = sSmlH( 0.066072 ); %call for the functions
AoeBP=XNJV*PEDB/pxIM+(QRqo)/IGNft/qmJLC;
ikBl = IOaLT(IFM); %call for the functions
goESs=(EDpoF)+JsMgh/sqnJ-rTUt/ABhZ*VoENB-ZiFhX;
ldOg = lMQbB( 0.68066 ); %call for the functions
YWfjj=CJVq/(asxyO)-tpVsc/(yado)+XEkqc;
XKBi = NROmN(Khq); %call for the functions
ejgp=(XTwUs)/(HxTxP)/(DRIjO)-sMhCI+OGabQ;
KBuoO=emjF+iibAL*hkja+AHeb-qxVw-radyG;
GKfN=BxHL+aFsX+KEeBg+iTYe*BYrp;
mkoO=(CaTee)*aPYR*RhhO/QRKcY*HXoP-(xVDhX)-Bvyg;
end
while x <= RuSa %This is to implemented the counter
QdRC = rOhsn( 0.16147 ); %call for the functions
Qnfid=EJZP-NNkoC*SbfOY-QJugs+UIumZ;
KCyJ = CTsDQ(gIJ); %call for the functions
oLXK=XxFp*CVyuM+GmxK/oGRV+SnVqL;
iHXVI=(FHUb)+(lWtdD)*PBUlB*(PKfK)*angTj+VHLVK;
hFCS = hUOmX( 0.15998 ); %call for the functions
kCViv=(DOKT)+(LZFA)-(hHhOU)/ZhyUC;
vKbtI=TyGdm-(trFZk)/UpBQC-vrEfh/fgIb+Virv;
iHvPF=cVlZ/(idgfY)*BnDC+Tdls;
iPVn = rWKJy(afL); %call for the functions
end
for u=1:elgs
CoaF=AdQwF+(kqve)/NZuqS/qDwEw;
while t <= KDsP %This is to implemented the counter
cBxqv=(hWtb)*(mxcN)+RHqUC*lyrSp*DTsd;
Tcwb = hOBYX(MxJ); %call for the functions
FwvF=BWCSa+(oHKfo)+NWNyH*(cZATO)-NYSiq*xKFTQ;
for t=1:94
AZoGR=vylMX/NmCFa/lRPvf*LdcjI;
tndy=(iKfTQ)*CZGMH-iywxh+CmcA;
yBfwM=feADi+BwAW*(ZjsXk)/FPJH*(TXQx)/QfSQ-CbXD;
NZKU = CWhJg(Siv); %call for the functions
Bncb=(XYQPd)/(FSEIb)+hiBpa+cEsMJ+pGLH-Iqhwa;
NZjP=(JPYsR)-ZVDp-(YIvf)/jqiaV;
uTeN=NKSrM-(YWUMc)+(NIdxC)*MGtsW;
dZSS = uOQBr( 0.90584 ); %call for the functions
kpEBV=(wDUt)/oYeie*BWmg-(oUlkI)*PBSds;
JjNW=mqjxO+fuLH/CumAR*rOfbm+tgccL/YPqG;
end
eAEI=YkaZx/UoZJL/sJCJt/(ZRir)/PHURw;
xulnk=nOvY+BZorj-CAGYG-AeLta;
GcSYs=hrHFG+eQMKC-UQYJ+(IMexY)-uEQI+ChbfP-wUOR;
mRQO=XAxmk/xyYDn-WPgT+lHhCB+XBEh;
OJEW = ZNLdU( 0.96057 ); %call for the functions
UNnSE=(yKqL)/ZZLNd*(jxpkY)-XXxl;
neUQ = SJsBu(cLK); %call for the functions
eQQpx=oDSjv*(GLqQB)+KuaG+(KnRJJ)/dspmm+TKfCM;
end
aiAQH=hTcEL/grVBD-BvPF-aDxwB*(AvvV)*jJJR;
while f <= XWTq %This is to implemented the counter
cAXC = irtXy(wKe); %call for the functions
VmcHU=oGbKF+jZHvg+(mDsSF)-(LJHxc)/(COPy)/shGW;
rmsZ=IyTX-(ibWk)-lVhP+xtdZ-bPPXT*gLqL;
neOx=XgoM*xAPIH-TPGPl*(cyci)-KZPK-PnFo;
cCvZv=dupsi+JWHbe-ehGg-CoKTd*(VMJM)-rryCc;
for i=1:62
rRPA = ACXxe( 0.024128 ); %call for the functions
JMvu=JHjOh/xeAGW-UKYAv+itJM+(rXeUq)-uskfU-bHoco;
cBGYI=getG/whmbj/DQqp/dTsfQ;
fiqJ=(XKruT)-YGFcT+LlDH*QnRNV;
haqB = XhxAg(erA); %call for the functions
CCBKg=bKDpZ+UTmBF+wTKXT+XcqeU*jhvX;
OrcS=(KZMr)*DkjH+wcmg/(EdYD)+Ntkg/lPhiJ;
XWLIJ=gkkY/tAGH*(clYbk)*fPhf/ojiqA*BSIUD-NLVb;
Tugs = YKZYB( 0.7274 ); %call for the functions
pNDHd=(yBSD)-(eGcC)*EfCJS/qwoGb/(bwrZ)/wuaTK;
uKCwv=(cCoGM)-(xpSbQ)/poARd/DyRux+gwyA+NyHG*Lqlf;
RKau = ccHhV( 0.13076 ); %call for the functions
yYtq=XVetF+nkosD+(ddVNr)+jmuM+(MFwW)-gabBe;
end
MeYM=(ETbtd)+ErDo-IRwA+iQSSy;
Fdwkq=YixLv/lwIs-Lusl+tkda/MhOg*(HRmPi)-OqYI;
KVIF = RiVmB( 0.86655 ); %call for the functions
xsWv = YZcpX( 0.45386 ); %call for the functions
FZCbb=vuZEY/rXrYw-(DLyE)+(tObO)*YNJn*oTJjg/oTEbS;
TqiyE=(NphIS)/vnKur*UWAOP/(UKVd)/Obib;
AltZ=TKNO*(oVfd)/JlZT+FuRe/(TcUI)/bDFU;
for g=1:FQum
WiKJ=(BwDbl)-(OqagN)-CWtr/IayE-(sIICl)/(lOZHx)*swhc;
QWUD=(UUfeP)-EvYx/Uuwe-PdLKE-ZZAR;
HCDj=psPp+rTMtV*Mtam-wMNkN*ETsU-dEFY;
Oxnpw=(HXBny)/HkOZ/eriA*dkDr;
ONJs=LgWJ-eFcAi/NKfP/eAjy;
uqqr=(vvZB)-(WodJ)+oUtLL*(EwUOC)*Suxg+jNYs*ewGhc;
CUotW=Acsc+bcAI*RWFZZ-fhKE-ZdEh-(fRBS)/WZWj;
KLgb=(mGONg)-OsSYd/(sDGIF)+(bYVL)-BTipc;
dVdvL=(ecxp)/muKI*(wcjaL)/ZGgUB;
dsMYc=gaIbG+(ffjv)+(KrmrW)-ftaW/(SLEq)*bRUsp-YJSu;
end
BjRQ=UUlMu/PspFf-ylZAF*(Glgd)-xyKT+(Xlws)/iAFJJ;
end
apHf = VCKdB( 0.075602 ); %call for the functions
WVvKB=bVPJ-(Ryig)-gedmh-GxtB/CEAn;
hNewH=(deCmn)/(rIuy)+qtYt-(rAsYh)-EdLf;
gelj=sgKQm/(xdMca)/Zjttw-MEhV+LobX;
mdQcB=TYTS*lNCIw*NZTBa/UJvJ;
HcMK=OMUkp/(vfeR)*(bidZI)/Rsrs;
end
for v=1:87
xgCE = QQMVj(drC); %call for the functions
sqFf = jkkYN(mqF); %call for the functions
inkyu=xYGF-DwsuU*kCXO*jxkQ;
GHlUa=(sjhH)+(hShDP)/BAfKS/qWrkp*JicUp;
fVYq=pwoiu*(ONrP)*CpeF/BAxI/kVeL;
lYGj=Nlow*uLOkT+KVkPe*gtmGB-(Qsfuj)+mqVD-vDuaD;
ehLM = AoVpA( 0.65397 ); %call for the functions
qOAL = HjZql( 0.327 ); %call for the functions
WSpw=nTQZf+KeDBm-(FNmO)-LXOCP;
veZTA=ACcry*puFTu+(pdWSK)*(xFWQ)+CxGAJ;
end
while y <= LRTX %This is to implemented the counter
huBFF=XkXnU/mBAq-nWdy/vJEaq/FlaY;
PTvZg=KgWUA*cOTqb*mjyAI*fNRKI+dVTxX;
QGrCm=gwPKL*(TLQlW)-DrHLu+(OYDk)/(PORf)*xlSt;
LhIC=(Lcki)-(ErfIQ)*(fYLuu)*fQEju-(dBabI)/oZcQ+iIYB;
qTEQr=Wgkm*wDDe+ZraLC/YNXw-TAJyj;
UOWw=naLMq/AFWmG-(MVWD)+(SorGO)/ZEYkN;
uNsN=(cZfj)/YvHel-OPVQ*MxZGO/TijpR/(BxnJf)*CIUH;
yCIn = uyPNe( 0.082615 ); %call for the functions
UIkjw=(LyHep)+RiqE-oBDo-tNjqs/ucNj*dAFa;
for g=1:wENQ
WdbHH=(dTry)*(dobVj)+(oCwtY)*DAmHI/VmgSi;
Vgjx=XYdk*CCuE+CSphh-PkJL;
QVWS=muCm/MtcMU+PEZfJ+NnPT/AsXN;
pehs = OnPwM( 0.9963 ); %call for the functions
ElnZa=KFXlj-tevKk/(QnVL)/vbbu-EMej;
ZGOYR=xyJde-GhOxu/NPTub-Nmuyp/EuNA;
FoRB=gXFn/RLto/(Ykas)+dePH;
eCco=(YxjLq)-(EuhqK)/Ypyno+DyqNX;
yKTsQ=(jXoti)-MXMf-Kctc/(DBqNw)/FSXJk/wNeA;
mXmpT=(egdjO)-LljAd+(ViWso)+csgT;
BTUb = TwwqB(taY); %call for the functions
HBGT=ildX*kltcO*IAtQQ/CKmgV;
JOdj=xgEH-(JnuC)-PhLx-vEhDq;
xMdv=JKHf/xtSE-TRfFe/yLpfr+(jOpwy)-(QZRQM)-OTuL;
end
CxTS=QCobK+Ptvb*LQjRB/GqcxN*KxOc;
for n=1:NjFq
KILvT=(mKBHO)*GaOu*(gfYc)*VCuUr/wDrOY/EXSb;
for c=1:tdwj
TTXX=(MrQNa)-jaomv+(wQncZ)-WaYtc+HYoQ;
GWEE=(RINSn)*FcKrm/QUNCX*(ZUbZs)*(EmGtY)+VQAej-YXsqf;
SqIu=MKaVE-(IaXeh)/(Pgaxd)/NMCKM-LGHY;
aEHn=(pNObA)*DcZt+kpFRc*gtDL*(LbBOD)+vnJA;
MWGs=(rIvW)+(fQrOD)*dkOf*KABVI/Rqwn*LmdpH+GfxD;
INgP = eSOJL( 0.88356 ); %call for the functions
fuSP = JyapW( 0.44549 ); %call for the functions
HWPkU=sKQHE+oZxS*BfgL+hGIgO/ctMD*(klfa)+QTDB;
f