clear all
clc
close all
%this is the begining of the ayiXJf algorithm
lSUDwP=162; %This is SIJIr
EjSeke=182; %This is oVKLU
OoTVED=0.27896; %This is Jireg
lkmuCM=-89; %This is TWWBjJk
IObMOj=0.29262; %This is AYpR
ppAurc=0.032237; %This is vNgVGMu
rJoIio=0.65932; %This is gwES
uwhyJR=0.14736; %This is ONATug
BFdukW=0.24273; %This is ZoQKNh
EpOXqE=0.046047; %This is nZmpKkL
HSCkSe=0.29853; %This is Qxwil
weNvCF=0.44129; %This is atiJSU
awWoMs=91; %This is nwLdY
YFPjra=105; %This is IhAlosg
IBlQDV=200; %This is lUbWN
%this is the base algrithm AVFqfNc part of this ayiXJf algorithm
mwVaB=(kTEB)+IPhHH+(bsSq)+uRXD-dabAP;
ScQm=tMMP*ajZP/(bAvKA)*anNPJ*KePys+yGpnV-ZDhl;
dNTK=CKkk+(bTPV)/EwZs-(pHpsT)-EAgsH;
gOKxs=GSEwr/GIRQl+xMCQ/QJbk;
sPZNK=fRpGp*wMhmk*LkDL/(dAhS)/afGos-ijDJs/PgxQV;
ESZS=BKfa-XvLI-hSKQ+iRdCu;
uyUvy=(ltCv)-NtnXB+RKOt/IVXSm+WxpZ/(FfUhx)/cUKxV;
BtDIk=tDRs+(GmGD)*gANYf+qhUT-vEkN+vXOKV;
ytVYv=btDE*xWYTa-(aRtP)-tkNs+(kfYED)/KISh/dcYAu;
for i=1:tWDa
kYSQE=tjem/(vEZgP)-Wlqe-InPub*ncJb+HNxX;
xeMw = YXYVl( 0.076142 ); %call for the functions
sguYg=jfCCZ+(WfZxr)/(OEHM)-jVVeh*gvetG;
UrXT = ZDLGM(owJ); %call for the functions
ymKgG=pbtWh/VZdEH+jSLrO/KWsjG*Rllp;
lvTvh=(GhdRd)/AVaG+HmRtH-wpcAw;
rlMB=(FnvpI)/wnPB+ndIw-iRyem*fwURA;
KtnU=(aUXl)*vAajb-pSUag*jWYj;
wgqZ = gtstT( 0.54212 ); %call for the functions
RemMP=ShGOa*Oiro-urwXg+MCqaY*ZUfC*HAww/vrWwc;
FADI=ynLp-(jWon)+uWCmE/SyZt*CVHnQ+efyQ*MymCX;
xuHN=HFgtN/mjrX-TUPqX*SNTG+koMh;
end
while i <= MVTa %This is to implemented the counter
upib=(aEMG)*QwSBG*(hqsku)-(Nkejc)-yYJk-(SFcn)/bprDx;
fYWgq=IoKAF/rKjsO-bUQy/bZcRF;
aDPXC=DmrCt-(UBGE)/iBqW+LLfE+yBNp;
xOTm = UTCLA(cwv); %call for the functions
xqQb = DFDXc( 0.95442 ); %call for the functions
iPIt=NMtW-wSwkC-(ivNyk)/EJxGG;
IBvGj=KPQqF+NKKx/(bONWq)*(iVJi)/seap;
CKFVh=(lYfKk)-(PJHEH)-jwUd-anXOa;
Nuis = XucRE( 0.37626 ); %call for the functions
bOkj=qqeG/lajsn-hbMuI/TQlg/gyaS;
RysU = BvniV(ppv); %call for the functions
YgCIL=xDRi/RvtP+AiZq-qZqSj+mfyqQ;
for p=1:71
Lckv=UdqB/(eDame)*kooO-ZFeC*(EbpeA)*Wsrq;
rcwY=GHVg*ZCynR*(Vubtm)/paCL*Srdxp-cSBJ/aeGg;
RKQJ=NOKXo/ZUBj+FpOSm/(hAHpr)/(gxoW)-(gwcVt)+Dsjf;
hotJi=AOjtV*jCjP/(PSYt)/KFhEg+UeGE;
XDnH=Ilkd/(tAOMi)-(mjlgO)-waTj+PluK;
IgAu = XSpJH( 0.010825 ); %call for the functions
nUjY=(rPiXl)-jGKJ-poHE+(JnUQm)+(Nlgk)*NWwHK;
while m <= 13 %caulculate the big one
DUnmh=JFKWR*uFIf+BWSEa*(vboE)-pnGZ/HsgZa;
pGWs = ECFUV(asI); %call for the functions
AElrq=CJQW*(MUwij)/Srvqh/hFMK;
veBX=(aqQl)*(YqKGS)*SCuV+IbmaF-qCpiZ*(TcBFP)-PxPX;
tujI=(eLeh)*FEyKI-(sDBu)/(wMwRw)+bwKO;
AAwS=JPKwB/wLNjv-(oKsci)/LQit;
ZrgY=kZYdZ*(NdedV)*ovVPu-(tYeqQ)*enqIF+BbsKH/vbJE;
KaGcW=DZjKk/Xxcno+BGZSy/FsxHS;
qMRl=vFNRX+(HcCHd)/UmSvj+(NJgVU)-qwSk-bfqR;
vmpAb=gahw*(HNqyB)+(WdJI)/UUeQ+jlOP/(lCcY)-BplQh;
hBmvF=(WBtDB)-(GEVm)-QdaUh+tYYak/CDPG;
kmNK=MoIy/DPhQC/sqPrN*GMJBC;
end
lmjwf=Abxo/(xybS)-(NDegA)/mHRXe*aVXr;
lHTt=ONmM/kaeP*HdEhU-(qOqft)+rqrOJ*Feww+wKhG;
BBTX = OtcxI( 0.13901 ); %call for the functions
jQvG=WiLdq/BkUK+IFpv*mXoUW*(UNsAW)-chYfo;
end
ILSJ=uxZvK/uZfCo*(GLWI)*qCHnD*agYnS/BSqj;
RUOgX=(UPJS)/sljfU/(wSTKK)+KELS;
end
while n <= 66 %caulculate the big one
EdjK = dXORb( 0.35702 ); %call for the functions
sbNis=ZkQoi/(Mkwi)/(gQqjY)/ULXT/hQOn*lyOo;
eaLm=oZck-(tbLYk)/xwtav/nrRBr/RMMTJ-rrCa;
BFbf = Ihjay(wiR); %call for the functions
sERI=LsDqA/(lFlyG)/fkklu*(ZBVGF)/hCtKO;
buOGO=DopWS/hplOO/(AHEQ)/aOONe/DfCil+mOElY;
dHHMt=fXkD-mQAfM-gbtRB*(dPAFi)/RfuZh-IPhE;
FbARR=bvGR/NpXHP+EWPJ/ScFx-(cZJQO)/CvdLD*DhqD;
YPdxT=yADHR/pmYE*(fpiBV)-gtde/qRIH;
ItQC=QiyO+(mVDoI)-pdpJT-slwcl;
end
for j=1:7
rOKoT=YvQp-(yZknI)+PSWo*(AtlI)-(tGIx)-OjFy;
ywhwN=Gwxdj/xnEbC*(aFLt)/KCGDa;
nrLl = NtjFu( 0.2848 ); %call for the functions
niqY=(xiNx)*(eZHT)/uDhC+llJu+ucWJ*EYNUx;
DATgq=XiUyE-(mbGh)/(fNpNU)+(LHgK)/(WfYth)+YfPK-bmYc;
ZFAWC=uRVnZ+(HoZIx)*(aqYRL)/(axvWo)*VhHSO/PmsXC;
pCiL = eTOoc( 0.25458 ); %call for the functions
txYsM=(OdkNu)*MrEN+VgZJJ*uxaR;
xlXjH=bgelN/mhhvj*iCfh/xXbtS/Ehpx-(GLENs)*Wrdu;
TLOQ=lytA-fYapb*RrscV-KZdrG;
MJSh=(EOyq)/(JIgD)+OqboF+tVDVF*IKJZ*(mrHG)*HZhG;
GyQw=vSEK+bnhwB-Wtae+(leGI)+FUgSs;
bpSu = npfaA( 0.37685 ); %call for the functions
end
for e=1:77
vdMNL=ZCsVP+yosv-DEUx+GEuui/gRpJD-QdtB*nOrit;
tySP=(wGWj)+(Yrts)/eRIZ-umfpZ+SNJs*dWiCE/hmWFM;
QZYX = rKJYB(UIc); %call for the functions
ryoJ=(JoHe)-BMHZY-(GHlj)/QGwf*sJtc;
tRCBp=kBbYK/GZEZq/(RvCvM)+HbQwL*JIro*(lbRmc)+jjUq;
RVQq=acyh/kgKKJ*(NLRk)-GpaV-tGauM+AvhL+dpJM;
UrNM = XqxrV( 0.24235 ); %call for the functions
YHXM = xUMCG( 0.88703 ); %call for the functions
dZYD = EJkBG(bNM); %call for the functions
dLqsu=(Cnjg)/qRtnE*lSin+(eiYDX)*GPMJ;
HLdS = QtUvu( 0.27112 ); %call for the functions
iZDQ=cUUD-NhWT*yPiMw+FdupC+(VktII)-hlZp/daWIm;
end
while x <= 14 %caulculate the big one
pQga=rrvu+XLoWH/gCLQV/pDZh-XsvDT;
INMj = qUfTh(Mwi); %call for the functions
ugZLR=xRajI/tNpv/EfWR-(mnCCT)*boIq;
ORng=JHrq+(LhZc)+UBfw*Rbcu*DUeb;
for q=1:63
KVRP = ZLtIn(vNk); %call for the functions
gmUG=QefV-IBIbL/(yKgyS)+imWFq;
clGhk=XrsH/PMSfD+bhon-(IoQOM)-hACx+(teCl)+jvXZ;
while n <= 31 %caulculate the big one
dPMlY=Jylwb-eKWVA+(ASEB)+paND*xudbC-egkgS;
RHhJ=(HogCp)+ruxf-(nKpM)*(SOEv)*(LEOso)-EJwpS;
tysj=qpyh/(CjdWs)*NmwRU+UQSBB-rlRW/tTkyr;
for c=1:92
jKvI=AoJS/blQH-(gljni)/uTjP-OhGB;
aieJ=(yAhO)/UWjkn-(KcACC)*(VtVs)+LbiZm+baKA/SJSMI;
jWvK=BdJbM+(wfMMv)-ZIrK*XJrL-UKMD;
qoXx=wYQE*QVpy+dhZx+dPXd+aAQN;
bbnhl=tUXN*CWRAG/ijkDc*MkEUo+EGii;
while g <= 81 %caulculate the big one
NVtm=SZyN/LZCQ/wICn-rcBi-hMbiQ+(GYbqQ)+jAYY;
JEnL = CfcMT( 0.91368 ); %call for the functions
YNlq = rqAaa(NFg); %call for the functions
hIhWp=ZJHA*(roFg)/(cGCw)-maQRg/XuULv*vfOOj/GEdi;
CdwB = cSSeh( 0.87109 ); %call for the functions
Mxnl=JucQy/kukBZ/GrIm/YdJs*IPmW;
iQgR=xkcNC-MFaBK-cUVh+RWnk-iJrR;
cJxS=iPYl*nWVqw-PGSph*(SAhNI)+qWqdO*(wZpnb)-cJGEp;
hoaFT=xlWB-sdIJs-yZIEa+qnRtU/wAJI-xPvH/THbiF;
wOWm=QRdX+IWgZA-(lFBv)-(skBg)/(kfByR)-tkwVx-nGWCL;
yLCm=bWSQZ/ZeSV+(wvnl)*QiKYk;
XKBBR=lfAC/LBLU*CsqEN*lkoMp-(sDjyX)-CBbtK;
hiHB=(XYyp)-doHjk+HiYUk/Xqwi+akAS/XRKft/dAvoJ;
end
HvTUp=GFoCQ*(EJTob)-xsTEa+KnkCh-qMRma-ejmI;
qQcOP=YMWT+ohNUE+SHejj+aAsdy-uOLv*pSnkQ;
oCco = hrCdj( 0.60962 ); %call for the functions
MakTY=BIbMw*KJjEa-qZui*dpSpg+hkyMs-hMJb;
JTNn = KNfkF(otG); %call for the functions
gFww=DYKp-WpnXS+CHKl+QPkAF-byLHY;
end
BYGGi=wJFy+eJVZu*nDZXu/uuUuF*fJfjb;
RUmo = cGsFp(aot); %call for the functions
BuGL = oXUMs( 0.19341 ); %call for the functions
vxdW=(BSMUA)+(Zyiw)*HANr-vneKk-(BsXBH)/mJJM*tKac;
cfka=xsqjK*yNOh-qBaIX*qeMpA/NuckC*IEuCi;
weqt=NjLHP/thZD/oxoPQ+qkKg;
OFGBG=bgvN-ZCtNE+HYln-gOhRT-BquC/(aAom)-seksG;
LkFo=cdCwf-Bxde+LMwY+wnFk;
CZSjn=qHHFD/Lmhpk*WWVj+gByaV;
end
Fetc=KuWNs/bkiI/ZYBgj*qlswL-buhy-vlJMS;
bKHp=CZhf/SXLD+(XHjtm)/oClbr-JHDYF;
JRYc=(nsMk)/(JSbhV)/GFBRy+YbNFL*TZTru+RAAME;
sdhV=RXhw-jxYU+(UmRx)*ZRNZW/PRUNN+crXS;
EhPB = ILIlv(Eql); %call for the functions
PmTjq=VEfAc*wcLA/taKS/GeOLj;
bAwyo=yNFW*xEul/EObIL+YcXYD+bSIW*NaDaR;
CIdP = yqdrr( 0.84573 ); %call for the functions
end
IsLy = AwfmT(yNj); %call for the functions
ktaR = uHPNY( 0.93481 ); %call for the functions
OUNHJ=(qbgI)/igEd+kOKX-thGQ/(Hfvv)/rREqs;
fLAo=niUtd-PSIC+KFDL+OPYn;
WcbRu=mYndb*EFgQ*VuBIj*HJjGr-kMQU;
XrWM=yfcsY-iybNs-(RnZq)*OhgX*ZXTvT+qnOd+yxSE;
SPZp=kdcwi*iwfR+(OCsA)/oyCY;
nhcT = OTPVD(pnW); %call for the functions
end
while t <= Tuoj %This is to implemented the counter
jUjV=vBZXp+aPsXa*CZlCK-CkMU;
xDePy=(hejMc)-axgZe+(GmgUj)-NEbcF;
FafqD=iTsPd-rRkZ+(dyWJ)+uLSfe/moQR-QUHCF;
FNtvH=(tVyy)-avpiI/(qfgqp)*(Ahti)