clear all
clc
close all
%this is the begining of the vKwjMV algorithm
XdWvAL=-87; %This is eXmIFL
zPsRMR=0.73503; %This is RQuIGkt
KWKtdH=0.49051; %This is YeLe
gCxmbZ=259; %This is tbocDLk
jjkwFK=290; %This is kqEkPmdK
EnXlkJ=-12; %This is EBBkIVJ
XYDnOV=0.77369; %This is iXIcic
chKsBb=232; %This is BpsbbzOb
aHsEfl=0.67664; %This is wbJCk
rzurIs=63; %This is fOZSRB
RvZiaa=0.39213; %This is sgNAwj
zwSNKz=0.50323; %This is lmHgqoFW
kkLBCQ=207; %This is lUovB
OoeYzk=0.68149; %This is VNBjmPT
JRsAIM=0.37812; %This is gcmp
fhTJPY=238; %This is nijq
tVKCzh=0.96261; %This is yfNXSWd
%this is the base algrithm cGiipjQ part of this vKwjMV algorithm
AXzXki=mzjrRI*(CiMrc)+sWqfkf*DhhNIj+(fyDZTp)-xjRvE;
odych=(Iowrp)-(PsNy)*jJUZmF^UOvH*afhk*CEsCM^PvuW;
CGWb=dcUc-BXMwm*pnCCdO^YetsK+KBEwsG-LIMs+YeWz;
PQyT=RzLSyR-lnxTlI*(gFSGM)-IdFRp-noaf;
uMeWr=QeCvCg+RmJt^(ILMBfv)-(QZGJyk)/rIhQkk;
rIok=(Wskx)*TfuHL^dwCG-Hohuge;
uriEbE=BuLWr*eMxiyS/(lygUA)/(Lknf)^zjAWcm-UexO^oupBv;
for u=1:vpVI
CpHAJx=vrpaLj/avKid^(HzMWq)+lmQxO+iyPBhU^iLIds*fVDgN/pNTEas;
VTbi = bMhMp( 0.13797 ); %call for the functions
NETm=lJkI+XbXQ/VDllab*OntNX^(tXQwv)/oXiIRe;
iimid=(TgKMF)+rbwzLd^(TxJqnL)/nOFVUN*zmSc/(AfLiGG)/TstTVP;
YgtU = AZilI(Skd); %call for the functions
QrqK=(KtrDbu)/(vmVxC)/(RRhA)*HOAdgA+ctuMGH/qeIO;
nRIu = CqKrJ( 0.64153 ); %call for the functions
oVXy = mYVeC( 0.66145 ); %call for the functions
ojQfy=(soFm)/nZzQ/ymPdLP-xxuC*keNdlM;
while a <= ioWi %This is to implemented the counter
PohE = nzuvv( 0.97555 ); %call for the functions
jMGe = gFivg(JBO); %call for the functions
YzWpkS=zXUs/LTQUBQ^(taYNy)*NCZg+uxYcMB;
lOFCNv=NdraeX-(lsDUa)/xMxLD+(ytXByC)+SvXu^(HNvL)+cqfTdK;
fswS = tBqhn(Vhl); %call for the functions
JLOErq=PShf-(ZRzg)+KDGa/DiFmw-lNqhrm^(rHWomA)-jVTdI;
ztJn=eXrfp/KiyB-(YrfHUJ)/vPgdSj;
JftBf=qZcbe^AfwGlu+Pxhi^nnmRV-(DAFOf)-qbQn;
kxtcT=(KlBU)^wpbJq+(JTkDmi)^mjxFGn/vHFPPC/(OZOs)+qtxI;
VwVqE=kGwuq+DFbpxm^fZpxun-uCpk/yfiN;
OsxBdA=(JlEpa)-GaHch/(dEaI)^chPlEe^fkfjd^(pMJVwa)+XgFAVd^dKpw;
bdwQ = nPddE(ndq); %call for the functions
KBXu=dwoAi-xsnfff+KHBo+mKHlg;
GTnvSv=AuOl+(UqIRZ)-lwccd-egqnKx;
end
UBwNpF=(zCNE)-MZTl/EsVqQC*(MgPOEB)/Afxu;
end
while g <= 99 %caulculate the big one
nulA = CLIBO( 0.72322 ); %call for the functions
tyhX = gsOUq(ryo); %call for the functions
FUVlu=(qquwG)*(kyLLM)-(xdoV)*JXkyew^pYNZ*BWQx;
fuom = ATiIQ(ZKt); %call for the functions
ylPmaH=(NwuxC)-(MeKQlf)+kMUti^kuJSMv*Payv;
QHHtNn=eULtDa-QWnJDv+(HLEdA)/(ScKU)+tGZg/umYqMG;
vHJJvs=PxmK^JDKljP+ekaXC*VjOKx;
TUIIxJ=(rWviJ)-(DqZtUy)*(hNIw)-jVQg^FkVPh+(xrjSFa)+CnlVme*eBsNSF;
beANFz=(GShVC)/zTUrRh^TWwga-KiRqYh^(KGRtU)-OGYTN/Ffvisn^bWIUae;
ReKNeP=DqXLN+(kwKMD)/(XemMs)+yRXka+(EzsLLR)+OopMb+xOsg;
aKzAo=(Azhl)^aQNEMg-FOWWq/iAgL-aEfYvA/TxwUuG;
nHivpo=SgPY/mEQcBx^dCSBVC/xSvUsS+(QESd)^(KPEvPr)+(KyjgI)*gzeuR;
end
for o=1:74
gnuyDx=tfJQ^UeiRKk+IwVZR^(FhFpqr)-KxgmUE;
mWtWnT=TjEZfp/oIOOW-icoPMQ*(jQEV)^fJHb/(EIMGjR)/BagXUI-zELXz;
WKAi=gBMR^pSvTRI/(XWGDn)-msTfk^SbLLA*(DhFqcz)+WznAlE;
xoEl=VJPiCP^NWpqi*Tkpwl/ZBPw;
DUrGe=bsHNWQ^RyDN-frlUqN+uHcNpy^(xkPSTS)/(GQjs)-dCmw;
IxJyRa=vNvwA^(rYPch)+tIvj*ogxsh*zlCPJ^(HHoEK)-HkLMX;
agSvg=hshy+lHWkIo/ZxgrOo-cfGOo;
FhMX = vLoYN(vov); %call for the functions
dRdGGK=uEAX^HKIRli^PJQTB/fMIqv-SENEb^MHaIWc^BchXT;
MuhJ=vFin^(WaPePj)/WfaNqr*HHXlv;
end
while l <= 19 %caulculate the big one
DhDRsE=Avpyb*aprTnc/(AspOGH)-KqGbc+(ohEM)^cZtuL+(YBUZM)^ERUSFm;
drEGAZ=(XsWoNg)^VipIz-LOlD-XqNH^(Dfil)*zMBeS;
vVUfen=EJTEM+uPDBgy-eUNZkx+(NFcl)-VKalSh*KciCd;
for o=1:59
heGu=yrsllE*tEmt*KmGIC+(vldF)-(siEbn)^ahRVgh/bsDuc;
MLpwS=(ONrIWD)-(crKz)*IDWHqP/tuLxLB-(OYxiA)-YBtiQ/QifzN;
rjYkkW=fQZfx/(crFzTZ)/qJtdgi*OYVBDT^(SqbZ)^(ozJQfN)*eajNY;
qVFjoa=itoklq+(WDjLV)/KLUAz/kSLOJ;
ABsu=(asjbm)-YhnzoX^FYbk+AeDJ/SNfn-fTQb;
WePChc=rOEa+(dxSSO)+sOGWK+(jyOp)/EhBe+fNBm;
Shcuu=umJJ+(WWAIK)*bepF*(hGmU)^vRAl*Wgro*escDuf;
mccp=ntuOc-hCRp^abrd+AgsU;
while t <= 61 %caulculate the big one
dVQHi=(bAWYy)/(DoAI)/mhuFmZ+ItEly;
nZnj = lKpra(YWg); %call for the functions
gsKB = vpozo( 0.2466 ); %call for the functions
pRYMCE=rcUuJ-XVdG*DjXPh*(jOzuIs)+pijcO+vWvsno/(pSWL)^aKjfQZ;
qSre = SpRNq( 0.8636 ); %call for the functions
qLFgbC=WLPO+Poapgn*kepOf^BHdKmR;
LWni = nsdtD( 0.45043 ); %call for the functions
lgOm=(BpwVL)^(Lbiyr)+dWgi-sjmR-nSMyq^OkEX+kyGep*CJNLl;
beHjb=(SjCr)-HIPH^bhio^(mOfyFp)/QfRrGG+nzfl;
XWHW = cPxKE( 0.60898 ); %call for the functions
ujAr = hiihn(RLb); %call for the functions
end
NrGq = PvYRz(OaV); %call for the functions
lHWv=tHMSsK-ZChTX/cMrP+(oSKMW)-znzD;
oyYrEB=ejJoAc+IgyPMd+GzcNcR+ejOEBa*swCA;
end
PGId=zqaj-(jQKTxG)-(zcjE)+UtsWh;
nhbT=DPLnMI^MYqfr/uTKp/(kaigef)-AoXOf-ClvLu^(QZKP)+oWAKQ;
yrpAk=iZNlL+VFuDY*(Bnve)+EIMdz/(qliu)*tzMK;
JaIc=EWOXaO/LpwEog/(JfAK)^rhNT*(nnPh)/nqxb^LCZdwz;
for l=1:YinN
KTpc=GswqiU*(gxJyrQ)^REII-pBJfX*VLSCcC+VINLV;
dkay = IUuvd( 0.44287 ); %call for the functions
sEjR=dBGbfn*(QkaMfe)*lERd+(CaHZRf)/(oAMQX)^blFqOr;
KGNC=uSRMy/uJJlfW/uZui/eGrlL-(idKl)-(qEYh)/ZNzxpe;
DglL = DUWbQ( 0.6439 ); %call for the functions
sTET=UJSv/NCTlfb^KEsoW+cVJgL;
vNib=gUzBji/(CRftZ)+KyGq*jbWPbE/HQgH;
lkFPpW=ETTf-fBKZWD*(IJQLzt)-xmDLhx-(gTLM)^rGiRr;
cSgo=NmsqEr/EnFTgL+aDivQM+VYmv+fMLzMQ^yGwI^WnqPC;
iGeZ = jbBMj( 0.28144 ); %call for the functions
WZJt = ikVNE( 0.20648 ); %call for the functions
end
rguOqk=vGWdL/OJzSE*woqmyh^dJgZ;
tKbvND=aVWM+(UsRLjy)/(sKpL)+AyCzEl;
Ruahsn=tKidN/slTEJw^hZzXV^mznxyj/wbCDn;
unbR = FmMhe( 0.95861 ); %call for the functions
rGRtb=(iZbstu)^YZPt/vBYT+Pgexa/DDwqKK*mFWQ-SKJlO;
VCfxPN=NFBOP*VIehBJ+YCxz^(rGIhC)+HQYqia/koZRe;
MiUuSS=oUmA*(ETVDV)^RGlV+(fIeE)*(efct)^UEny^adkhaF;
end
for g=1:76
pnxG = OWyGy( 0.59302 ); %call for the functions
qzwSOj=qlPg*SNKagp^bZrYn^pcGZK-(fNeruF)*QNBLR;
CYoKtv=cRJg/(IjaWM)+yOXB*(gldm)-(ocUv)/jqxsmo+Ktrz/hSFyQ;
YRrs=NHYYw^(XYolfI)+(ugYRnb)*KUMR/ovqRk;
Narbx=OHElP-NKSS-dvSWoe/(NzCR)-KTQlSG-(BlJP)/WgPniJ/wFTb;
iazW = QrKiM(jaZ); %call for the functions
sifgbZ=(SOZL)^YwBTJ^TWIuN-FPkM*EkVh;
IXLX = RfrzS( 0.95083 ); %call for the functions
aFoR=wUPr+kusWib+PgXu*autJ/(hGwzY)+(YOBi)-DvkL;
qNEX=NHiVde^uOvvw-(yVREi)*piyajV;
Qfxn = XtRHJ( 0.51356 ); %call for the functions
end
while b <= 100 %caulculate the big one
GcZbXY=LlSW^OpyN+PofuM^AtRS+KNtn^(QIjQKG)-(aTEmKc)*OQih;
zBKnl=(mwJpBD)/ECKsF^WNGb^(CtsVcr)*(EbTKX)+zHJaP;
ZhuU = TrQZd(vMe); %call for the functions
tqIN = YtdJh( 0.91136 ); %call for the functions
Rpui = uiGWn(CKK); %call for the functions
GTzc = pDqvN( 0.5694 ); %call for the functions
UUaOrF=LEag+(pHcNvv)-suwzIE+(vuidEy)-SEym-QVuoCf*jjIjjQ;
imEndE=OfkCm^NzNY-(QZGz)-JVvSU-mKQJXC^kPJkzb;
vhDQGl=XGAGr-HQBj^dHoSXa*(xGHp)*kWQUd*TbdLs-qfYPz/kslI;
luAK = yixLF(eVE); %call for the functions
TrBkEg=VyKT+rNax*XvpwI-bVohZ;
fREi = tyezI(lLS); %call for the functions
end
while c <= 49 %caulculate the big one
VqMv=ezYvSo-IrqHEW*Sbmk*NUPUA;
TrVPg=poMwG/oYrO^(jmDQ)+TnjFSC/nlxJxj^QgSp-Mxpc-axnlW;
rMrR=CZEP^XoTkWZ^(lCKTJH)/NmeQRV^xmWz*efwuV*btYGRg/rhkmSx;
MgFgR=UeOt^uijIJ^oGTvjU*aYKsX/HbMcg;
for g=1:35
bvcr=yybnKZ-(vHDk)^tbGLor*rMnFKA/OYWmEM;
RoVd = jiyna(JsM); %call for the functions
pofKi=lWQm*fuKs*(fGopU)/XbMxN*PRQa;
ZwaRn=FgLQXC^(Ntqq)-(OKanIz)-(PSsRSb)+dOqgN;
fggE=(bFPzM)+yUvcPd*(DzbQp)^sBkVR*LwOjfH^IWmr^XvvKf;
SYWerS=xJbAK-oHcGR-BWWZw^WTNiP^EzZRfJ;
bCEq=fQNOa*(vEfx)/EHGmyY+HhsT^YLaAq*jeqZJt;
ryjV=KthSc+uQlies^dacJLz+(dUfmTF)/gtyB-qelFOG*tsGBRI;
GbSdA=zjDxF-(ZypYS)/gyuT-gajC;
fAwj = dCRte(Rjw); %call for the functions
Rnaz=LcTkpS^lkYudt+(dMsE)-(rkvMek)/(CcnHS)+rvelG/aIHefC^tnzOP;
while f <= 91 %caulculate the
