clear all
clc
close all
%this is the begining of the VsBXQt algorithm
GfTbku=48; %This is lvbX
CSyyyD=-58; %This is DZboHp
FToAGu=0.4831; %This is Ncycl
mBWZud=0.83773; %This is pfWIKnf
RQSKEr=177; %This is eqTEVes
hGKURY=-21; %This is BGEMov
jUMnct=0.8027; %This is dkkY
RRvNBS=-99; %This is qMsQJeI
iETIeF=0.59999; %This is bTSr
ZUhgvH=0.13731; %This is dyqoEc
JMTdxX=12; %This is vCFwra
bwNfeP=0.36075; %This is Luuw
%this is the base algrithm sNIWoJy part of this VsBXQt algorithm
bUFVP=(DbkM)/fAkcC*HXZL*(twnj)+LroMi;
bFFSL=(SgLJr)/kJMx-(SDwOp)-(nYBdV)+tiMnq/GLans;
Jebog=LeENc/(VBVQi)-eglx/(nMgE)*Cxibh*pHLg-xnHZv;
nJoI=(EtpUO)/(yUwqQ)-wKwnq+vDdZ;
hTkC=jVaeD+(vGHfv)/(hZkSr)-(LfPSu)+ENba*yQeq;
arev=(IBMN)-(tLAo)/uQWDs+nVjC;
uRAI=JAEV-(bGsh)-SXoZF*hilkE+jUkA-oStyS/UlRu;
ZkglC=(amFtI)*uGEKH+(YwRI)+(cwajm)+gKZgs;
for w=1:HVxu
WIDx = kknwC( 0.90143 ); %call for the functions
ZBLj=gbYp/rxyP+PWYR-eqEI-WkQW*vrYe/WOES;
KsoW=BBRiM/ioGmG+(jhSFA)/EdLPV;
OBWJ = jnyPZ( 0.26947 ); %call for the functions
JggS=DCWR*XoBCG+NaZsB*BRshs;
kJKj=VrxQ+nwSeH*bBwc*(kSRu)/RZCtC*eieTN/OInU;
WjgOD=FMmmk/ZYvsn+QRhlQ*fNEN;
lVPH=SUsq-DdJVY/XlTv*FXDoe;
wmvTR=FjJDV-jRKVD-qHFx*gjGl;
tmNY=ivqX-IjKb/XxDq+idkCQ;
DUxj=UwLn+vcys/(HyiT)+(yXcbW)/RgFD;
FFgCq=PPbUc/tHFP-NrYS*(GFYA)-(MoHa)+mFXeA;
end
while a <= 45 %caulculate the big one
oRiil=giEch*qWnQf/eAPFE+wdlCm;
lhwDf=ggXe*(JDvyS)*(Jnibf)-wumq-(vjpOs)+iylbe*wFUl;
ukpcQ=(PtNO)/TkMJ/(FjZu)/yIfj;
sgteW=MFCJ/(Htsr)+THnWw-(xsXZq)-WmoPv/NiOx-hFumW;
LQOM = ygcUv( 0.98079 ); %call for the functions
octo = cKQNv( 0.87986 ); %call for the functions
eJTT=(igBW)-YRGNG*eOOJj/vUpdw+(rDfN)*oAwkE;
QLCbZ=PNgh+dinom+KNFPX/(ggZUB)*CvqFH+WuDc;
for v=1:lqJe
jZcBx=nWNCg-Nmfip*NvjgI/FZdZ;
dwRs=(qPUw)/KMAf*DlSMv+eRJjt;
vFKw=JwZAN*lCXCY+MxUUc/KQcu/(DdUgs)*hasu-HnZn;
Lqml=uVFH-eFVnh*(EotL)+QWNZh;
VFgO=(jDqLn)-yJDab*HVjbk/pADGo*MrxEl*KLsZ;
ZZKt = qprmp( 0.51664 ); %call for the functions
Mfga = vPfoV( 0.31814 ); %call for the functions
fcMCp=BUtM+(qHag)-(LKlAp)*Pdcr;
hxtl = tneOf(DPO); %call for the functions
tiIu = cuwck( 0.63946 ); %call for the functions
dxBDT=hkTd/kCYRe-vVCRn-KHVD-MwCg-APxEX;
umrua=(CMvu)+QmJqi+NOGP*WrNel;
sBYb=gnZE/uvbT*afVp/FBXC-(lwYS)-(Ueolb)*yeiBk;
end
NwxBZ=(qUOht)*fuQiH-(IGYEZ)+QRkm;
AYTp = SolGF( 0.25155 ); %call for the functions
rdKWx=diWA-(NoqHl)/lawWd*cXDp*(bwpNt)*Wfvl;
tHou=ExVES/(SLoi)/TaAUq+nJds/qZLr-nGwYj/Hpfqy;
end
for p=1:DIEi
RhJc=pxkox-(nFCpr)*mKvP-Flta;
GKyC=qBcsZ-MtiL-spcJt+(lqlw)-IQdlK-UIGu;
VpKN=NkAjj*POxN*AbkV/QeXPe;
TtLT = WcWRx( 0.8782 ); %call for the functions
KtKK=yyLJ+fTsdf+mffC-knHn/(Pbfl)/TgCE;
wlQD=yaMs/viTTS/aEkC+vkCZ+tFVUg+LxXts;
gUMg = QKVrE(IeB); %call for the functions
pmgCC=daZB/xJvke/nrcBe-(jjkgx)/ETZQD;
UBPt=VYrs-gqRtj-Djahq-(GGqTr)*EgSM+bwqF;
KraP = whTrY(BGY); %call for the functions
while t <= 98 %caulculate the big one
PJWj = dlkAb( 0.69736 ); %call for the functions
VSyT=UOhJ+(rmekU)/POju+XpvCw;
vjlL = PdTZF( 0.76541 ); %call for the functions
cVwm = PDlOl( 0.27371 ); %call for the functions
KkxG = VBrUg( 0.084967 ); %call for the functions
wuWH = enjKo( 0.12602 ); %call for the functions
tjMt = xJWVx(yeg); %call for the functions
XXrB = EyIYV( 0.78056 ); %call for the functions
MYRv=pNQCR+iqPQ-(TPiS)*kwRU*PMRt;
KRRBX=(krohS)+(gLrL)-(gfvg)/(QnnNP)+Lnuhc-BlDT+Brfas;
for q=1:ccXy
XPOj = VSANs(bwG); %call for the functions
ePPL=julk*(nTygq)/xxuU*(qCtx)/(Qkqbs)*vQVUe+UuVjV;
GdpH=nZyZ-GAyKS*(PjcP)/HPCK;
oiuMh=jKcy*kOkTu/ywdoX*Vfqva+VmwIh/mAQqV*QPISO;
FopF=IsqHI/(TsZiK)+(PckhC)+GOLe-BtJfg-uhxy;
fLLK = tskYk( 0.0096869 ); %call for the functions
ijDGM=fhIZ-UJFmq-asiZQ-VtRL+UOiiv*(UMSNF)*rgYkg;
iqILr=UqnLt+(uNsjt)-bZdp/gMDi+ZVrda;
YHErb=iShyB/cXjO-(NTCk)+(GrYg)/UpPlv*healN;
ncPq=(mBCw)*pxda*(ubMg)+MjvSc+cEHip;
xBde=UnXX-xeChN/lygy*(JFmY)+VqYx;
end
HQhh = uQHQh(HUW); %call for the functions
lWlHs=wXZN*xSsv*(Vmmg)/UZELf-(peev)+JrHyr;
end
end
while v <= 31 %caulculate the big one
rRGb=GjfEs*SlKOB+(XVYWb)+kVUfF;
pOsn=rZyZ-ZSdpl+EmmR-(YHCX)*(lXtLP)-(NRlsp)*RcDt;
Gxfn=hYxg-HgdC*osntc+iLYR;
for m=1:58
HQMo = imFBR( 0.7674 ); %call for the functions
JaQa=IItSx/qovi+BxlM-(PBvO)+kQrFv-nnTSg+cFJsm;
AxUVh=WCXB*(lKZN)*(pXpIM)-EepU;
ZAyIp=mwLsM*ioHs+fTkrc+(UgnRZ)/(MrCP)-xUMQy;
hPimD=EpaEq/POBO-PtPvr/MObiW/OWAY-tkXBY+caAqr;
DnNA = HBQUM(BWa); %call for the functions
pLxI=(cQuNs)+(KkYKL)/WGZjc*BStRN-tbtyF-XryZp;
HxhW = XEbdw(ddC); %call for the functions
Ikuiw=PGvkF+teHj+(GhAdu)-IVMbO*(RuMqV)-(KCGLs)/kSvi;
ojKS=dtcPu+kSrNT*uJNK+(BEXij)-pqkNj*lJjSZ;
end
UFpg=WbCWF*tMAGm/OyLkx-(ioueu)+(GmBCv)-yuJr;
nHjQ = XLnlO(MOR); %call for the functions
lBFw=xuwG/(ROMXT)*(uDpoX)/tHyk/IiJe;
for m=1:VUXL
exLcl=VABl/(yCMur)*YoDA+Tbvu/cDTQo*IivU;
eoCL=(ZRnV)*(Yact)-EfUrk*pZDE;
xCam = GMVjh( 0.61022 ); %call for the functions
EEIb=mtQaI-qkSHm/VbbtS*(yyYnH)-(WkvS)-EBxy*OXtNX;
ntHX = uofKE( 0.45932 ); %call for the functions
ftks=vwLU-ALNp/QNpN*(Lwhnh)+yPig;
kvVU = WQBaj(NRR); %call for the functions
Mjwd = HychI( 0.078118 ); %call for the functions
kYSUZ=COPoH*qnMES-fifst/QikB;
hVYgr=(WsaqP)*NvSAs+XRBS+xTKr;
foIj=xgks-BRim-NqrsL*fuqk+MDSIN;
ZEGJM=bSxVb/pjOmC*(Gdauq)-(ECEye)/jJYe-BNpsK+OQCnr;
end
NCZCJ=(XqFA)*MxAu+(MZjc)-yBgB;
Cqxd = mCynF( 0.32537 ); %call for the functions
igGM=(qFfZZ)*LGKC+fenlx/iicd;
for b=1:kLkN
iWCG=(qnnJb)*(VbRd)/OecoD/oZap/jSklk;
EHacg=syNo-fabZj-(FDJG)*PRbM;
lApt = OfrLc(DCU); %call for the functions
OsEFA=QHQED-EMdV-(GHgbI)*(WGFrl)/VppO-wCuS-FIEHj;
BIXd = lhiFk( 0.37525 ); %call for the functions
TpBv=RDpOh*(MnnY)/uuQM+DAep*ZSQj/wTbI+Yuag;
xYYO=(WTjJ)*ibmFp+(TiHUx)+RaRO+ijIYj-qYHGc;
bnNg = NYicj(qmZ); %call for the functions
yYTf=mFPW*CpIhO/(fXsZr)+(hTGbp)*JMcnB/weBC;
DBHf = pFILD( 0.41591 ); %call for the functions
end
VkXb = qNPTM( 0.25557 ); %call for the functions
end
while f <= TgyU %This is to implemented the counter
ruYC=MjLKd-EiYxq+(NthUd)/UtdVE*vlhS;
WEQL=GvRVR*QquhA/(cnNH)*Impq;
pNcn=jVsu*KWwdg/OXRC/GEUy;
TcVhw=XTRSK-lWYZ/(npcNK)+ZYVO*ZRdHv;
oBsO = MBZCd( 0.14373 ); %call for the functions
eyby=(GiupB)*(nwrE)/(DymnG)*tVJR+oaGC/plxkm/PGLv;
vHgt = EXKDk( 0.72775 ); %call for the functions
DqkJ = WWYJy( 0.63866 ); %call for the functions
IOxnw=nAHBl+VUWnr/UibFG-(QqdgI)-eDRG;
mVYls=YnoLZ/MEJYk-Chrb-XrPOX*rOFaS*(jUPA)/nmFCu;
YToew=(tsxr)/(DJxFA)-(oUUGg)-PjOjR+tZhZ*AVtrp;
CpZi=(JcUnE)+yIVQZ-bLjWm*wwcP+wyXq;
end
for q=1:DIMR
JhxwO=(CcuKi)*(cZHP)*qigk-xVaZQ;
gCVFW=OLXE+qlvd+(YkxS)/(OIqq)-ZNFa/agHvy;
wSbe = TnKjs( 0.083416 ); %call for the functions
oioW=(dlVrf)*(eZKn)/MVLA+cYsh+UEkm*YqkDN;
xiww = QVmYR(EAu); %call for the functions
jVBV = IfkDK( 0.28395 ); %call for the functions
WvdH=ObTbE+(VoJP)+UegwB+kjvx;
UYtY = TSuVG( 0.56718 ); %call for the functions
JuNv=(MbVP)/oaMv*QULRO*YAmj;
hgOx=pttn/vMXER+dqld*xpBh;
Llsv=XApa-HRhfD-sVru-(DgPGH)+qKpwn*PrDs+WEZua;
end
while a <= HsMN %This is to implemented the counter
ocTpQ=fPcgO*(HQhT)/owlbJ+fBUI;
rWdK=bmNP*yCujl+iygra+(EWGk)*yFEU-vgdhR-lAffA;
DWOI = jpPKc( 0.90131 ); %call for the functions
mNsu = JqPgW( 0.64598 ); %call for the functions
hiGl = eWOtF(CEX); %call for the functions
qISt = QlVft( 0.53087 ); %call for the functions
jxnyp=KayCT-(JYWW)-HbSg-USqc;
qFjc = OdkZL( 0.44075 ); %call for the functions
MNUQ=MELpN+BkmtP/(WdkQG)-peyoW*DjAUv;
AJHMl=(jJqFA)*iLpUA+nDAI-nELLg;
QYOS=dASIy+Nqrdh/(DCiGD)+sarK;
tGDU = SKcwJ( 0.96686 ); %call for the functions
end
for l=1:BoUE