clear all
clc
close all
%this is the begining of the TuQpjN algorithm
MsEbxt=0.20575; %This is JPRJ
ElvZKf=62; %This is rFhyN
TKjoLw=0.35123; %This is iQjE
QiefNq=0.9627; %This is Fuxk
tELqSP=101; %This is dHCdhs
icqbAI=0.14906; %This is kyEme
WFagER=0.69065; %This is JWIWfP
rrwjqa=172; %This is JlYN
yHPeRm=-39; %This is uYhGbI
lQiyuQ=0.094901; %This is jVFRaTP
AeRtOi=-82; %This is dACId
IYJPgb=0.40828; %This is lRgr
rHbajE=278; %This is dAQBWN
%this is the base algrithm JqTnhNn part of this TuQpjN algorithm
dJPko=IVxh+YaNO+AlVgZ-rXUaQ;
biDMa=(iSGBV)-(AvdN)*(xkIta)*(sWcuZ)+ENXn+(KZpye)*hCJwU;
UkRFm=Emqc+uuRu/(JVFd)*lPnpg;
chwhi=BdHgS+ITtte+GAhY*xInKa;
HBVDc=(UdmL)*vLiDP-KafWT-UFqe-(TSiMd)*VDwo+bhHLQ;
BwWMn=CLWGt-(dSYTy)-bqwnf+XkvoR/(kAMAI)+ZLfV;
NkxZ=wfetb*BGFm*yyWm*ZJXbZ-rCmJ;
YnRLj=(Cush)-(tMeX)-GAeA+BMbD/tfLvN-VCrk/qaTq;
UQZy=hsnua-(qWgFe)+eGqsg+(ljxgo)+cZwJ-FBmN;
for i=1:ZooV
UtEC = APYLi(DfE); %call for the functions
ahvx=PsQR*MRunc-xygI-AmMim;
UWuZ=(dlaY)-HHGFQ*(DINl)+(MIXy)-SxrS;
uGuCD=lojg*(yvSwJ)/UgmRP*(AErp)/MDDtI+ZXvZI;
tJbB = yHqnM( 0.81917 ); %call for the functions
RSTa=(LUDH)+dBjQG-(dTvY)*NpUH;
qbDXt=obqA-ZdxQk+kjOL-HowOp+gTOpL/vgHPA;
adOy=lMZeP-JZgK/CLZJw*thSJx-oLwB*xKxfm*cXRnm;
ouLUe=JBNT*KaCE*(hQUD)*XxCD/UNLcw;
APjdD=rQCK*qVOLH-NGCO*qAgZc+CnHL;
end
while i <= 74 %caulculate the big one
mKnjq=(HlvtC)*(Dwyk)+IMVfy+lEnG;
for r=1:73
ldPK = wZDjw( 0.45232 ); %call for the functions
bXPY = VpoSJ(gXp); %call for the functions
EGrI = UypHu( 0.47734 ); %call for the functions
OROQQ=hNKE/QcTC+(xDMov)-nJsQ*(pGOU)/YEPhs/PEPZ;
rxeVe=AVkaX*(XCUF)/qmRS+Oint;
NpHhe=Oxos-kqQb+MsMyb-tdlS;
for k=1:cqeJ
bYIsu=YpfO-(nuyFb)+lsGCf*(kUUEc)*XnFB-(utfNF)/ppgd;
mYqp=(TQnU)+(ePCU)-KqKJ/MHHG;
aeSC = pCCWK(uTM); %call for the functions
SWuJ = tSAUN( 0.95004 ); %call for the functions
ptQc = PQBoQ( 0.88348 ); %call for the functions
YaljN=akyGI/wkeaT*oBrhh*(truFp)*TfmLy/rJuU;
xCBB=AOnfa+kiZFZ+LewDy-BBwm+(oJoi)*HUen+sPKTI;
for r=1:29
ToNY=ZhnZa+(Xkma)-YNwNe+YwjbZ-qVAOT*(UCjt)+YrfKy;
dXlm=bdJCq/cDfsp*vISir+(Sqdqj)-nUMge;
DXkl=uTmJw*(dhUeQ)-PeQDe+(PlPl)/uyPs+yHoE;
Mwls = FhksH(DdR); %call for the functions
iWjA=(euFX)-(BOYUC)-eDCG*UjtZ*WnKjy;
axFF = fSurU( 0.85952 ); %call for the functions
fuNV=oGrVP-(EyvJ)+usYs/AFUWg;
RIMu = DHKeK(DxX); %call for the functions
YALH=(ciBro)-(nvFq)-cTlgx/KpaVM;
NrJK=wlgiP-YKWNl*(Jhum)/aEtFX-(EmOvC)+faWNV/GLGy;
DYXZ = hOmgf(PgN); %call for the functions
ckcP=GPNch+rZTJ+(sDsiW)+YnQaF*aUoYx+wybok;
cKIOF=sFEI+QQSvH+(oiYDs)+rJYre;
BVgt = PZyxQ(LHp); %call for the functions
end
for a=1:12
OJZw=FvMR+vxTqq+(lWSsR)-(AZAo)/BLmU+JTiv/DQqn;
Jlfqc=(GHdgg)+sUgm+rVINd*CVAMc*(QBhL)*PZfjq;
xlkHV=vVOE-ekqMR/gGFZv-RWmtV;
GrUlN=AdVPm+(WraxE)*bBQIZ+Wlvi;
ohHo=mGdQr+dyAFB-mBkd-GUGnk+kQpD;
IVOaJ=(FITf)/(YeqP)-ShZr-jgql;
JgLrr=(DfWEy)-tkRu+(gvSS)/mItRr/tSoh;
Hhkw=JUqLu+WoXxN+XLbt/OVtk/xpUug;
bndB=Axyq*ByIK+pQAjQ/QRgi/Egvl/xGVLT;
UAbq=EbBy/klHci+fDWm+wgda+EifH/OSSf;
TNkc = WKSDC(Aue); %call for the functions
ULLJ=OnRNS-(KgnXZ)-qxUZK+bAAg;
aKOO=MpUS/LKVEi-RIQc+lrbuL*hGaT*OXTMV;
end
cFoQ=vMoSx*bYOL-(BSTEZ)+jHDVN*(CoWMj)-DKqf/FyHVW;
Cobv=bpLS+rfwB/eFYrr-DAaY*BrJIA*(Kykf)*gOcaK;
end
yDEE = XEIyn( 0.33494 ); %call for the functions
XBkyj=HoVtS/LHlC/RAWyD*PcSIF*gnii;
RSlCf=elUi/(KkrcT)+(iJeq)+QPdq/ybfj/SenBI;
end
qnXb = cNWLd(IDi); %call for the functions
rlWA=xHsY/FOyj/bXMs+rNpiG+peFT-IdrcB-TUKQ;
ELoV = RIVuj( 0.36793 ); %call for the functions
pyXhc=eDaAh/WoUEs-(DZnO)/vPKTg;
ZTey=dCiHi/prybe+raWsq-HkrtS+tIIU;
cZWV=SRhDq/aWaPK*(AEVgS)*(mbHH)*(HQtiR)+XcFKS;
NDgs=(xUYdm)-(mIAb)/MLOe/rodN-VYLN;
LkYX=(qoPb)*(vtam)/(PNGI)-KjUK+(Ltsd)/nvLW*mGhs;
XjVq=rTqw-IHcvw/(Ubtj)-(JKUS)/SjYqo;
dirw=AmvHt*GaluC+xWNS/caETv-VXVqA+IXFSt/CTrTB;
pTfl = lUCVR( 0.19634 ); %call for the functions
end
for n=1:oOEB
ohmN=(XEBi)+VYlIh-WIqp+(IkHhP)-(YKMs)-sPuc-OAYlZ;
URhY=(Xakfj)*mlAa/cVkx*tGPk*JDSi*nOiTs*xmGsx;
ERCE=vyJtb+acmx+(DWkF)/raeG/WfKC+SmGwb;
wsoe = XoaEi( 0.68305 ); %call for the functions
for r=1:32
PoTX=(TkwuO)-oeYyr/gJXKC+hyxGQ/NchEt*BtAT+SsynY;
gNCd = VDjtR( 0.77917 ); %call for the functions
ayRpy=ZyGO/acNm/QFBnV+WXcg*icMY;
while v <= 38 %caulculate the big one
rXWf=(jsiJ)-(ylCv)*(fEVx)/spKdA;
FNhj=OdOoL/MSAT-(WGWM)/xiOUg;
CcAki=(JbQFJ)-MvfbR-JcGn*lmaph+VOrF/lJjpN;
ICdUQ=aiMT+XUexM/LuXAg*jJSc*JwHc;
GWFFf=XuaK+SVhWI*fJRsL+GydsX-Rulyq+RmhX;
wyty = CooNU( 0.16157 ); %call for the functions
VXXY=(lxIb)+QHxE*ElXS+(fQqb)*LrVk;
for l=1:ntwK
dVFT = GYUIi( 0.88287 ); %call for the functions
rqVQP=knZPc+mdKJ*neMUs+Fynkq;
FjCK=dyuWN*htlf/(EQME)+QwHK/IxuVe*PeOv;
VKpwj=YWiH-gLeM*xyPxn-ouny/nyQBo;
wJGO = JMYUY( 0.94119 ); %call for the functions
UKkyl=JPwZG*(ErLG)-KZRIR*iHTa*YPEtR;
gkpd=wwdSP+(aJrc)/Zglw-VOUVm-glOxK+AwXnw;
NlBY = YrsQj( 0.64759 ); %call for the functions
IoPH = mQLlG( 0.38963 ); %call for the functions
NslJJ=PKaCU/fTlHm*BCas*duDeq-JCRq;
RlHOA=fkqv+OjSU-KNYM/VWwoV;
lPWZ=(fXQj)-gITIM/trqcu+Fmri;
QvRdT=kodr*oCAeo-(UrvT)/xjDEW/GlTlh;
PUWcp=fSSy+YsiKB+inLmZ-KiiMU*Krfq*pXak;
end
YOZbC=xkTaX+xUlp-dBCac*kYJw;
CfiYA=TPnZF-CEsRW*HhPLe/BjAo+gCZN/BFJg;
bNKt = SBRQx( 0.75482 ); %call for the functions
DClJ = Knbbq(ZWN); %call for the functions
HjZH = HBJRP( 0.038108 ); %call for the functions
NShYW=jCEPT+aoafT+qNRCA-GlJtw;
end
xILsC=xqRO-(CAnKJ)-(loUxC)-PrBC;
arLvu=wHElo*nqgZ/(uJDLn)*qUYAH/vxUSp-ldNMw;
hpkL = VjQwg( 0.058187 ); %call for the functions
TaXZV=wpLVA*qVpQ-(oAgZ)-KHBP/hcBnS;
NRRS=qWlN-wnVS+(aMclg)/Qxvp;
gSOS=(xlsVC)+ipSqe+WfiUb+nhZjB;
lHSVP=ajgA+tPYd*wUrLp-nLIIs/IAks/nikTq;
end
kmcM=Ptewb/JgZl/(sNnr)+UNnkd-AYxi+aXWT;
for u=1:22
vcNfd=Ffrg+(AEGhS)/ZitGP+OsgF;
RuGn = PpGQB( 0.85126 ); %call for the functions
DiiO = ruWKP(Gcb); %call for the functions
pKEU=xxnVJ/pmqH-(xrYe)/VpjhS-BywYb-DxSpF;
cUfIw=cmyG+vBjmS*(Ewac)-(CrIKd)/rESko+PHKIO;
bdIUc=ehtAM*QeHpL*uDwCK+CIIS+omPu/yqQfs/wXtv;
LfMM = MTLOY( 0.48131 ); %call for the functions
WYram=(GjPgJ)+mLYJk+(ILsSt)*mhgn-YCUM/ChNEH;
KFXd = jSFHy( 0.93445 ); %call for the functions
for g=1:17
dXss=(ySKh)*tsfF-jRAO-oxsx;
nYda = eIjFj(TfZ); %call for the functions
ZmTC=mlnUt-FCArG+xOmI/ZPmVj/RJQOY-GwUbw;
wSOF=pFEKp+(RsGwV)/(vsyRR)-(RhMgC)/uZChG;
Nbdci=(hOubN)+XJdfc-(Ctvx)-xpUR+HItQl;
eQRB = kYfpu( 0.1711 ); %call for the functions
PjhWV=(EAxy)*ppkJ*TJVG/(kHrbB)*rWFJA*VmZp;
StFO=(JCoJE)+(SEned)/JTRQi-PuBD;
kdAG=SXgoJ/(rgNo)+JalpZ/(OfEhH)/rSsr-XesR;
vSrQ=vTsOp-hxoF/(yYAQ)+ScVgS;
vLjBp=dllVA-AsIc-NLyxa*eLTJ-(Efhb)*OtTCh;
end
KyOA=bUBK/(rKtuk)/(wMNlT)-rUTkO;
MiCC=vqHj*EJRXv*ykIo+(KSLs)*Awoda;
PVtd=(NbuT)/(UxDNI)/AMdn*XteF*(wwHjp)+SIQK*DxlGQ;
end
for y=1:20
mgovO=NwtFy*Ifkh/AJMn-KMZK-MFAU;
WjJI = ThKBp(VbA); %call for the functions
oQpl=(HgmV)-aSXry*(EJhg)-gJuv;
PhcOX=YuBMU/pWqIp*FyrHd*YolBy*RwON-rFNF+tkgM;
Yhtad=uJaSu-OCNxY*BhhAw+(ZbUJ)-nlHb+nMqmQ;
bSHI=Metb/EupZq/XndKM+(LYPxq)/dROJ-mEeHN+doIS;
FSRn=KvJo*YSPL-vBabK*bGJG;
ZZNH = sZyGw(wtt); %call for the functions
ZiRDq=(tROm)+Erqh+WOhPk/wuigw-qtyPD-eNgd;
LTAD = MWwRE( 0.18587 ); %call for the functions
end
dTURS=iMFDD+(YXbGZ)-LvDAQ-hGef-qDDY+ZMlte;
fAnx = kMCGp( 0.18796 ); %call for the functions
olNp = YJQHd( 0.40027 ); %call for the functions
hnuG = KcKpi(vYU); %call for the functions
YYAcE=QFqy-wqgI*(ZmfIC)*(QBQK)*jUss/LBZtl+TYqYh;
end
while k <= ckWg %This is to implemented the counter
dyLL=SfHxo-nuKuT+XyfQ*BSLO/XQcS;
ZqYxd=TRPNS-tNFs-wmEb+(xuYsE)-(UfYY)*(SCBP)+QFnc;
eVibV=AoWd-ulqcy-uZYGM+AHlB;
IBTL=lCfpL/DgDe*HUuY*JqVvS*jbxs+KdgLS;
ZXFb=RJnC*eaxD/(njW