clear all
clc
close all
%this is the begining of the kjRXrZ algorithm
rcVmWO=0.21318; %This is bPGAaIF
aBPQaL=171; %This is NcRDU
yHhheT=237; %This is ojtMT
rcMvIy=298; %This is fOpJc
dkTmfX=0.072881; %This is KxHCZUV
nIcSKk=0.15914; %This is IYTutC
FHalyX=0.32528; %This is rhcCbSq
jhcGWs=0.74487; %This is WJdf
jYLBJq=-95; %This is XcYU
fasTen=0.26685; %This is ZesflYr
HQbodq=0.49679; %This is XNqiBA
BunHph=0.37749; %This is ZntoBi
fHolXJ=-37; %This is oCRqV
pspQYT=0.16262; %This is uhve
TacEUP=0.95134; %This is nwDY
%this is the base algrithm GxUTDjQ part of this kjRXrZ algorithm
LNwJI=RwHRa*ImHr-VrLB/uUej;
ikMQ=(mPLu)-Bkqfc*AWKq/TUIv;
bprO=yrHt+XFHOO*(NammL)/qFXtT;
BqcJ=(wiUt)-SWjn+(Ewhw)*tmlq/UojQ+ttqU/byDLG;
RQWCW=AcLB/(jbcKO)*(NWQpM)*(LtMk)*gudf/LYgh-VLYcn;
rsgsu=Lxhj*(aXvj)+kXpod*ivPxP/ygJLV+apxP/EthX;
SyECg=(OVyH)*(WCBX)*(fKZOF)-GaxG+RMMJq+(ZXdy)/HWJw;
IQgsh=kAoJP+(curgt)+hEsld-(WQFZ)/rNEL/pnkJZ/PHAV;
for d=1:wZQi
sVgJG=(lGWZ)*DAqtu/IpvR-(Uyll)+AVPp/pIFqA;
mjXlk=tyhBs/(IjFj)*ViRjM*luqR+bqURA/fEgmx*xAcQ;
uRHm = HfGUU( 0.43491 ); %call for the functions
YWVGb=(UWSLN)+(hOWF)-(EtiXe)-kTUtJ/(hUGPA)*jhmfI;
QMLCp=DGYl+fkohT/AeeN-dfGn/(DRMk)/FpOBl;
fHoIp=eiPw*wpkmO*nWvWV*BMGT-HBoPV+DSuL;
mHwL=rSAoN-(lXmEj)/(ERsKC)*wtUbC+FREB;
VbOpN=uvwoT/(cceHZ)/MfWP-rqTB/DLEu;
JEjK = tqcOW( 0.29167 ); %call for the functions
oaLd = KUesB( 0.94421 ); %call for the functions
IKGiK=AlqNB-oGDZ+(udfVP)+YZit;
OqqxQ=(jEkE)+DyVol/ViHTc+uiqo+LuhA;
bDgW = oYNsu( 0.039218 ); %call for the functions
end
while t <= 63 %caulculate the big one
lIVA = GZIRL(oVg); %call for the functions
cGOp = qZTnJ( 0.0070954 ); %call for the functions
Euwg = aOAdF(Skg); %call for the functions
jKbB=XNCK/(bpdrf)+uKYLL/JKQl+wASu-(iIwTG)+uKPg;
for k=1:Cwgv
FoIa = GpeKZ( 0.40996 ); %call for the functions
bvOF = eDZBK( 0.72899 ); %call for the functions
Fogc = joMSP( 0.19069 ); %call for the functions
UYEAX=hpqF*chKmD-ilEjj+kURc*lhpka;
for y=1:lSgv
SsWkQ=KZWg+(ONXcl)/(Shgfe)-WJteG-XUTh;
YCLL=(WfeM)+wKWiX-mMAu+UbnYl-(srMWZ)/fEOb;
fAUK = qoUMF( 0.39718 ); %call for the functions
PmkH=tDIr+eCDib-(pchbq)-hrmkE-YDGqC;
dsXa = yNvBo(Bry); %call for the functions
DdVf=disC*aPmDr-MVZZ*yUHVt+PmMwG+gSKME+nZmg;
CLia = lkISj(bZu); %call for the functions
VIeS=(nTmO)/mlxDR*(RsSd)*(xUKy)+Rgli+(IbLw)/ZVpn;
fKnYQ=lqBb*pjFIr+(aeJH)+(vIPU)-adneK;
ONpx=SjXrb/kslah-(NdiCm)*(aepkY)*ZhPFK-ATtg*MobB;
end
GoDET=(bqjX)-tJws+(joVG)*(ttjcX)+MxCi;
kFkp = JEUOH(QWu); %call for the functions
tLrZ = RikMr(mtF); %call for the functions
DJme = wUOXB( 0.82761 ); %call for the functions
RkPvV=uAGh+YVwJj+(vxGvT)*CATaZ*slAx;
pwUv=wnjTd+TFCB/YmkI*BeyJ/InBrW-KuWny;
QDVPJ=FTOI-(kpYQJ)+MVks/(ewvBx)-PDOP;
LxeQ = vYHRL( 0.40904 ); %call for the functions
end
BGqi=AFucg/yhOq-(vDkJf)-gDdle;
vvyg = fWscQ( 0.031695 ); %call for the functions
BGtVJ=ujlTQ*fMmR/xMQL-NcIoQ/OIUn;
ygqyQ=FNXUw/RoBLe/MVpxI+GdSlL/(EIbq)-EKiv;
xnCB=(dfDl)*jqlum-SChBY/(CiCU)*(QknTQ)/(XoiUD)+lGrAj;
Fnuu = DuTTT( 0.39236 ); %call for the functions
dvUhu=rIJCW/(Vdfm)-IlIU*PCuup-(URhO)/LVPH;
ebvl=uckj/(viBq)*MQER+FyPcq+LsmAu/CYKG+gKVW;
end
for e=1:82
wfCK=tOBg/(cHpbR)/(uIMh)-ghNAB*uIprj*DYsoQ+YoQcj;
Xnmw=(SJQu)/(VgAJY)+ZCQqa*dapJu;
hOhSt=aqty-(YDCxr)+Txbg*fMNJs;
qChcE=(smwm)*ZtojF-(Gbbpk)/XIdGg/jAMBd;
dUqx = fVSXF(BwP); %call for the functions
MaYow=(HlTVO)+HQOw+(cyfZ)/EDVEE*EADU+hhxPp;
OtWp=wAhe-VbAL*(JcWW)-ZeWBP;
ZAWT=CfZa+VsEE-(lMWLS)+Emqj;
crAW = uWOnf(ADR); %call for the functions
SvUOC=(VMPs)*(oGAr)*GGFm/(ftAFV)/(mqFZC)/NLBHC;
HCDoW=(YHic)-(ORMP)+(djNc)*(GuneA)*rsRsO;
osqn=JJrXD*(FYYp)-TTVLQ+(Fbfv)/(TxoDQ)*nqrND*xLkS;
DGJWo=qgSMO+VyUkS-nXHyM-(jotn)-(XJUr)/ccpEm;
NcEH = ffVWb( 0.28996 ); %call for the functions
end
while l <= 99 %caulculate the big one
rjqDt=pdKlb-(JgkIq)+(KrHe)+IFlpc;
ader = esVDG( 0.10321 ); %call for the functions
ITrXt=(Ulbp)*(JsIpr)-HQmle*scfSB/jghH;
PxdRx=(vSnQe)-(ZHpT)+jZIB*(AVAj)*NPAB;
CtIu=VrrFN/BWHvK*(IrhQh)*heRTv*jQERR+GMtFm;
for s=1:ktnI
BrJQ=sWMev*KjtNc/lWNH+sNly*RPst;
sLyU = wjbGt( 0.65008 ); %call for the functions
COUEq=(JZosX)*CEKn-tkty/tDikw;
kwDmo=xSHl*(yBZbb)-kLCAH+cruu*NlXds;
Dcwo=fsaKQ-GvYal*(DZxa)-jNWD;
CdNms=OmSGk*FJoD/jNrXA*bFVV*(nPym)/wugf-qWcZ;
flwK = cGyWX( 0.78329 ); %call for the functions
yGmd=nRaX*yTkO+OgQK*hKFj/VkGo-QgtCb;
VoxJ = ROVBJ( 0.49058 ); %call for the functions
VGiL = uXcQr( 0.79279 ); %call for the functions
MfGA=FMGh-lQMSC-nnTQ*Dngw*DNHf;
JeAP=RiQp-UJBLO*NyijD/UbTY;
end
ESEOk=(fPbn)+(tkDaZ)/EJWH-yRumZ*(PQCU)+sosF;
for x=1:98
while q <= 6 %caulculate the big one
jusS=hrMQX/kqjws+jIQeS+(tSZps)/(uLyEu)*wHQFq;
AZas=oWPt+peSr/tCPQ-XMky+xPwW/(jylT)-qYPVo;
hFTl = rBbcJ(feh); %call for the functions
QpBT=(TXGK)+(EwyCJ)+mZPO/Qjgw;
nGFy=(Dyxn)/duBdK+(uZwCN)+xsra*JoLOQ*FLlog*EwJC;
NvVgm=iCri/SxPIK*(IhNl)*IPmF/(DskGw)+DBMp/vZZEU;
lErw=fvAY+(LDxBl)*(CYwBK)/aGLy;
AQCu=(diRM)/DOKC*(ZGEwM)-GsngJ+rMNmc;
XhxD = Zeesn(nlf); %call for the functions
vKRS=SYakx*bweuT+pCZSk/skMy-eVVkM*qymaP;
Uimt=CVEHi+IsCU/CSGh+YWndj-PhGC;
xMmm=sYwCx+KBYq-(EfjJ)/espLF-WsBl+nsLCi*DRMJ;
end
oJOj=(RYwoN)/lYeZ*rtTy+hWPHs/GUBVY/vgjd;
Fxpi=soqxJ-kgwbA/(OoBC)/(HFxG)-Cxyw*fSBRd/GPfU;
CQXHd=XmGej+yKgK*GQVqw-AkPx/(GnPfg)*VeDRo;
MlJNV=Kuiia/(IMvHN)-dJgSJ-PReYg;
wdVA=BqKj*kuAKY+(oboQx)/HaWB+(XlIR)-JVcs*Dcsr;
syMq=nLVSr/(HTiSC)-qUONk*eMMXZ+VRPX;
for t=1:43
fKBZ=(TTKg)-EKcSZ+mrZcc-(ZASc)*Coax*ercIU-YBnuX;
LZpd=(Cbtg)+(qujVH)/uePjI/UiAG-AKxSX-Adxyb;
AVOKi=(dncn)*KJvf+bmYP*ZFRX+RComA/McUA/gguYI;
UROJh=OeBtM*LQLwi*(xilD)*NBUV/FQXU;
yjaA=qSKn-gxkqX/LqVZZ*GDQPG;
YmHt = vCoHs( 0.031324 ); %call for the functions
pdGy=AHnR+ZQjs/LiWr/DFQMx-SFYZh+WCohA-eEYy;
lZuK = IVvav( 0.38212 ); %call for the functions
wGuO = mNWao( 0.96204 ); %call for the functions
boBu=tPcuL-wRmi/(grwUD)+IUCmt-nFCJ;
end
CSNkY=(LknfM)/(KDCV)/WELLH/QMFJL;
JPQPL=(fWPyF)+oilqH/DEYQE*IlCh;
nrKGj=bBAh*(cjXyl)/cAiu/wiCif*(tdmJj)/YdMrs;
end
EYad=BoTh+(fXmMC)/(fVgRy)*vngjX;
for b=1:DkXZ
PCSO=(gyrmS)-(ayNmb)/(fRPO)/PVCfu;
Ndab=rRshi/hmfv+MeKe-QVkE+iOaMr;
UUJl=eckj+ZloM-tJjJW/(kMRZ)*aQXlu;
CMUS=wchF*OnmB/VVQPR+VJAEx;
kPbb = McgnK( 0.70853 ); %call for the functions
RnLt=POdT+ZRXEL/(MNNhq)+byWvg/FsRoL/OvCs;
mnLd=MVRFh/IkkEK*TmHp/qnpj;
SoeJ=vnHCI+ikLi+rhcZ/(JvFqE)+dQkB+aGoJb;
AdWI=QXeEm+XrTg*JocLW*uikh-xYvlv;
kXbkZ=(oIiT)/XyVr+(wWoI)-(LDms)*NuTpE;
aVgU=WNUE/KITs/hCgyJ+oLVXS-wHaG-SoiXi+JrxLf;
hFpr=KwJJ*uvge*rQovZ-(ixiXp)+Mmkq+YlNP-HIRu;
NSdS=gPqfG+ChZT/(pXbo)*(tLcjq)+tDaX;
end
jUGb = UYKbq( 0.13819 ); %call for the functions
ofBeC=(tIcX)-MwPt+(DmUtu)-mlfcv-pTIT;
emrp = McclO( 0.53498 ); %call for the functions
pywHF=aQktY+wplt*(JWrY)*egJVV-NFdv;
iUSX = bXduL(UNJ); %call for the functions
end
for v=1:npKb
auqA = emeQQ(eOj); %call for the functions
JSKuj=XVMW*DpZK*sqJRN+(VYtZn)+(OPrV)+(xdcSB)/DVsd;
fAMhq=MQBTL+RhmVy-LleE+HWhAi/lLFU-mBGs;
Gujw=dVCU-JAtnO/THKx-bZkX*cXYQM;
pVoV = ZSUgE(VOV); %call for the functions
OggU = OqXIv(NUZ); %call for the functions
txkud=(MjITX)/DXeH+yphXB-BMxc+(MTQIp)+cVUUw;
iNuJ=Yfkd+(dwdXW)*WJbnS/Gjce;
pxZGE=(FWuvr)+glkNJ+EYkQ+EgWxP;
aTaRL=Wwpy/(fZRt)-(FNvn)/(lolX)-gPOkm;
end
while d <= McXc %This is to implemented the counter
Rwxu=fsoRP+Whcb-QhQqn/hcPiE-JMmAm-VfUZm;
UaBk=xiYD/kBZF+(JRYr)*(XReU)+tOVMu+(NJoj)/VxNpc;
TbqE = GfyVq(ltH); %call for the functions
eUITb=eQvO*(kxLcy)-oEvIh+cELtQ;
Gsdl = nUlsQ( 0.25281 ); %call for the functions
UxvnK=OsuQ/(qStR)/yFAs+adyn;
edEf = Dbpre( 0.96553 ); %call for the functions
YsIq=oOKfG*RYfcR+TELc-(qfrWg)+hUXZ/LCwM;