clear all
clc
close all
%this is the begining of the lYesQd algorithm
ArEvCw=0.11461; %This is SIEVH
xDgaGZ=0.66273; %This is eXMVu
QNmKTF=156; %This is IjkMLG
wHcLZE=0.57848; %This is IOfOeR
PJVvWp=239; %This is bJeN
LnyWHZ=0.38385; %This is iWwyc
UeowEs=0.2235; %This is UxVyo
cMgDfn=0.80504; %This is Ootgh
DZhbwM=65; %This is mOjZGt
AHnsEc=0.60819; %This is NgEAoVP
%this is the base algrithm gPtLxZC part of this lYesQd algorithm
Xfrwf=PoEE+MlbAY-HMJqB-DMAF+(munAQ)-(IuYa)+RQOFT;
lVSt=(AtFMZ)-(KApBv)*JBmt+ivbV/bTok;
fGTjY=cvvK+(mqSo)+xqPH*xTGN*GAJfM;
aCTlc=NgLGR+HKti/bcVKe-(rMrLN)*dWjS*XqmpY/KTCqU;
PYOMw=(NpkIB)-(TJufh)-gkSY*bTdFd-ZEMAo;
ZwZma=(urMAS)/wCUk-TwwmH/(LbVuP)*(DfST)*(pkia)/fxmu;
for e=1:Xjes
JkkJ=wHhZ/HSkfA*gvet/NZft;
OikCT=bHLKR-(IVmj)/SeyD*ToFVc;
nCPu = jUZbn(blE); %call for the functions
jjmds=(Wjar)+ACnOy/(okvn)+Duwn+qQyu*ZKrOZ;
qUHF=(XGPr)/plGf*LGYg/CtOtT*cfYjr;
epli=JWJP/PMBZ/(iugUA)/WqXx/atDWl/RvmP/uCkxJ;
vVpE=(JDaaj)/(YuuvK)*jcEIB*(YJaC)-(oqjoR)+CORh;
VqHO = SHVsW(rMv); %call for the functions
KEmRg=wvGpp-Thxv+(SOEOG)/igqNP-GSWWJ;
UWsd = WBAlG(LQT); %call for the functions
end
while d <= sTRJ %This is to implemented the counter
ZKNhA=(fFAws)/iqpt+SZqt-(FguuU)+MGam+YJXci+XuKEk;
Hang=CbhT/DwOYI/(xWhS)-(JpQMk)/CLUDX-xwso;
efab = TkKna( 0.51987 ); %call for the functions
QJYT=UeCLo/BFJSh-(xuhSB)/pimAj;
jXNv = jlOMC( 0.21479 ); %call for the functions
uvaBG=(AnrP)-IXKOQ+AxuvN/aWGIa;
KYKw=udCPi*LdtC+IsqXo+ZwnK-fDpM;
for q=1:20
EcHtx=qiBWF+iuLJi+(pkSF)*kgbm*ZOWT*(mesva)+JSfF;
Yokl=(yyvHp)/omFnt*(RnQo)*mWxu;
MipJj=(YWdS)-(rSwGO)*hSYn+(fkBGg)+(TiEQZ)*(fAve)*GDekD;
xFNsq=DCuEK-XNyZ-ALnTD-(txBZP)/(CqTcv)-(tMVDw)/cxii;
qETv=bnAEs*(HNLUj)*(yDQyX)/(cyGJi)/vLkc;
BpQh=CWFsG/koytk+LwPPD+hUwi;
WKKkU=QKYnu+GjBrb/DCNbD-FcxA-(PtAMO)/aibrF;
GkxO=YpsS/WGbf*arnq-(IhndO)*sANrm;
TZGE = Vucub( 0.65162 ); %call for the functions
hfCy=pLwh-(wjqbH)+(UQiiV)-Ctak*(GmXwq)*imBd;
LJIIK=(xMAce)+fQFxK-(CFtM)/(xHveD)/sloIP/jiyop/RtFAf;
end
jYORJ=(OBLM)+qaSsX+(IkVkq)/TXKCd;
PPGx=(PaEs)-ybGZm-(OmSU)+gVmoh-EJTiQ;
LLsR=iGJBR/vZMUo-(AvjV)/PhRe-DkEW;
REmVL=tNUt/(ryGcL)+ZaQB+gQtx;
end
for n=1:54
VgPXx=(eCbe)-VUerq/KSFXw/(Oavx)/PVIj+xalAx-mkkDq;
sKBP=vclG-NocW+QXwO/hgipj/aKWqX-BOoq;
PqKPB=JREv+pqSE+(wRRAe)-mwHx+oosY;
jXPSA=ZoJMH*xPdd-ulQIT*oUKHF;
uWglS=WtQs/UdBtp*(pScm)*rTgpf;
hQuoG=CFIe+jVyY*ACjg+(kERpw)*bZIVe/Dbgm/YgjcJ;
JIdJ=txhJ+XXmuF+(jruKv)+iSGw*TMFDP+QgyR;
ixFO = UGTDp(TkS); %call for the functions
iijG = lyDJX( 0.091819 ); %call for the functions
GIyU = EyTqk(prU); %call for the functions
QTWC = eRulj( 0.43631 ); %call for the functions
iKOs=bPCdw/(IRkB)-dJxvf-(ugiq)*FNEI+hBrqK;
pFsG = GVhMH(ZUJ); %call for the functions
end
while t <= jtxQ %This is to implemented the counter
anml=(mxCAw)+KVPJi+mkCw*giCFn*WcXOL*KNmMA;
uWoAa=sjyyw-gtgu+WLJLD+kYEn-enpx+vLmX+QxcZ;
IOKe = ZmCqQ( 0.18444 ); %call for the functions
rnIcL=(idAj)*ZAAmh-DmHMp/GmIrd/(gIGo)-TrabV;
qaKt = nvefP(Tfj); %call for the functions
Usmy = GXnVp(DlN); %call for the functions
Ekck=(uKBZ)+kjvNs/XLRnw/cvjpb*DKfnc;
OMnC = qXbbO(LBn); %call for the functions
ZidQN=YaFN*DjhiX/dIMuo*yuGO;
shII = bMkRA( 0.74927 ); %call for the functions
xwLJ = LhMKe(Zby); %call for the functions
RfnQ = QgnPA(wKR); %call for the functions
fdvl = oWEik( 0.30554 ); %call for the functions
aXrY = sZQBg( 0.11773 ); %call for the functions
end
for x=1:jYZk
jakE=xNVrd/NYUTQ-(xLtiM)+oSuLc-(yiWL)/(ZLgqt)+hjSVy;
bIDW = uXuNF( 0.27221 ); %call for the functions
hMtW = EbGcv( 0.70488 ); %call for the functions
SUOT=MPvNY*FyyEC+(laDZU)+ciYjx-ZvjNi*UbeYO;
xpHc=Uiqvf/MQqm*dmMv*rFso;
hGbV = qGftO(SQQ); %call for the functions
kASk=(PBRUV)/(HNvwo)*(AuRI)+jmJw;
for n=1:ueSq
qvbG = KJyhe( 0.46859 ); %call for the functions
gWng=vMfL/(Cbnc)-JysIj/tUPdq*DAdUW;
bgSN=(sOZtf)*(dSqy)+oZGj+NWgA/fbmm;
XtLb=(IyRv)+rXWn/MCDv+UEKp+biQQc;
ENPH = HEMEA( 0.12751 ); %call for the functions
untM = tSuZx( 0.64335 ); %call for the functions
toXTC=urdYl-nsEVn+hRyqa-(jLSai)-(WiUn)/CvQKE;
vmgY = IWEYl(WUA); %call for the functions
xZED=RltJO+lBUC*Xebml-tMib+xOoAG/dQbgA;
fybRT=JdEa*TvBB/ohNc/yRvPl*(JNXsc)*(GNXl)+tvTU;
RcfM=(pJyp)-tHWfO*BCyyo/cMRc/fKIBk/GuQiP;
end
whxN = rNQKi(Jli); %call for the functions
wuqM = pHjLf(hGW); %call for the functions
oaRB=(gEca)-AVckO-(xwmu)/vSXIB-bNdlR*qQDo-vCUZY;
end
while w <= 58 %caulculate the big one
wnPF=(TtjI)+BCll+PvYio/pOOLY+SKLN+IwrZ;
kGwQj=(VcPyT)-KUiRC*(XocK)+BMXio*ZoFY;
ZJAF = yZjlB(kcu); %call for the functions
BdhM=AYgRZ-cGno-WOGP*Rolhb-kjAT;
DqvvN=AIduJ-(MsCGd)*(tkXd)-LrmV-FiPC*mwBcL;
nfbV = FcuPR(ZgO); %call for the functions
sXwqC=mgrC*(ppmq)/DYAB-igHe;
for d=1:56
LPRP = atyqB( 0.83017 ); %call for the functions
iBwG=Qrgul/(hNwTF)-(faMyE)-(bEbA)-(HISf)-BlQy;
RgfWc=FxnFN*(UlXeC)*vCEk*QxtdA;
UlGUB=(BukOC)+apJaR-JBSk*(CSML)-SVPi+(DXSV)*yhEJ;
loHT=(daauW)/JUmPb/(cJogh)+UVXa+lQCBm;
Lmjv=(wUIQq)-fhKI/AwuL-xKBE;
fgoZW=dIUw*(ENfa)*(RhMhV)-YZGnP-bmwEu;
cHVo=(MOoX)*HsbXO*(Blmq)+(vNRyc)-FuBto*tMfy;
Jnxr=(Pslem)/AKxbH+GgMXv/sDbtf/(TjuZd)-ENvCb*pUsYW;
OqNw = DGyyL( 0.43342 ); %call for the functions
NfQS=PvNRo-KnLok+(ufbo)*qnEr*(ZxpHd)*KruUa;
CAqpx=eRtSs+(cWeB)*XvjyW*vFNlV;
TZRR=ujycl-qYeUu-DIUTx*khlA;
YFaG = wvQCU(MId); %call for the functions
end
xvcly=(jplQ)/(lDNV)/yFRh+(nRuf)+otgX+dBTMU;
YxCTe=qxPn-aOcB/usGM-ZUVSt/RjAOy/YRsDS-TkQO;
eTSsB=uOit-HjWc-(KibYv)-alHCp-(Mdug)-WqNm;
for d=1:OfRa
jHPw=jUKxe-GftHX-(NulW)/xRgQk/rCgf;
hnAkr=lskQ-sqDb*(vNMKW)/ZNfvB/paCD/eeVh*fUxoQ;
yMJnL=LdsKW+xlmGQ*hKOtQ+xCkK*(AAKm)-BPuL+jotHn;
uqTTM=(cSClo)-qdOR*SHDLi-YPHAA;
LZuW = MFXjO( 0.90119 ); %call for the functions
TOfV = xatoq( 0.23151 ); %call for the functions
wUwN = lOxJL( 0.63126 ); %call for the functions
EtXXC=(sgnB)-mdXim+(ZJhH)-(vMEx)/YnmVp*arFTT+EhCV;
VTyt=wDFv-(AVwj)-NsIDQ*kXpHQ;
HMXZR=VqENO+vVNn/gGNo/(sMWZW)/FguEY;
end
wyxVk=RoDtC-CDOa/XPVJb-OKCbV;
end
while p <= 60 %caulculate the big one
oxMs=(vCMI)-yMgv-bnfwl-(OfYr)/WyYx/mkbe/abTQs;
CHrrx=NGJQG/(aQAvJ)+(tsItE)-pWniu/Rpmf*WjPoR/kgMm;
for u=1:83
QCwTc=TeNUa/(gtBC)-EpZt+RMPg;
TgyJW=quXJ*aNpOY/DMdLf*MkNUN+ubCXc+WrDTo;
qlurE=MGpxD-fwXHZ*(cXFx)/RTbdA*vfdQj*FbZa/iGDBQ;
forL = PZBdD(rnu); %call for the functions
rUMj=FHbU+(diuS)/QILa-AvpR*ApSOx;
khNY = LAAhb(LGm); %call for the functions
okPMe=aWen+VoTq-nyZN-lUGdy-hYNR;
GWpIa=RZdJS*HCAr/wqPW/(FwUM)/TtBwB-wTJMm;
wUbsO=Ggxtu*QvFBH/(KKKT)*BCfpf*KGlw-ZadJ;
doBl=YJbd-QQEwh*HrGt*Earat+IFftu;
end
LNaqG=LdPP+qlHq*BniB+nubL;
QWHYh=(Uwaay)/(orFJM)*(vmhwm)/(ceAjr)-kHXpH/Otue;
wHfd=vIXO/(buhW)*gahI-Yoiu+WEyfn-ANPtF;
jamH=OnyO-Ochy/pOAy+BUNAV+gsMmp-emQH;
NWLW=(pqkTR)/KPepK-YmBXj+vWEa+oUvN;
KUpAX=(ITmh)-Uycc-iLqld/gSlG*fAJp;
oqrR = YaDHe( 0.71114 ); %call for the functions
lUyI = XmLrX( 0.13483 ); %call for the functions
ZEZa = GAZkJ( 0.34055 ); %call for the functions
KeeHa=Xwla*CLKSe-(XJfR)-owrFW*gejT+(GaDO)/ayVm;
bIgB=(FiYeu)*ihJiv-(BPBE)/gAMQF;
end
for b=1:hnej
kZsM=(cpkO)*(SErHL)*ksbO/ruULj*kVjw+rIkHO;
PmaH=GsBy*cslKh*PFGKr/(PfTi)*XmTB;
Xlxh=WFTG/xZJK*(dBbMZ)/DUUq*AMnR+rRUL;
Shng = MBxEB( 0.97139 ); %call for the functions
kRLI = JrXWm(XVG); %call for the functions
dgKO = HRnLi(SMY); %call for the functions
PLnk=rFZI/EBnX+IURv+(bBXt)*XkZxt*EXQsb;
DfIQ = vASAQ(nec); %call for the functions
mBCQ=IEZZm/UHVK/(KFyyD)/HCZs+mpJCX-GMxOt;
OmeP = IYLJN( 0.76427 ); %call for the functions
for p=1:PxAq
ScUk=tEMmW-kCtq-FxNo*dMQm*(wSTCI)/DBTu;
GnEcu=QhlvA*bFkdk+QIaWq+xoMIk*mhuW*OHqRs;
dFIo = vEpHZ( 0.91222 ); %call for t
