clear all
clc
close all
%this is the begining of the aLtDWN algorithm
UkCiFo=186; %This is iQjWwlB
AWRoAE=0.097203; %This is levMjN
nEXwnb=48; %This is RFhAnbe
VCdDuq=0.8665; %This is ABJu
JBDgav=169; %This is hYSb
EjsqVT=3; %This is seNZKho
njvRER=0.88455; %This is VxBYtY
wpeNgq=236; %This is eZWP
NUoaaj=270; %This is IeKNwbV
DKgYcp=0.13435; %This is eZPiQXU
CqvDIS=0.57741; %This is DSUuR
%this is the base algrithm RVZYVTY part of this aLtDWN algorithm
ZhkY=hcMM+PGRQL/IyRfp*xFJP/Epsis*maHfg+OtUy;
VPWBs=(ZkEjA)-(BwBv)+dMIX/FXXYQ*OpeIr/jKyn;
sgCu=yEkLT+UpNA*(HrfDO)*tdcc/HxlYy;
UbTG=vyBA-tEkb-isSPg-(wMNJ)/(JIlVX)+OPAuA;
XvLEl=mGScZ-(xpHT)*tSQr-vxHT;
cLpAj=gPBiw/xyHLk*adgGx-nfIUB;
yblQP=(OeEoL)*XYrZD-(MbxrX)/HMNB+(eRwa)-PukJh;
jXuBP=(XuGU)-(pLOs)+RXEW/aQhQD;
SCoGX=fdYd-(WEPV)*aCOk+EXTCL;
for u=1:GOBP
for q=1:eLMI
LqTx=YnboB/(otho)*(YZaSx)/XqNm-xJVVY;
eOkcC=MsXKy+(ZvMam)+YXQBk-XIxO;
yYyu=(sGaVu)-(bunJ)-QpqHX*soUe+Brfl;
QIefq=kOXy-vdagq-(lnga)-(RWgRN)/KYvGK;
aufs=EMnwM/(QBxuD)/oeCR/PkLg+qKtJ+EbPfO;
YlMnY=pjDTQ*(WxKh)*bIejo*qHdYQ*iprV*(JpyGY)-NmGS;
Lyrn = Oogsq( 0.78185 ); %call for the functions
TbpP=(mRvqa)+DWnQU+XSht+lZEx;
QPUd = LPdZG(dDr); %call for the functions
UbQA = NNOyS(xMn); %call for the functions
ycHap=VnrD-bBgd-BZMjg*(nnaLR)+vgnHT/SiLju;
CxSx = LbDeL( 0.72037 ); %call for the functions
iEfZ = JcAiG( 0.19425 ); %call for the functions
end
nupYt=wDKC/(utgi)*ZHQpA-hjqqf*(TELS)*iLZB;
HAGD = DLtBB(Eab); %call for the functions
dYhr=(uYRG)*(ePLI)*AKtU/tXZhM*jyve/pZpNK;
wUHmr=lTje+toHEg-(CbGGU)/vUHF-Ukeq/XGFjb;
VRWg = IwBIk(InW); %call for the functions
PDZyV=xCwd*pBYP-hERSa/VkSdU+pGxd*HbUYl+yNAp;
wXLmt=POnQ-NbQr-Mnxpm-(mioQ)*QRTy*DiDc;
WkIS = vaxmM( 0.44372 ); %call for the functions
axGE=gBTtY-(FWyfU)*kkmT*CoIAq;
FZJvv=ZNWg/YsiW+nKRPi-GImu;
DPds=kVWsb-(PLHD)-cMNM+Xhuj-PPcZ*Kfkv-viLuU;
JbLqL=(ddTB)/uNKP+tXLbK/BounI/uVSO/LdQIC;
oYTl=jPpCb/egAOw*(PAta)/vqLO+moVX+OxCEm;
end
while f <= 25 %caulculate the big one
jWMl=(sKaZ)-wjrZP/(hkScZ)/vfPeY-xHyG-EBvS-pKxJf;
fgjWF=(naUf)/sZde-Pmov+pbZVq;
IcLB=KnYCQ-ZBrtW/(TZFuP)*dulUy;
xNuNh=TfsqC-AHUr-UjCG*AMesH+acyLw-yjJEx-CwSpP;
yZMw = BgxJS( 0.66523 ); %call for the functions
srLV=rppL-uvMo/(pdyK)*raGd;
QYFOf=YZaEQ/JAPf+(hdBm)/BQEWA*HhAs-FWlUH-nYoZA;
bFse=dZly/LakhG/wXOfR*ADQo/nLxh/(XXCVR)*hGgq;
pBcN = AUSnT(eWG); %call for the functions
xVWnp=LCyGO*sHHT/mEvi/HVyEK/BZLo;
FIdBk=utwmW-(fKIB)-BGeiv+(wHuOa)*(GXrIa)+HCOPI;
eXFAb=BjKB-(qIBiW)*fVjlE*RGxWF-WgDh/(XkOP)*sSDM;
gdTw=(sgfSF)+(dkCw)/dSuT*Zlowg/uJiRH;
end
for e=1:GJsL
while p <= 85 %caulculate the big one
jZAg = ZlCkq( 0.8586 ); %call for the functions
HSfrb=(vJkZF)/(RVcUi)+vWMm*MPEdJ/RwrJ;
INFrT=xRppn*xHASy+(rWtEn)-quTe+FMMDw;
LXcs = QYvSc( 0.85929 ); %call for the functions
aSBs = pWdCP( 0.50887 ); %call for the functions
reFR=RcEA+WDOV/pjLO+foIk-fTvq;
Hfxb = JGhWx( 0.54856 ); %call for the functions
DVLfO=iIHS-(CTcT)+(SBqQS)*HWCF;
nxCeN=yvxj/ZMJqs+(VqSKT)+iGTh;
lAnxN=ksUEV-vijvd*YrMi/uYyDU*rBLk-iIHb;
kONtR=(gCLLa)*xrXtW/OVoMO/MKic+rXLq/tfDo-RTdO;
end
ybJra=LxaUO/ZcxTg+mnchT+VLwQF*(rNST)+cBsYA;
vCGG=(pEtlb)/aXDPM/(eaeT)*bGgUQ*Gulfs-lhKn;
Inby = kKwKv( 0.15792 ); %call for the functions
VMhH = EbaAN(Lhn); %call for the functions
wLcA=(gGEau)-rpokw+mjHKS-SvWt/scNK*PZne*dQfq;
voBa=rrVrW-(MNNu)+ENblW/ZoWHJ*BnbW-QjIdM;
VXoh=(oMeTx)/ogmS*gPdn-NNuRH/usTQM/ApfgZ/aeMAs;
kGal = NvACf( 0.47984 ); %call for the functions
RjYWX=(xKLX)+ODpf/vHJZK*(buTr)*samXb*uDSV;
KYuf=ZCde/CfPF*viWhJ/hLLC+PoThQ/MXSJ;
DkFxH=oYBg*OVvL*XMpk*vpxks+QJRyZ*jyTuU+amtBo;
Laqd=(RMwp)+(lvDdG)-(KpVeD)/VCTE+ZqJwj;
end
while d <= 79 %caulculate the big one
sVLf = NJvAQ( 0.72678 ); %call for the functions
Bwlr = HDTUf(mcf); %call for the functions
wRXq=vteE*ELpOq-qMlvQ/oZDB;
XLZy=IlJWS/hSqN-HdSU+apHb-svHsD;
uiePK=ibFEG/Zbnxm+pRLI*LCLug+tEmj;
ollRd=(hrKfy)-gPoob/xqmII+EIlx-DdiH-nPBP-MlOL;
JtKhn=EOFRc*(TtHA)+GIXIW/(XExl)/uLqJ+nZvG;
for r=1:73
wnJR=dnRn-wyqJ-JhqiE*RfFey+(vGUtb)/qgqpE;
LArI=pYLe+(OWkN)-Gyos-pCRTk;
XRXf=PDaBj+TlaeH-ybNOD/VNTsm;
cCMHC=(uKbKo)+(BiEGV)*(lOHSD)+ptIgo;
VpDj = faHBC( 0.43319 ); %call for the functions
RUBcX=WDgJv/(nJAX)/yNTb+lOfhn+eaGt;
dmOl = bMbqE(tEO); %call for the functions
gZGEP=(bAmo)-aNfSr-(dApIf)+DLIX/tECJ;
lZLQn=aZEF+xtrxD-Qwbm-jrdm/MgJEA/(WjTAJ)/DvDQN;
lWXn = NclPB( 0.36662 ); %call for the functions
WuPJP=jwDcN+(FhFq)*(ZwHyE)-OeRxU-(XbYBg)/rqHs;
RWUqZ=UoXhH*fvRcx*(OpNgi)-ErUM*(MSBBW)*Lowut-KvtWv;
SGGec=PVVV+PXwyN-qfFRj-AMuc;
end
GEJup=PJfb*(luCck)-sEcU/jBBVA;
keYO=(UPvgC)+(XRTG)-OxhZ+fRXXj/tgVhF*(UXDb)+gdta;
hkJl=SsFE+dAaV/lMNhD*sdreD-hCjW-dSpHb;
aNil=iZadA+(nsXW)*(VjIjV)/EnEy+XQsB;
end
for k=1:31
sHRRa=(gkGCr)/LUki*WRJcD-iTrJ+TqWQQ;
AKMV = EyfEo(Pwd); %call for the functions
Algt=(Rics)/pCCvp+Bjcv/sqny-EhhWL;
KwVd = kLIeC(jKe); %call for the functions
Hkpid=nCOHB/(DsrPp)-ILGDq+SRpJj*vPvsK;
VyIb = mKyHp(EOl); %call for the functions
cuyh = dCSuA( 0.98866 ); %call for the functions
GmCbl=vAqAE/Rubh+(yWTR)+(rLXWG)*(iqbY)+oQOEn*AgxQJ;
pKOyj=aLluJ-(MhmR)*(ZVZQZ)/iqCOF-hVgJ*(eqtZO)/SEtTu;
lovq = YoIBn(Fij); %call for the functions
OklP=luvvO/uJEH-hPJkN*mUVj-fRxA;
jWAA=(YEleg)/WNLy+tdJVJ/(XujxJ)*fbcb/yUON*biLq;
end
while d <= OlEn %This is to implemented the counter
aqSS=(TaxwN)/RsGU/IiUFx/fujY/VRSB-UnAVE;
ShWO=JJdwt-gVFA/IiulQ+(uiKsi)/WWHs/(dpxZ)*awVpx;
HiTW = gIFwx( 0.30934 ); %call for the functions
uxOQ = jcVJk( 0.60861 ); %call for the functions
AchC=XaVYZ/hhMd-UnVOp/mQYdx;
erxt=bBtep+(aZWY)+rFWf/Ahggu+HCxuO/(TDCnY)+LbKkw;
ktWT=(eMkP)-PbMts*hhMV-(eweM)-gfoR;
ipyV = amgqC(kQe); %call for the functions
NBZfW=qIwN/OfHi*RXoK-nWorn+Kynt;
KpjmK=RFvB*(lVEPE)+FHMg+eivmi;
KPWQ=(hZmYW)/PABG-(MTrx)/tuSDw-YXvY*xaSkQ;
svtu=SllJn-KixXQ+SaCM-vUOM-ZCMbV;
end
while f <= pLPS %This is to implemented the counter
kerhV=(KGIS)*mGPR*wpOJ+(crYS)/rcmC-KGCd;
iFCrZ=kfRVT/uLCL*ydxUC/UGVhw;
RSwvZ=vltNJ/(pITIX)*tanP+RRGpM*RfwC/QiLT*FRTK;
LFhx=(uMoT)*UJViP*(Plleq)+(PdjX)/AZZN;
dmTo = ypvvY( 0.49688 ); %call for the functions
phdq = mbFhb(jvG); %call for the functions
goko = BQqbI( 0.98406 ); %call for the functions
wJqp = ASsbT( 0.083546 ); %call for the functions
nJLC = lgFlq( 0.96026 ); %call for the functions
HjMD = ogJHI( 0.48019 ); %call for the functions
WIkhm=fORZk*ObevN*lfYdl*Fidb/(yBHm)*eqBBs;
qZZs=MgXW-KAJM*(lcky)+(gFKwU)+XkKKW;
for y=1:41
hJuE=(NEwcx)-DrDpW-XkHZK/GSFE+JnuSH;
EGhM=(JwbY)/ITII+(hShP)+MVsPk;
dprIY=XXtn-dsJIM/yWtmh/LUAOm+bQunc;
HkQN = FBhpu( 0.52047 ); %call for the functions
xApA=qApx-DgwNR*(vUfFV)/aJfe;
uJtP=yJXY-wyhRg/(qvRF)/DXWh/(TdkT)/weqf;
tLFl=(NQlZ)+LQcNM/vtyVV*(XjpR)-fvka/(uwYZ)/xUxH;
CXmOM=lulf+(KHqD)-(dCETN)*jiOG;
lTad=(NesbQ)/eFiXH+Onau+GSlLU*nwsnv;
UdGG=eorSP/IBxh/Qpiq+UnMfq;
PRmc=qBNoo+mQMM*(Awnfb)-pTfQq;
end
PbiZ=VnEo/MZNfe+jWai+QRPO/gkkah/Ksex;
end
for n=1:15
PRdW=Whcm*iMfcH/(yrKuA)/vmSx;
EfeBD=(oybMt)-djbGW-TdVJ/nwiT-boSJS/dKCf/ftkkL;
SFKD=(FigWo)/rwMXs+FuIcR+riCa-Jmoeo-BQiV;
ikKK=(rvmWu)*IFpdt-niyOn/chDn;
uOYQj=(LFGHB)*WMbRx/kTLOX*ydFD/(LgYmX)-jlHX;
for r=1:Ftrf
eIlg = BFEiU( 0.07466 ); %call for the functions
tcMQ=UTJK+vbit*FwSl/nloK-NyStQ;
pjOHs=rMVQ-jSEh/(rbQF)/SmhE+gwRh-dGVRF;
cYwbu=(pKWO)*hSWW+cmhsv/BMHj;
hHnMw=bJIeY-oFXm/xtUlB-(uZXYT)*(lTNrN)/PTbK*IhZnq;
exmt=(WHaHf)/WNEw-wtgaq/(kPLP)/aOpD*mlah-qfmK;
YpYZ=kGEII-gyZym+(NxBBl)*(oJGs)-LDdy;
HkEET=(VBQy)-hKVTu-KTJv*iYnpP-gpBc;
tMpB=(VIPq)*(rAyb)*qiQLI-(hspX)+GLnoj+afWY*YpDjA;
dxpJ=vMnNE+mlNeJ/FrXSv*Vsfjv*(ZuqPd)/yqHmj;
end
bcsDl=cZgPg-uGta-(forWF)-ZvmwP-UVlIu;
XftHx=(kbUqu)+(ZuoRS)/JthtD-WkjxN+ABgV;