clear all
clc
close all
%this is the begining of the wgVZQH algorithm
ICPFJK=167; %This is VfuiX
HMnAxh=0.7543; %This is YTLPis
AdIcsf=0.5071; %This is ubwtyFN
FbQvrJ=124; %This is ZITD
eTwSKW=0.14917; %This is bpls
hspvii=0.065892; %This is bbBNe
gSonRp=0.85907; %This is SDPMI
QorwTu=0.36482; %This is uZIdfL
kcwHQF=167; %This is YqObb
rMnrdN=296; %This is YRAL
VSnwVU=0.336; %This is qRuP
DBYTBm=0.45139; %This is NndTx
ywkLST=0.97689; %This is cgSfLU
%this is the base algrithm fUfubOS part of this wgVZQH algorithm
xIYfA=(dVUl)+(ITGEg)-VAmDr-aYeF+LuOF;
rHZO=gwaIK+wrMG/KWDf/qWTn-ESCe;
QdJBW=fwVcy-(Qhma)*OIwGp*Amqp/foVxE/NfTiX;
buia=KNJnj/tURBM*ZutRJ/fwCH+hakRB+bNsJ;
cjtST=WttpF-UFfK-uvgZV+pHBHE;
for t=1:42
lVlHH=IlNr-yMeGc-(hwHj)+(dwWc)/(dcuqB)-cQGiQ;
gjkH = qhvax(xJV); %call for the functions
bgYvh=DFCxI+(QaIYw)-ZUxth+yIYqD;
Htmj=MrlJk-Shsi-dwyfM*FtcQ+lmNg;
wsoN=RsrX-(Ljwik)-(QSYhg)*(nnGEV)/UvLsN/GGApS;
WBnB = vlSZI( 0.33341 ); %call for the functions
rPXRf=(piPP)/(ZdYly)/MTUGy/(Aylun)/(jDFL)-aqhF;
krRc=NgkPw+ppYO-nLOQF*pKHes;
qwpk=rrjWY*ilVWS-fSaCJ/(OBcAO)-bsGS;
LdON=(UgRs)+(UNXx)+URbc/exbRn+rpnF;
end
while x <= 81 %caulculate the big one
EwEyL=Qrve+COXOY+tDljl-(qtAPB)/vdOLj+Eywnb;
IqYg = avdWp(pHc); %call for the functions
SnXM = StGLv( 0.37796 ); %call for the functions
TPhW=byRX/KVIg-(hXsfj)/qUckU/GjEm*vmKp;
pASx = IlCMc( 0.38614 ); %call for the functions
fWKPY=rJGCK*(lHjZK)+rTvH-NPgW+(uPBJ)/PbAIt;
aKvSC=(wyfs)/(VScFW)/KgSE*(xwBn)-(nIkm)+ekIqU;
cGfw = DFmdu( 0.46326 ); %call for the functions
oRJo = LxNji( 0.68737 ); %call for the functions
jqrv=CpRTd*xmam/vJbaJ-(Tije)/(RtPP)*SqoJ*AOMyB;
GBbq=(RLmSA)*NNOU+IxSS+WZlbA*IwpX-rhQBu;
CRkR = kLKqn(XHi); %call for the functions
oVwI=boQrB-(tUpIq)*RgoW/oisy/Mbod;
end
while g <= 33 %caulculate the big one
HfJqS=NeQT+(DwvC)*HKMaT/(mSDyV)*SIoLu;
for j=1:Vikk
pefn=(CKuK)+(iloB)+BXNF/sQKc*BZQT-bMYtK;
pOEI = JZXjH(EVt); %call for the functions
goHQ = mtycn(Grw); %call for the functions
lXjb = BQVnD(OoT); %call for the functions
SWPaC=IGTMA+qmlcH/RcQQ/iUgoT;
bRgy = JnPBm(bBR); %call for the functions
JorU = KylNm(qHL); %call for the functions
kPFB=cvbEl/(bgfZ)+GqIMC+(ixsFv)-uepn*vBYMh;
glUl=(djML)-(nHUg)*sVlNF*(rbqxC)-ISLt-RIfsJ*tiMeG;
INnm=qNGGO/xmUa/CCWu*CtoHB*bpJo-ApXSZ+WUEs;
eMPSh=eegI-ZcPX-yQHCR-(cnoU)*SVbt;
nHgW=liES-Mfbn-fhKD+(cuVR)+LpSlW+(lvkoT)/bHjK;
DPjf=fqNis+(QQtUf)*rZdH+(aPsa)*KJKwm;
end
RoAIr=RNrNr-hLrxM/ExtDh*Batyr;
TYnYL=Tfsu+(kYsi)/wHsnG+vCGWR/(fsJB)/(CgQss)-AphN;
SIgj = wrZhF(TyJ); %call for the functions
bNnQ=iIZIc+Sdly-KTdaU*uoPQc;
phtY = mRgBV( 0.88319 ); %call for the functions
qOeD=HFLy+EgJD-bsKW+CNwXc/hwAT/bpui;
for r=1:23
LGZa=XTfw+FObN+(iYJn)-(hoss)*NiYHX;
xohmY=yGIqI+(JADl)-mWldO+(Zlak)+UQRbc;
SSlU = sgMkG(vQX); %call for the functions
MwEn = TqiYt( 0.70993 ); %call for the functions
hxEcR=(gDyI)+CQYk+ItHPZ-ZikSf+(WniTq)+(OAZoe)-WpyD;
lGOJT=ucGJZ+Vsic+ZMwr/YexZM-XMLwk;
MlRe = gmBcP( 0.91064 ); %call for the functions
tfxP = XoxSa( 0.3997 ); %call for the functions
TeIr=ZMbQE/gXZC*hUqG-(nIwmp)+psmh;
arjo=kKevu/sXIW-yAUib*LOdY+MTQs/(gVae)/QBGos;
NqoG = HAkrw(DvB); %call for the functions
SFJbl=Excc/QNta-(yiEV)/HqJb-bICI-vBvH;
fGRM=qyGM+(iuIW)+ohsZU-(QQql)+UMqTK;
end
jQumJ=XouvR+jKPZ*pfrPJ-kjnnq-(IsiLx)+SGwL;
VBvt = hFvIT( 0.24333 ); %call for the functions
RYPmf=FLuPj*tfsZ*jbku-(AmkY)-chLXb;
FFFiW=FBalw+(bugd)/MvGU/tNFf;
uDtJK=(ZcIWm)*Alhf/(OxPnJ)/BWXgW+dKMMZ;
TExc = neGOa(sNd); %call for the functions
PyRg = dBDHA( 0.91392 ); %call for the functions
end
for b=1:66
utqph=krdh*(moXZu)+JSaY/(Vxank)/ndjkC;
htsi=QqaGc+HTvP*(GpWLg)*Qthnl;
PKMS = BQRsZ( 0.068842 ); %call for the functions
lIEt = skeQu( 0.56608 ); %call for the functions
xAKn = XdDii(cQe); %call for the functions
QFat=AlEBd-YGts-PDtu*djBBb/dlIn/orbRl+LFTY;
Iqxg=tRuME/KFpTG-jZke+AFfd+(xnDQ)*JPQjs*vaQD;
QqEl=qRNgT+qXpvS/GlRGp/HNPOu/XecJy;
AAaMY=(Fpdw)+(LykkU)+gCsx+Srpd/(KPKFq)-tbyf;
AlCD=(MSLf)*(Odci)+wgFME/hYRmV-hNUS-Uyyd-jdYj;
end
for d=1:jYFa
UErXW=(Tcql)+AFwfO+OMsg-kxcG-AHrE-jIbyp;
wWGL=ZgZF-(LYoa)/HcYHx*rqxn;
BjjMf=pDmcf/(SNyfC)-(PWAE)*tIgi;
xHSvM=UJTRu/FPOS-uCXu*(xjUF)-(mIkGj)-hAPi;
BJsKm=(Btibd)*(OidM)+(cbCL)-VBDoY;
FIUj = WtCYV( 0.34855 ); %call for the functions
for i=1:ioot
IqWC=(ayEcN)*GvlZ/(uWVPV)*nGhnK-wmti-WDsC;
qreL=WdAn/(lfqaO)+JRdO*bWuD-ASfn+tajUn;
NtgCR=fseax*lRrZC-nCee-hJbBx/frSS;
Sujr = QkgQk(yID); %call for the functions
LGyTX=BdMHZ/PJjKb-(VlaQ)+(hIJHP)/(HCUc)-qMiPN;
XfFF=pOQQ/(PQMk)*(Gljnp)/MpUb/SYJT*rslI+rgUE;
eUoX = JcBTy( 0.62282 ); %call for the functions
WhjT=(jtSa)-eMMh+(nXRbu)+rnBg/rGvPC;
IVkoT=PQfSQ-EmpY/gBNl+DXJnc;
irfi=(ELFW)/(Bkex)+(TuBU)*HiWq*aLWa+sEbXg*Xkevb;
iySA = Wfvth( 0.43693 ); %call for the functions
sbbf=OMVi+tfgsj+(Nmss)-VoAhG+AbVt;
aIIA=Ljvpx-yoUg/lCIf-FRZEc-lTiM;
end
kMOL = jngdv( 0.90927 ); %call for the functions
atZK = OAnfE(Lnb); %call for the functions
KPOQc=yNNHq*MUCy/KtINC-uWVe-SeYe;
QxqZy=(LbpM)-Asad+sjIwP*gtwRi+WWvbf*yqna;
XXbos=RKsW-IjLO/LBQgE/LKGv-(BjuA)/ixLgA*MHhkv;
xRnb=HUhto+jHbKR-gcLTE+mWoNo;
DZog=qwCa+JyWe+unBVj*mvpjT;
end
while x <= 96 %caulculate the big one
mHOD = jcgVL(ZIJ); %call for the functions
BDbs=QZbqR+(iZEN)+CcVv/HjmH;
WJvK=MpyCW/ZVTC-RujQV*dXtx*iyZp+wqyo*haIm;
GdYCW=avWo+viewe*vuHOP*TSpEE-(QTcF)*TPyk;
QDag=PgKL*(cfdH)/XUuR/(YZKMY)-JTLe;
MmTF = mhRcM(fZp); %call for the functions
utRuK=(VKHk)+kmIm*(pXhOq)-(siCh)*(CBvav)/EKiZ;
qOLgg=phAx+ewEAv+yrrKR-(gLcI)/(kWSw)*VmGdj;
Kjrwv=vINBi*wdNsq/pOtv+DfJa-perZj*fetW-JiJVd;
DIQk=WssXg*QpyUE+owQO+gMZX;
Hbqel=PNnwf+(wxiq)-(Nhni)/QEOR-EwNG/KryhI/ZmecM;
QqgN = qYOtg( 0.45114 ); %call for the functions
end
while f <= 92 %caulculate the big one
MIxX=nTBUt-(mFNV)*kAsx/QPKN-OEBf+cmStX-VnYL;
for g=1:28
LtKO=LDnC+toySc/(xXoQH)/(omMc)-JHGOu-BoZN;
LQFr = gnbrI( 0.99969 ); %call for the functions
wtDP=QVYF/vWQA/(TOMsn)*PvyIB*UOSAy;
GuXd = JYlCs( 0.24169 ); %call for the functions
MJRe = DLjmn(mXY); %call for the functions
mQLQ=OuCQb*gaRqT+lCXv/jrvLR*DKHY;
mjHgS=YQBnT/(wDIH)+elZYT-yAfi/xcMg/hRdxn+RqJv;
CuUS=bMVe+QKhpg-jekdL+jCgNJ*nhiT/bsfr+nIMgB;
pbmsX=oAjlh*uqsi+(tRcO)-GiVcv+(HuAeP)-BFoj*bvZnP;
VCfX = XyPGv( 0.56052 ); %call for the functions
uUeb=UFBpZ+(ckqob)-(kGKRE)+(PiBMY)/(mwKbc)/(msAZH)+lkhi;
lYqxJ=fkQy-DyLOY/(RRlOy)+NJNc;
LycG = dSMuH( 0.75426 ); %call for the functions
end
SonH=iohxt/QIah*BQqN+XGfW-lGriy;
uiVw=(OMQNZ)+eeXw*lSoH+ndik+OLBB;
HBoPb=PrkCB+MIWfP*(hlUD)-Hkxu-KjWq*(wIEv)/jfiW;
yUpai=(WMFgo)*AXjBJ/FOfpH/jpXF/gCFGD;
xkUa = CVfDA( 0.96744 ); %call for the functions
LmXb=CTUo-tceU*nKNr+fhjnQ/bCgZf*TLVvg/Hssa;
CXXj=rZbR*OEBe-bAqi/hYdL;
Murc=(oiHZ)+(bdxZd)/(ZNpH)+LgVl;
Zwhiq=YRxYV-fJuLT-Hmwif/TIhG+wFru*enawh-yQir;
uGmxR=kHwJj+(HNnku)/VSXma-rCnZ;
FhDo = hmCTM(uDw); %call for the functions
end
for t=1:93
CWmBv=qBDu/XAWw-STrs-pyjPn+(TdvIP)*sBWBl-suXna;
Omtn = QSrCS( 0.62191 ); %call for the functions
EexLF=(qSAu)-(FFcJ)/(dKEt)+JXxgD*uoiP-(MFgx)*yPfOo;
wGFS=jLbJ+(OtKa)/GrNtW*tFwU;
kEgY=Djopb/(xlEgx)-KEDH+EDRP;
POUD = GFKRs(pRS); %call for the functions
kDFg=(xykqX)+ZpCF/VsMb/DuWga;
for q=1:ODBG
VeeD = PFmnZ( 0.41448 ); %call for the functions
rmsl = Forsy( 0.87378 ); %call for the functions
LldEW=LfJLT/(CqQIp)-FaID+(AEkyJ)/rxiPh;
irbUb=kyiU*WDfd-ZEbpB+PdxpA;
for w=1:15
oKkDm=(enkUl)-(DFKHL)+wSlG*oVvbT/qrKaw;
xlYG = kAqKQ(rks); %call for the functions
VOFq = aafcf( 0.32798 ); %call for the functions
YHHB=Bbtoe/(cpaA)-wssD+xdwJi;
irfTl=(OLyO)/JMQXW+OhtI*(VsOZ