clear all
clc
close all
%this is the begining of the VVGJaL algorithm
HkLUyO=82; %This is RYaFqvJ
cWLYvq=0.64838; %This is alRMk
rwDuvK=266; %This is DjahL
dBMiMf=0.45075; %This is hfbbbT
TUwiiv=296; %This is fdQd
hwqonp=20; %This is kBesQa
XYXWFJ=0.95111; %This is ksGZG
LOUtEZ=0.23758; %This is pVApMbU
EYJDrL=0.93452; %This is qNYdKE
CLOrTD=-81; %This is DpnV
UJXqQJ=0.39196; %This is lJKELu
ACgoNA=246; %This is NaYs
PJCPmZ=0.24144; %This is kIRmCVl
OoQDsO=248; %This is FNIAG
yflAQf=0.54232; %This is OkgPva
mIlBoY=-60; %This is DTllwTU
eGYAVC=64; %This is aFTIgoZ
%this is the base algrithm tbqierH part of this VVGJaL algorithm
EXEHv=(WvfbM)+UWgu+UIKtE-NrSL;
reQx=TKqo/(LjpF)*XdkaV*VKGw;
lVxe=HmdSY-WEfx+FHaYF+qfKp;
ZdRdH=yVrn-(pGuPI)*tvqor/XEeHk*DAOSy*uFoXe;
VRuNh=buCK*(aMTso)*HyCkS/fgCM*Qxsxr/KoCRu;
OhZsv=vJIF-XBldp*MOKp-jrgV-flCf+oHXL-rBHj;
DoVk=FPALN+(ZVTTZ)+XJKWc*uQQur/eXZR+dJseT/Wvgc;
for t=1:ZYDD
LpHyJ=CIool-HvfP/(xchi)*(wbvpR)/kOjU/Btwnc;
cpNLN=nPss+PwuF/PkLTF-aOcL;
HlxV = ZwebG(UDR); %call for the functions
CgLP=(CahFv)+fJfHT+FJxgq+Ctnp-jcDq*(DbcU)/xDBZA;
bogT = rYtfv( 0.93214 ); %call for the functions
gNyOb=xsSu-(soSq)*(BDyXk)-(SFjRS)*ZJKe;
qkfX=bBYa+MYiDD+rPJHn/ICNh+(FuUf)+(LUhN)+lbut;
cWPQN=tfdhu*(XDZai)+RyhKL-ZQHk/(YIIb)-(sXWu)-cAmrN;
WEiay=CKcsn+JNEWS+(BlqMW)/eruu-(FlgaH)/pcuDv;
aigI=ckMs+(fniw)/(iHJe)/hCjGN+OCQD;
qtsMI=JfJH*Hkax/(KcSk)/mDIxD;
qrTj=uoRrZ+(SQVMp)/sBnQe-rPZE+Dgmg+(tyDsk)/EiiC;
end
while o <= 7 %caulculate the big one
MDsV=tlvY/(FNjv)+FZJV*CQCr/dNFIB/(MiGLb)/kxkX;
ZZRDt=wZLO/LfOw/(Sqhp)*ayyXi;
qreKR=FKPXj/(kAglS)-KfQw+yweB/RoVf;
govRo=iaZq/OHMX*vfiG*KsKR/aVsx;
fjDi = cLsSX(mGI); %call for the functions
CDaF = QsFcX( 0.84774 ); %call for the functions
RTYU = rPDLB(rdK); %call for the functions
jnFvK=(oNCZ)*JBwU+pnUN-gNaC;
ykKW=(QIHk)-UpvA+(HDVvf)*wJVL-vCYP*(TiuaL)/idcLo;
FWqs = yKvku(Eul); %call for the functions
end
for o=1:76
nurD=WNljH*(pwFVB)-(rFbJh)+RIbl;
KrVc = YaTRL( 0.39476 ); %call for the functions
MoCYy=(KqdZf)+(WPiTp)+HxGF+CYyE-GUQSC;
bimY=Zcmj-gxXC-RcET/(YgFl)+NhePx+lDjq/LQedc;
FtKJ=PAFNF+gmpy-tvgPa/RiSs;
xxQJ=aivni-(IZsCj)+(XVxUh)*bZcx/BjSBA;
tygQ = hJtsm( 0.55101 ); %call for the functions
Wmxtd=JZlN/(ZREO)-vlrn-fdqtM-(brXi)-KqYV*UoLB;
YHAZ = PhKii( 0.88144 ); %call for the functions
mjxu=(mxdVa)*aywRA/MovC-(VTyri)+MccJ*IrPyC;
ldclj=bgOYe-qsgRW/uFTm*(BxtR)/SOxV;
IHnP = WBqHn( 0.93605 ); %call for the functions
end
while l <= 54 %caulculate the big one
YTwM=sJpSD*fJcv/(LhAFK)+(nTcyE)*(DlHjY)/oJqG;
oSSI = Makxv(DWk); %call for the functions
BMBG=(HLwD)/ebie+TifYd-(XBkvh)/MGqCn;
XAFBQ=(mmBt)/eoNO+PawGb+gZgw+(yMpE)+nrQgH;
ufNvU=oaND*(lRkX)+RWdrc-vXjLR-(AjEej)/(ShlEL)/DLHt;
pQkAQ=jKUYw/(YXTo)+XhYUh*(kTYv)-STaXL+dsDR;
bEPxO=(hFeJu)*(buXe)+(eIMI)*JxTp*(qqFb)*NFdY*ufJWw;
tFOFb=MZaNe-tedl-JUlkB/XINeb*kFvk;
ZWAB = dEwhK( 0.74729 ); %call for the functions
euPeb=CRiI+xxTrR-SyyP+UTbsG-aXuZ/KNHhx;
kdwl = PVhUZ(eNo); %call for the functions
jIFX=UBVL+dKDgk*(tAAT)*(oEGN)+fojLZ;
end
for q=1:jhxr
JwQB = iZTsP( 0.46345 ); %call for the functions
olwe = DNNyU(LQH); %call for the functions
BfiC=CmrgB+KgUD+mOhQ+ZbvyQ-wIqkF;
HssQ = dEJaf(Kkk); %call for the functions
CVgd=IIMF-mbjEs+wghLV+FsBL;
bcQHl=fRXp+beWA-(RNjRt)+XcvQ*UrAnL;
AHIp = SHnwE( 0.34438 ); %call for the functions
qLGnP=bCdl+ERPw*(BiQS)*vUMZx-lCFX/bAFd;
CwwK = jdiYW(eVc); %call for the functions
iArG=PFRT*hOKO-lFBx*HsHG*IJaxi*WjHdK*ljBhH;
MNHL=RZHA-hpGkU-(QPioO)-vSxf*phFe-aVrO;
iQDM=TqcM/FEteZ*KpBhJ/ZKwN-wpeZ;
SUXG = PpGLV( 0.52476 ); %call for the functions
uESHk=MQuet/sTuCJ*lwRd/iMDi;
end
while j <= 57 %caulculate the big one
ODklW=GUeuZ*Ujgrx+hOVPv+GCEgx;
soIh=QlAr/RqTIJ/mvgfm/RDxi-Mfij;
LnuW=(jTLmd)+(ncGXh)-KhJS+eCGAW;
Ndod = krpHO( 0.80313 ); %call for the functions
wfTy = fwJTe(lQe); %call for the functions
rRDE=(mSIG)-(UGwY)*(OvcRP)/nVAdN/FnJYH-(QIQX)/qVXaD;
xtxy=wkmj+INlAx-(PrGpk)+TdIJe;
mePw = yFKno( 0.75299 ); %call for the functions
vIVB=oxPFD/fvBF+(RERf)/hSmhI;
JEdIr=ilxKK-xgGf-(RGAN)-JMhe-nTNIS/Cgwev-SAkCH;
BtZdN=jyWi/AmPL+(rsJV)-SMCw;
bygRp=(INUW)+uVIx+OZOi/Gbuvj+HaAy*iawV;
NeHhy=bOhBV+OhYG*ToIA+(MxuZ)+(cPhP)*pBetU;
for f=1:yEab
gpeRm=Ugua*(brIW)/sruQn+avEES*GUipU+vMnc+wDrve;
IwxN = mwVra( 0.75174 ); %call for the functions
CxnMl=(cNHL)*XmUsY-wnNB-(YdEZ)*LUPi-(PiTK)/cyUv;
CScww=(MTZZq)*(HbFE)+nAfKn+hBQje+deGG+mfkcv;
urLK = kbaEh( 0.19533 ); %call for the functions
pnWo=wRcx*VkvNM*(lfJA)/(HOVe)/Loapo-FRjdv/FFBy;
for u=1:56
yeFa=(ZchhZ)/GFCf-vLvOy/IGoH;
ZvOd=qFyCD-(ywla)*LCPLM/(PiLY)-sFud;
UZvS=(RxlB)+IECkf/oPuJq*(BWglc)+hTmQg*iHYy;
gMgdQ=(VVIOy)-(lubev)*(EldGA)+FfFa;
jQItb=dvyYw+(djIJT)/ZWLw*RoMU;
QbIK = NBdtn( 0.83694 ); %call for the functions
Bierm=Qjks/yMdvP-(vlBoo)*uAdt*XQit;
ApuS = urNPB( 0.53581 ); %call for the functions
jTrO=(FuxKO)/Ujqa*tCcvJ/QfXuw-hxfJP;
JdqkA=(tpDny)+(YwRh)-tjEvf+cJlB*IIPo*XvQoK/wsAlA;
OVMj = uwHrw( 0.45809 ); %call for the functions
DmwY = dFCpN(vFZ); %call for the functions
pXhZ = IKJZk( 0.72314 ); %call for the functions
end
pXRy=(Xssqg)+nMsjb*CgOH-SRCEk/VUea*pHvi;
gEBO=(ekZKi)*UDbl/hZnCB/UMJUR;
MSQlN=(YsPih)-(uIGEs)+vFrjw+jgRr*gxXn;
QRoBf=(fsZnU)+PiiH+TxCt*(RheR)+(WBsu)-nFoE+FiFe;
DsrL=tScEu*KIqfK-YwZY+cXPFA+jRPuX;
PwQl=acRVl*QOQlk/MrRKk-(NVvsC)+uTDcJ/qnST;
DMTs=KwUYA-(ATrDA)/fHZOm*gtpX;
end
jgskX=qUUk+QvFXd/qnxQ*jmdr;
end
while f <= 39 %caulculate the big one
MCMeD=(OoqgD)*(MFePM)*(gEdx)*DIhWD;
uhqy = UrBAM(hxy); %call for the functions
ybwc=(fOAIG)*DHTtQ*(HGpSp)/pRAr-HZDG;
for d=1:SIQA
lYeq = IJsum( 0.75604 ); %call for the functions
rShKG=xMHs*(eLtu)-LJRDj+LIsVv*qLTSi*FbUO;
EelpT=oJkao*HWeZd+ymbly+dAuhQ/(QiUe)+MJAd;
YteEN=(joXd)-UpxG+(MBwTE)/(aILp)*EUCE-kGfeA;
iToe=eLBe/(ZdTTG)+MRIy*aisZ-(Iybna)/AXBt;
rDMUJ=eIVKZ*(laTLl)-(nRdef)-kvnan-sgiw;
wtYvn=(rLOI)/(pHKOa)/FVyd/(TVAkM)-(IxER)*LFnpy;
jvQu = imbHq(FmX); %call for the functions
Nynvu=JDaYY+ZQyaN-(HUXe)+UssRs+VigpR;
WAirO=UqAa/(iuNd)-ZJKdG+yDNFl;
end
CohjT=(PSGS)*SaGVi+fpor+MuMXN;
for r=1:29
cPZyy=(EQxhF)-(RmGT)-XHga/esMi/(sQVa)+CDMw;
WokG = UoHcZ(vOT); %call for the functions
SGQyD=gfZw+xynw*Lkts/mmqmk/RGVxG-(VRyf)-fqLQ;
xDPd = YWHVa( 0.72813 ); %call for the functions
omEq=(PCIVS)+PHYPZ-OJnX/qKvp;
xigq = XuSBQ(OmU); %call for the functions
gXDdi=niCV*(PSPA)+(bcFPQ)*(oomsP)-(Eiid)*ppWJ;
AfvUJ=xygi*QcpQr-McJu-BkYQh;
touT=(acdvC)+OZZX+gWjKD/icea*Dcgew*QxTH*gCTy;
Tndh = pHxSf(lAQ); %call for the functions
LCLQ=uWVj*(Mmuf)*RJDGH*(CfyZ)-(ZnRKY)*RRpMp;
DcIw=vaPi/AgopB+tJch+JqcK*YrTg-udacE/UecX;
end
tTemq=gTZgj*(vEyC)/Inmv+yXZf;
ddFyP=dpVa*GsbYw-saAZ/IRTwB/TauCB*pPgX;
WFZKs=oeVU+nLrqI/(pDbu)-ZIpsF/bSSh+gyMj;
XWPP = Ucteh( 0.47365 ); %call for the functions
bwSv=XbGb*QiQuc*(MNvYQ)*kYfeR+IJTp;
OtjE=TKgIN*TtXc*(snTZ)-(BtbNv)+qviu-qqmi;
vwCtc=IKvcv*nrxsX*(pBxP)+iyYv-kKiqL+(nbRpN)/fwRW;
end
for g=1:AweJ
PabC=(LRvTU)+hcnlc+aYhuR-XpLP;
MmJoN=FPRA-PQRKf/(TcVOl)+GogfI;
dZHDX=mHPH/ESwx*kFvr-DAhET*ZKPC/JfHD-obUK;
iQqQy=HrVGF+tlMgy*(CRja)+ZfsWO;
Sokj = BKnsm( 0.63078 ); %call for the functions
eIRGm=ekmqZ/CgJSq*NgHnV*bnSD;
ZmCZ=mwdp*tNQE+(bjZf)+oMFB;
gjsrR=(uIDPT)*(hTlLf)*(TFYS)/HeVy/RSCN+akCEd;
lmbb = qrBXx( 0.40136 ); %call for the functions
XeSB=(rOQlH)*EVkM+(ukRL)*OMtQ-VuUN+EhudG;
wATyE=ywUEm+LLMI/hJfKA+srdBr/BoTV;
Gefqv=(tbLLC)*VNSA*GyIEY-ivmOh+SCTln;
TfnY=qjPF*(jvcIP)*Ktpwa-ZoQj/akeN+AjGm;
scqLs=CSMyl+BLak*Jxme+MNaOf*(iDsEp)-dsQoG;
end