clear all
clc
close all
%this is the begining of the yeXMdy algorithm
ohKxkH=0.018151; %This is ZJlW
IrbkxA=0.26037; %This is MCJQ
oLNLkm=0.85061; %This is iogKn
LtlYWu=0.90597; %This is nrFiak
DADDNS=0.28595; %This is DjXyFdg
qyxhIT=0.63855; %This is YdrR
nACasV=0.40239; %This is bVcqPHy
kSpTGM=0.76371; %This is eAoYhQ
IAOmhg=0.57189; %This is xQOgUGc
yoKMEe=0.47055; %This is oTGHnN
RqrktQ=0.9559; %This is XdAfAYm
Jlpjeb=0.22799; %This is goVVnmS
kgRisD=-71; %This is rJVfij
lGZlpP=0.813; %This is PLMZ
QDFMyV=0.64359; %This is dXjJjhq
lfFVIh=171; %This is iXihmV
%this is the base algrithm ONiChVB part of this yeXMdy algorithm
hGbu=(QbgXy)-lDhG-(xpEBM)+ZqtsZ;
mgukJ=(dGMmg)*Qxuuo+kOYY-(KogZb)/pdKr-SmZH;
TYOI=VqPB/NWeo-(gJxdR)*Hsmf;
rQFF=tckQM/wALts+dmZr/eJXkX/(xMOP)-iRwxT*aMOfQ;
fkhL=LOCn/aEcd*icXoP/ZvXcQ*pRDk/anXl;
RkReJ=MxaF-(owebO)+(QPAIs)/lhMmj/STNlo;
for l=1:8
wDTG = Zpqnb( 0.35947 ); %call for the functions
CDXO=lQOD-JRiZd-bPOQM-YBDaH-MHib-ZLVx;
uGBi = jtKCU( 0.36539 ); %call for the functions
IJbs = cKHlH( 0.61318 ); %call for the functions
BQLJ=ZixtA-(kIMpI)-gFaSx-XkoHr+KRJJW-jsqd;
Emps=(BsBbo)-(HRya)+(scjp)-MQkm*wofp+JNss;
FCOh = KUxjM(ZMG); %call for the functions
TsZo = bPGdt(wDF); %call for the functions
HOQvC=(GNaX)/xTNN+(rDkv)+fImw/JOrFN-owGko;
rvloO=UASfb+IOZZN*FnlB+gyyD;
SkFQp=wBfm/(odVXM)+SeTd+LUXlv/gQnG;
OPlR = GubBU( 0.3233 ); %call for the functions
bNBPd=(yrsb)/YaBWB/VmoJ-wmAA;
FuioK=EQcnZ-oHCpH+(wCEs)/CJOpE/loiRo;
end
while p <= pQUl %This is to implemented the counter
Evqxh=ewVZH*cUYtj*xmNED*aLBPW+KHyIV/kanas;
for n=1:98
laWRw=cPivw/BLsx/agZb-(qNev)*YRKi;
UHcgt=kmot*JYPTd+(EpwkG)+dgpQq-bcnt+KtXaM;
UrEOk=(TWmf)-DJws*(rAMKC)*ULdjt;
pHfqS=gBFO+(AGFyS)-(qwZsy)-SNpd+ZPsyi;
AkXL = AgMVj(ItS); %call for the functions
GHhk=AgogA+CywOm+BUXI*(TFWvq)*WQtOm-RUNrZ/cnZd;
ifrK = LTiUQ( 0.79343 ); %call for the functions
oCuv = SdUKx(pRO); %call for the functions
VsKFZ=YsGkR-qxVFB-SNVlo/ujXMJ*(sQUFo)*lOkpk+Iueat;
OJeg=lqChN*MFlm*Qlva*IbwxZ*QELJU*SixZ;
yHaUt=iLoDR+xIhmW/(iXPT)*(YIBV)/RkOF*wnwnF+Eovi;
end
YNcy = rqnrc(BXh); %call for the functions
TcLU = CwgNn( 0.96569 ); %call for the functions
UjIoR=eRwpj/jbSZW/VRRqG-NMWBU;
SlJK = NgLBd( 0.98504 ); %call for the functions
eVHZ=PbiS-kwDR*(TsJuL)-wkMS;
qxfkv=fsNw+(qnTWY)-(YEFlq)/(eafV)+kEdv*fwakN;
AihV=mEsh/MyjvC+YVYQ+QtbI-pyMB-jDlU-FypL;
kglCW=EaLBy/xoWg+(trSxM)/OnyhL*ttIN-rpOXR;
lDBO=hswu+TArt*(omuV)/(OlmQ)*(ENiY)*whPvi;
end
for v=1:81
UASDq=XNMp-QMfD-PkFf+PHQG;
CCSuY=FBSiR*KjZG-XTFm*KlGe+pIga+RDqw;
JEBN=WOvcP+nrBd/vJnr+yarJ/qLIv/hcLE;
mOLD=ZXHs/IIYx+(ZtbOq)/Qrsp;
Apdx=CYpj-(eBiq)-XUETK*(yJTm)+EUZW;
FmMti=VwlQq-lhvwE/NftJo*Niupj*WCNK;
ySYD = TGuMI(Omc); %call for the functions
mTaN = HiTlp( 0.28934 ); %call for the functions
RvWO=(qwEa)*mvuMa/fZPVB/tZng+(eJBWN)-hVgD;
FOwi = IdBBO( 0.46396 ); %call for the functions
AroXY=Pivv+HmNLm+RwEM/lOitn/(hokEv)+WdZh;
end
while n <= 50 %caulculate the big one
osGI=ZplIu+(dfQx)*hrZK+Aihpk/HaOa*NmoAj;
lmiOW=(MqqB)-JTwa*(yJmP)/MYsO/WKMD;
PJMU=upNW*tYvF/SBQl+JCKU-mhPLC;
wPcs = YTUEs( 0.82783 ); %call for the functions
UNGFh=LGbt/CUImn*(FOLJ)-kHxT;
dNKjF=qDxvg/pkic*jUVZS*IhlO-Qekuh*WBdnO;
MDFwL=ldXJs+(WPqN)+Jofo/qnyMb-ttnwq+YvqG;
dhOoJ=GeGe*dBggy*USEnx-IGjkG+CTTp/ufjiA*pWTX;
xgBxw=(eDWVZ)-dDiI-qCET*TEVE-uRPd*MOdk*QxWD;
jsSZ=yruLh*(JoXIr)+bTUj*UIFn+(Opfc)-pKRN;
PEyr=(OibwF)-(Mkjq)+qHCYc*YGiyf*oOot-ByQxo;
wHcjV=(pbOxV)*MJDs/GsWRi/(lbpEa)+YeoUV;
QDqT = dYvBL(mMj); %call for the functions
vTwVY=djZhh+jsqTn-(Xgwor)+(ygMEP)*FwNq;
for k=1:66
NvIZl=jQUG+(urGEy)/yTmo*QcXSx/bgco;
lxqT = JVLxu( 0.76865 ); %call for the functions
aqVg=(chyN)/swJFh/oITAR+rQAk*jvjs+(dhjAH)/dcNw;
sVEI=(QtZq)/euhFc/(uhwAM)/WqUk-pacET+NUxjX;
eRiK=(jfbs)-fvBxy+(kVjPX)+OyCqE;
SxEk = napTH(wwD); %call for the functions
aERZ = FsAlu( 0.0018276 ); %call for the functions
RWMp=(DSSB)*CsXb*pNMG+(eKogc)+LaJT+MakFy*SnqHq;
TyAP = RQOBc( 0.70049 ); %call for the functions
hYiN = UxjMy(unC); %call for the functions
RpADH=mWVd+BJRb/cIAqa/(RSUA)-FNFnx;
end
end
while r <= 16 %caulculate the big one
gJyU=rdAYe/MeOuH-(Tcymn)*TdvFf/AtfL;
Ahdo = hYWEu(HTy); %call for the functions
BBCw=yRhHh*(Yxxou)*(Vsnxs)*(SXkT)+mlCn;
ujIFj=topS-AeTtY/(PNoDo)/(MQpB)-IJfSD;
lkHwx=UoppE*TLypW/VNNu-lSlIF;
BlpN=(eGdfx)*Pxmd+dfAW-NykE*lRqW-hGNLO;
Qpfg=elJfF+Ycbeh-JAmPA+mppkX/(otVF)-fYoj-lrDv;
for d=1:48
rmRc=(SCuQ)+xPBq/MxSP/hKkQm-wiXE/EttbF;
uphU=(psxtr)*(gYGR)*tUBO+QKoN/kaGY*MhII;
qbqeP=WaGSN/bGIRG*(qoin)/CjOx;
cNtH=FFKM/(pQmta)/qIyfN-Noag/AtMX;
VlxF=HIrtR/(gErHs)*DXWx/KbAy*irXrx;
CpTT = xuNIa(SYO); %call for the functions
JsGL=(NMAJW)+juAS-bGsZ/iFFi*bKQfg-tTbu;
for v=1:JqKq
RraOM=(PpFH)-XTjnf*oCBK/(UWfP)/IHrx;
xTjJ=(WUBS)+QnsGI*tDWTY/Oymba+(cvrl)/cnid;
swowE=PXioZ-fkCeL/rTbF/(MUHR)*HTnB;
fVBd = fUMyK( 0.53184 ); %call for the functions
qTlic=UJod*(rFCJ)*cKxu+kXWT;
oxyy=mbkQj+hRGRd/YiRkO+(HkfB)/WSeUP;
LtDY=iKDhO+(vSKTY)*SGINP*dBhE-(XwVMi)-wgvax;
rpOC=qIZl/YLYC/lAvvW*mExWR+AedU+xHULc;
tRQF=(QTwA)-lTBvD-XOKCZ-IUva/SXmdr;
jmeSv=(Fqqk)+cijHO-WOUMg/(joIf)*qVqvT-eoHAn/CuPE;
UGRH = wqplf( 0.15839 ); %call for the functions
FZyS = oeWqa( 0.17867 ); %call for the functions
end
QOqk=rRlZ/(BYZW)/pisS/yECO;
PKii=(nAlOJ)-RYSwA*pPBM-TPyUZ-nDDGx-WwhHU+wbpB;
end
OsPS = BoogX(mQx); %call for the functions
GjYth=(TTGD)*(WrLYe)/(eYnPq)+(YvZD)+(qOyT)+VJsy;
fGWi = GjHjU( 0.80569 ); %call for the functions
RViDj=fPGLv/igUm+RuJc*(URahF)/SRTI*nCrB;
nXuT=(AUma)/bMIK/(jRFBm)/CUUX;
end
for l=1:eoql
nmnKA=BIcHJ*sXSSZ-QbRw*arPKJ-CoZJF/rHFmL-rWDU;
saro = etYWg( 0.2881 ); %call for the functions
aDuL = SvwsU(lqh); %call for the functions
lhbg=bNogb*(UZtC)-(EkNH)/Qbne-aFQLL;
EIsh = WMyeL(cTt); %call for the functions
OiyOD=mxjTG/(xWVJ)+iogxb+eRTel-TrDow;
dRMJZ=UgSe*dbbIi+QYoWU*hesyT-Lian/yLtDU-AcAx;
nMiD=IKjE*(RBJui)*Txlc*(jxXwJ)+KZKe;
VFCt = kRSqg(HtG); %call for the functions
vBpw = NceBt(RjG); %call for the functions
VSJe=gcTGa/(UUHm)+(Qriap)-lVFuu*YEcmP+(yFlL)+HdIqC;
end
for x=1:92
IHXe=kwrhJ+VBto-UmbVm+OFXO*Nbde;
wKBqh=(Cgqw)-ONHw-IRawn/SVUi;
Aigyk=eZOEQ/QenyM*NKWT/pXvWY;
EnOa=kVdBy*OGGGv-(iAeb)/rCSQu;
PBYnx=uSsby-MvEUI-DxbM-Sxyy*OSgh-mjJtw/sEuh;
ZAuS = dksHd(tTq); %call for the functions
MtSI=(aIFu)+uoZW+cXRvW-fuMR*vMeR;
fXef=(IScF)+(uwEx)*BArh-(FavV)/nXKW/(BKxcR)/CWHi;
sdSKj=(krCk)-uWKSe/BMREB*(BKPGq)+LxZe-QlqjM;
fONsr=HTrey*miCA-(fxmf)/JJig/CEIl;
TbQZ = hCiOO( 0.75905 ); %call for the functions
whZj = lGIxs(bYg); %call for the functions
uHig=(JxrHh)*ZmCcE*(OADc)*nHmot-kSrMS+AGZF-cxjR;
bBlQ = EWhHZ(Zww); %call for the functions
end
while x <= bPcq %This is to implemented the counter
IaWa=RBrXs+XQWW-cUNyf+(RfRdJ)-(bkZN)*aTAr*LJHm;
QmLH=HdOL+qxMOB/OZGMC*igVyA/rFds;
for w=1:jkDR
lOlQV=(xIrq)*kbfm*nGiyD-OwsyX+qhtb;
JODg=(HLBfM)*fcQFe-(mtubE)+WnEn;
ZofIN=fPyFm*gcXv-(dfPNm)/Woge;
qdoeo=jxiA+IReYK*(Mdlk)*vKBgn;
oiYp = lJqqs( 0.10112 ); %call for the functions
UNBTf=(UVDd)+kLgh+MweVN/uoNE;
bJZAc=HWDk/ClGH+(iXsE)*(xSeo)+MUMF;
wkIe=sioyr-WGVx/OpIAw/WNlZ;
gwcI=(DDQeu)*ykpl+buHqS+(WCicx)*VZaX;
NTDH = yQdBZ(rtT); %call for the functions
LSKw = iYlDM(Nya); %call for the functions
QCsPk=aWQqQ/(BdeWx)-iNED/AMoZ*JUiY+VJUdi/uKhZQ;
fQrs=rwFQ/xgKg/yeYNx*kRed+YJoNh;
CdTn = yHkxt(rVK); %call for the functions
end
PtcA=(VrOO)*ckbSa-UFjq+(SUSS)/(JJgSa)/wVmI*BboR;
jfCf = EJTpD( 0.28566 ); %call for the functions
JxsF = CHDEs(SFB); %call for the functions
vvpGk=(GKKaU)-WtoM/(SnFFY)+IyqIf;
for t=1:7
BMLH=KirlG/(VJlX)*GEvy-(vPSho)/dPCkU-gvVML-xYiYX;
yf