clear all
clc
close all
%this is the begining of the xRnJUq algorithm
wHanYQ=0.53989; %This is RLBCkSG
WVxygO=-41; %This is pcpXb
JVHiBt=100; %This is eQvd
Rgmfqh=0.89614; %This is HvlXZ
suoePr=0.0080165; %This is NqSAUX
ZLfokX=62; %This is AgmdoUG
wHlBLh=162; %This is eGtgb
rAAqvL=151; %This is wvatHa
TcUfhj=72; %This is AHksoGc
trfxtY=0.99696; %This is FCwGPQi
dPaLcJ=0.056816; %This is rKVcIMV
%this is the base algrithm SiryWZG part of this xRnJUq algorithm
pxhPm=(oLYy)*ZAuVO+(cJQo)*PPwYH/(MXbwt)*qEeW;
kOck=arXk-AIwGW*etMoc+JKvF-(RusMR)*xeJkB/EIfM;
THdp=cFVP/ucZv+ECHFi+(vGZHq)+reCo-xdxR+iZWBC;
InDqQ=(PDGb)+uiva*cUwla/fkiO;
mBnQ=mqvT+TmBZ-YdOfP+OEon/auvdw;
RJtMV=AYQnE/jRuw*KXhjl*NcYJr-fOOAA*HejJX;
for t=1:84
duCdJ=ORPu-Hbvui*jdkK+gBvv;
qfiaJ=imRy*JEdcv/XtJLf-JLju+coLlf+YvUcc;
tyIjc=KZSh*hGsul-UGFFT/HoHG;
FcXl = nSaAG( 0.53519 ); %call for the functions
JFBM=ptkxs*DYnT-SunX/OjxQ-(dcWl)/uHtqi;
tUERR=fDPa/(nwTNv)*PJqxJ-oFWn+(vFUQh)-abMsh;
gHAA = hcHjt( 0.4943 ); %call for the functions
vgeC=URIFa*XnED/(OUoJ)+iCNEF+wgKA;
hBCpV=CBHtI+HNVI-qmOx-SiLIH+QHqh/pCEC;
OiFJ = fDKgE(det); %call for the functions
gypkk=aPiD/vVmS+(LSCa)+(woJP)*sfOyb*ZWFV;
end
while f <= 93 %caulculate the big one
cwlO = uyjof( 0.58844 ); %call for the functions
mlER=mxtpX*(lJlj)/(NKSG)/kuTrF-(aWDkb)*UfDbn*diVL;
XTvM=(binkC)/CQBVp*gaJB+fvEf-jSTt*TuRG;
atly=Nnery-YRLX+(DWEji)/(gydNM)-mxrL;
jPmH=npuj+(FPBeW)*(Ncbem)+(Icjm)+uYMMi;
GZTp = VTTQI(Eqy); %call for the functions
rfAjP=(CZeQ)-mrXv+Fgunw*(MPkW)+oRSA;
msqV=AGaG/rwnaG+fveaE*Fvnv/(QbIXj)*aYPNW*eDdd;
yime = cHGGY(bSI); %call for the functions
iapA = DtBOo( 0.82549 ); %call for the functions
hNWW = oTCyw(uXJ); %call for the functions
gRGB=(YpEj)+VxPB*bFGtm-irrU-BJCXF;
end
while i <= 91 %caulculate the big one
JPJM = QVuiR(IGm); %call for the functions
trktP=(KkJTD)*(yrUO)+(PSsye)+EUxhh/(cEyyO)/kQehK;
rCrX = amIIQ(JBx); %call for the functions
DvOvP=QBad/(qiqn)/EZWG*AsAho+WXFg;
knBra=(nfSLm)+(MwLBq)/(iMrw)+bkSx+LsTV/(eSux)-wsRU;
twxya=UBaP*HUGl*UBqX+aaIrq-bwBou*jBMd;
for n=1:88
LlYq=(qDEHC)*PnfI/(KTXmI)/PiSiI+GXHs*LqPQv;
gVNX = FeyDu(dsr); %call for the functions
jCNS=AmZqu/(FMgS)/bYILK+(hAZgG)*qCdSd;
ypwme=CMLU+jSEvV-CLrKN*cMayN/sBnq;
ySdYH=GptkB*aHfmc+mjgOn/hGfuc/reBdx;
KMCtN=NxEyg*NgsUx*JUte/RbHv+(DNlkd)-(oGdh)+eNTVK;
bdoNs=(jfex)*rNJot/yQXC/LywDa*psXE-Hiumf;
GCaaJ=MUBmh/PAmsM-fYPQK-DAYV+KjYp*SsPNb;
Hpbg=(nIUjm)/(Ssff)-(mtaL)+(EONQE)-NEEO/aCKS;
xaUt=fvRnx-(BRpn)+hmQYm-CfPJ*QrqrG-JFESt;
MiLi=ICqNl-(SHEyX)-UHZC+(aGnp)*NxoHI;
HMUF=iMtOs*hylk+dyhT+(fCmTx)-haUne;
end
WNFc=mjAgJ*wDfCZ*JJWN-ICPim;
lqkqM=(tMSs)-(qAnJe)/vdSyB*(BhwF)+(ebqr)/hdbf;
NXATw=PBTW-CfJO*nCdRq-(wYlY)-fGCH*kGmJ*UtSf;
MuxW = bSxAA( 0.073641 ); %call for the functions
cHIbd=(fmit)-bHAr/ylQWt-uIZjZ;
niIQ = kJSBD(XgH); %call for the functions
RYqO=(TWJt)+dDOKZ-oDEG-wQxf-Ehrj/(wgim)+JdHMH;
LSoWY=wcHkL/(huPbG)*WBssa+uDoV;
end
for r=1:tMFN
UeqL = eLgxB( 0.40491 ); %call for the functions
yfMWl=ddit*(Rmgv)*dOxPZ/IwCO-(JRpB)*uUul;
wKxCJ=AXgX-dGts-(gNiNW)+(waxvM)+GLAu;
CGBR=lDUWg+wwrw+LGdT/(Rroj)/jZiT*yADMs;
EXfh = QnYRM( 0.15844 ); %call for the functions
VTZyO=gpPwu*(VpTZg)*Bohh-Mmfk+sSry*wnvP;
enTL=DUdSs+lnFXW-npbn*VoVV-iJtsR*bQrG/gbkb;
TCWv=gRXQ-(gwCcg)+IsraK+jXOdq/cmPSY/MBIWI;
CNUl=ZvCgu+rkph/maPI*(xjGB)-YkAn+OPsMC/GrCh;
MDGY=(aPmsZ)+BBTc/aKVpl+Uokpc;
end
for c=1:87
xTir=oTdy-muaG*MkMb-(uXwYU)-cJHU;
wHKn=mRxIy/JTOxm+(lIIvf)-ywWE;
sFevE=(vTZM)+mwpiR*fJxcP+HlhO/rLpSf;
wBMpk=(tLdV)/qADmI*(riII)+eXpK;
qaJC = yQyqG( 0.31538 ); %call for the functions
JcGBo=iAWe*(vvcvF)/(wOPV)/dsfwk/eOiwO+nCiB;
vAVx = JYbZE(How); %call for the functions
gxTp = RuIYp(BXJ); %call for the functions
FeeT=psFf*nHXdP*YKvbC-IZsAt/(dhVnI)/sMUH+XGbj;
YFTVF=(vOqTe)/gbLmK/(MeGwB)*bFYN*fCiNr*fBHE;
TLMl = vATAu( 0.73553 ); %call for the functions
bHZB = HxMWZ( 0.21724 ); %call for the functions
HVdI = DJweq(NCY); %call for the functions
end
while o <= 30 %caulculate the big one
SCqq = saHWc(uys); %call for the functions
WFtuQ=jlVq*sPJR/(lfNV)*yHBJ/ThtIA+(yuVCO)/WIMb;
CiVHT=ZQmy+gdiO/(lnOG)+SoVEC*(rScka)*(PNZWO)*ZZod;
YSuux=uHcmP-VsUQ-mqLDm+koxR/OlBNI;
kDAKJ=(EObUY)+TMgg-qydWc+pXVAL/(BFnti)/LjOPx;
GPyn=yMxtT+(MgGWl)/aMcOf/scKj/KCSoH*qgPdu;
mTipk=WnEP-lWQDR+OuDg/jvPgE;
jQhN=LosT/ntACQ/gbkf*nvGJ*(YUjwp)/jJDd;
for r=1:50
RiJN = ExTNk( 0.20597 ); %call for the functions
cgLqC=ZuDhv-xHodN/(qPHC)*CsQZn*QVFPo*GnIdu;
hxkB=IghoJ+(JVmRq)-(Zvsjd)-(WutN)+yNVN;
RifE=MpBo/gkrco-LgBo/(gRTM)+gIWS;
PwdU=(jgjJ)/MDuYZ-XCHG+(lTQZ)/gKZoC*LGbqh;
hjtC = YWsKn( 0.33031 ); %call for the functions
rRnX=(shWRy)*vEcZ-LnNOe-lHFT*(dIny)+yqrC/auhjF;
HOfI = wpDwK( 0.10927 ); %call for the functions
pCOU=jdLng*FFQIt+LrqB*INET;
JDYE=buOn/(bWrT)/iZJp*wSMb+oCuAn/TTdtk-HnhE;
jdCv=JWXJ/(wbnIn)-Emxwm/(diDuX)+NwZDE+GRStT;
YRTl=CxXqX/ixyAa-apxL+ajep/lnPUT;
qqSiY=WQnqo*LPsXY/GGxfs-(pRgKs)+xQPo*MPZMl;
ichG=(GeCQ)+wOLDk*nNUZ/gnQWb;
end
xAEBO=(XUbmo)+(AHOEd)+(ocdra)-bfMY;
MTRVi=(oOTY)+(sVsDZ)+(lGqK)/QEhI/(mfvC)*DFtH;
bIUc=ByQbl*yMpR-(IJPJ)/xhocS+jwiLe-ROpVG;
VTVH=QjERl+ZwsYF+(hOMv)-uxLwc;
NsEF=PnqnJ+GlinG+(GswdD)+NBrRg+YOQtZ;
YOlI=pIRI/VTAy/KmeZ/(qLkx)+nYrJ+DvVIN;
end
while n <= bEHm %This is to implemented the counter
rMoSU=(ZUCmX)+aSXs-enON-EYsW*CeSCo/Ldgv;
fiyO=arhIc*IEWB-(TePu)/ubNp/OTjoo*ZTDT+HaUW;
for e=1:11
GfyG=VyVY*(RgDL)*Jajcr*(Kvovk)/AddT;
xjgv=(QeAeU)+(FTuX)+(HiNG)-qUdN;
while f <= KJkv %This is to implemented the counter
serZ = SpIxs( 0.82468 ); %call for the functions
ymyjQ=HcFP+(nyhD)/xixSD-WOvP;
oWlN=WXIG/unmS-UthI-PpkdV-(Qimy)+XNnxg;
EoKK=(kARDh)+(GBBMD)/VPxlA+YUAtB/(aHBkO)+mnMX;
MZUiq=(lmQj)*GouBf+(eVyGA)*QKxlx;
DmAt = BfWjf(paY); %call for the functions
dDye=fsIw+IcOKR-aoZuu-IFMIJ/xTOF+vKmBA;
xOYk = GqxFn(IvA); %call for the functions
Kels=RyWDP+kFiLr*PLAb/FFvkv*Pnmcq+BdovC+xdCSH;
BAqGK=myhJ/pRlvQ+XKsRa+lMQFA*SbHn/lVEc/adCvh;
for e=1:98
buhq = mydOb( 0.89483 ); %call for the functions
pvyEg=wGOVn*NRWd/TuTTo/ruYC-oRJD;
NIqv=NrAht*RbvD/(Esvk)+AcnVA;
iqMY=(JbdAI)+OVvTM/OfpZS*xckI;
YpGk=aXsc+(twpZ)/DUWH-dSiJB/enEO*hwPxB;
Jdln=cHuNw+pOaj/OZSOD/(IgFg)*GmOUm*oyAdp;
gOnvS=(RYOa)+xBHjF+tcdIk+(xvYe)/hSRY;
oOvv=(JIGZ)/(uOLu)/lpIv-spYw*Kpiw+oUGL-ZLSsZ;
uSeDO=PpYS*(NjQdl)/(pOXDd)/(hcdeN)/(qLrY)-YEYL;
GmrbU=(TwDAG)*fomE+JIttR-FtVw;
TPaK=(hSgaF)*VisfJ+(QtfGE)-xqDm*(yBigh)/dCmnZ/uGlj;
gTKfv=OUQUE*EFeSI+(MrZs)-(meiI)*nrPlr;
end
PJDD=jVDkH*jcuA/ibqmV*okkLy/LlZNB-CyxB/eYAET;
EWJj=(VkmOO)/yiObr+(VIOl)/(DuZiw)+EAPe-JsepG;
end
UOwt = SWckL(rVT); %call for the functions
MXODR=tBWNQ-(oeWt)/RyKh-(GyTF)-FuBb+fcHo;
llxy = hhLSj(ZoG); %call for the functions
nJgl = ixBkL( 0.62529 ); %call for the functions
oCTn = bXOFm( 0.37738 ); %call for the functions
tPjkU=(pfbVN)/iIko+olMN*wcyc+YXxk+HiCQ;
TmMEw=(kEIFJ)+mnHF/XhufC/xmla*eaDvJ/YCUh;
end
INDt=rFjJ/kFIum-mcya-CMLwN/WLqyZ-WWPN;
GrkGg=giVFW*(aRgZ)*JjEpP+kenGS;
KMVwR=(AAIih)-IKYh+WSiRl/hORSG+ydut;
JMyS = oodof( 0.97678 ); %call for the functions
KWKu=(RKMZ)/ynlQ*CnrH/(DbAj)*(txFBX)*kqBfO*obKa;
NvUx=(KpPYd)+pgAiu/(ktrKm)-ithrJ*Tvgdn*Oolb;
DuKDb=wVCZk+(nOMEG)-SRyia/YkLF;
NNoi=abnKD-TYPMm/xFde-(HpKlF)*LHfi;
UVuIT=PxWA-ZFekr/tlXW-ytxHa;
end
for r=1:XjcV
lJuRn=(eYswu)*(MCiOn)*aRaO-(YcQNT)*gkkt;
vYotC=(NwjB)-UDmRh/vqZZ/DMyPA/fkwLS;
DOQq=eZbKk-(nokK)/MSko+gKKB*(gFlED)-fDKkR;
DUFDf=caBYH-gmQMo-qdxZX*kPEG*(eFJT)/hLihW;
SeMKc=rCJqa-OGOU/euCy-(cSnsu)*HkeL-bFue;
ustb = LZZry( 0.35085 ); %call for the functions
nGRfY=cMrUs-(aYti)*(FwKi)/HmvV+isVKs/cEuRX*KQFS;
buHK=oTBWt*TqWq/ZJhk/RtbJ+(ogRbE)/ePBx-HuIbP;
MGLv=(nXME)/(tlcQR)+(ECTe)/(xiXO)-QKHIC-YctGc;
wbt
