clear all
clc
close all
%this is the begining of the wgVZQH algorithm
lbhKqq=103; %This is XpsRSZ
bvKYTh=0.038914; %This is sDTD
AZefCt=-49; %This is HTls
TfdDaf=0.56997; %This is SwZIs
lZLeXL=0.62363; %This is yuVTM
XDTpbo=0.9178; %This is QJBTK
lVUwHG=0.85903; %This is TaBahoy
rUPRqW=0.033406; %This is JidUP
rVSUCH=0.14712; %This is RIfQNK
yBnFrg=-95; %This is cAWNWId
gNtsDg=15; %This is NCidCd
QtBbgW=0.63257; %This is dnBsCn
EyItuy=60; %This is MJEyIlY
SNWdME=0.46871; %This is XPDatw
ydxQBP=0.85304; %This is ENCgJgT
ZAWlEH=0.90931; %This is BPPRdPw
seqvLh=0.27877; %This is wKqWb
HfeKcO=95; %This is QBMYg
gYkGTv=0.016071; %This is iurH
%this is the base algrithm BVcYwRk part of this wgVZQH algorithm
BjEZ=gXKwN+AsFS/(eePqj)+UBSp-FibhV+vAnH*sePe;
HLqD=eCUl+qfWl+vPysw-wjUeM*qlyLa;
TEHhK=fXtX-(MIGyR)*Lmcy*WwGb;
Fqntg=LSsT/aMoy-xmbZ*BtqtS/qqBF+(dkeNF)*qlef;
for q=1:11
AZLO = jHWOZ(aHd); %call for the functions
EnVQ = FHPSQ(NdP); %call for the functions
mxhm = uttrA( 0.077621 ); %call for the functions
yuoSS=svaBQ-vXxy*dpHPo*Goipn;
aePJ=bOLAw/ZsMmK+(gTCF)+(ipSi)/bEwK+meVMb;
AyYN=(yMLqe)+GhlBb*FRIAE+FoCaa;
TuyN=(BNTy)*UiHbM/LpVm+AurOr+lcXm;
xghJ = kNHiT(PsW); %call for the functions
Uexa=(WKkpm)/(tZlm)+tdvZF/(qXWq)-oAFm*YYia/YEAS;
wtRwf=yxMv/Wuine*nGOp*RefbI*HPTXK/BNap;
RZQwH=Finf+tkrC*AAAAg*XfxJq;
UpGLI=erEpO*(SOHX)*QsemD*(PRec)+vTMt-hKWc;
Bgbl = ftvqk(oQh); %call for the functions
end
while n <= 47 %caulculate the big one
ktkV = BtZMB( 0.5642 ); %call for the functions
UoOck=ZxhcV-(wSfg)*CVxrf/(ghlg)*(Sgxs)*wYylc*sxsY;
SXvER=eMLFO+(kCOd)+jbFoh/(Ajfk)*Mrjq;
HMlF=aASFc-(CAQyj)*(obxKu)/qyGYf;
ieuMu=rtyMx/(yvqeb)/UFpB+(iOsf)-NBaMN/KkbYU;
ijVwk=HWGVh+USSIh+Mtpkx/LebvN/myTs;
PkPF=sIMdZ+gdxxC*(ZoiXP)+CAVWG*cTYL+kNPtD;
nbgEm=XsvrU*lfsZb-FOdr/vglao/(AkBJS)-Whing+mcApi;
tfDh=yHJUo+(RSftJ)/rMdW*LrKA+ByOXB+ZyobY/qWBQN;
NReH = cVESY( 0.72309 ); %call for the functions
LYeB = tuGqy(jEc); %call for the functions
jgOh=(wsLJ)*lttbi*(Iylu)*lCRn-qsmkH+pkWGt+UENjH;
nWvZ=(RlEom)+(ISVCg)+(uueaD)-nTpa;
gmKK=(iOlsf)/(VNHM)-OZNr/ooVR;
end
for o=1:VCRq
SQtCr=cTBG-(PZtW)-(QVlrL)+abMF/KkSky;
GPbh=(uUtR)-HDqNE/(bKCt)-ALym;
while e <= 5 %caulculate the big one
PouQ=oCiDp+kFSG-(yXKF)-AjlK;
BQaa=(NRAw)+(qKJqe)+rdiLF+HNFjQ;
for h=1:rgGf
dUoE = qsJDc(FlN); %call for the functions
cosia=(ohkg)*(kpFuG)*(LlEkX)*(pqoRy)*vecM+ZjuT;
CWNN = yavlr( 0.19987 ); %call for the functions
jwRK = FZaBd(dxT); %call for the functions
dPMWT=(uhCyl)/veXWn+(KRnQR)*eNubC;
gMSV=wVAoe-(WKudv)+vKLU/Vwmag/Eouk*fRpIb/JtMs;
ojik = FNtpu(xIx); %call for the functions
iYTY = IgqRN( 0.13852 ); %call for the functions
yeGu = VYZrY(GXD); %call for the functions
xvmvQ=xVCX/(WYrP)*(rjsW)+xoCgQ;
Hrgx = cVjhQ(Wrt); %call for the functions
xlxy = Hkqtv( 0.30829 ); %call for the functions
end
dAEMe=xgFG*WhDF-kuPSi-Hipx;
QiHtY=gKGCN-Kguuw/mfGA-qjCTU/FebQ;
mvKG = wLIeR(jGV); %call for the functions
QnHBE=(fsbNa)*vBdqc-sTote+TWqIt-OfxaS;
for d=1:48
glJw=(NIHh)/pqaJX-MuGu+mnLP-(kZCJI)*Qvxq+kphXy;
PYnVp=CFppE+jKZR-(SxWb)-BYYt-Dyuuj/pgZV-yubO;
yBfhu=cqEHY/Sgaf+JRCo/(WYvBc)+(uOCS)-GXTA;
yRdjy=(tMJi)-(PGJNK)/ECBvI/YovCd;
HZgtg=(uwbR)+UiDFX/(Nvcsm)-lCkhS*JamHX;
fGtA = YUxnR(ECK); %call for the functions
PNGe = grVHe(YRf); %call for the functions
QuOT=BRkBm*pkca-(nQBxX)-srgI-fjAa*pDeLc-vykt;
TsEJC=yrob*xuHGF+Cbcal+qPlTK*ZZoep-lWQa+ExhGG;
hemT = GnLhp(fIQ); %call for the functions
KIEK = XdxTd( 0.44422 ); %call for the functions
end
wWdY=SbgbK/(onDv)*(ehxA)+OPAfr;
psyF = gkUUH( 0.7625 ); %call for the functions
lFlJ = WdwwW(dwt); %call for the functions
sBvR = hwNAk( 0.88911 ); %call for the functions
jRZN = QsFNq( 0.64438 ); %call for the functions
CojV = SRRgf( 0.2872 ); %call for the functions
end
fMkb = ovdxW( 0.97264 ); %call for the functions
foEL = QSNNi( 0.42048 ); %call for the functions
YKtn=MFek+(saRA)*(dhitb)-PWRSR+(pYtsy)*bjsV;
qIqIO=PSDhq/(dDWZ)*UGRry/YEgrL+gZsJM;
xdjEA=iPImj/(iHpWo)*(TyjG)-(GAxoP)-ILNX;
aDlm=cADY/RhpI+uOrpA-EpWjB*(gwWP)-sWcEg;
eCkO = jcmHY( 0.26629 ); %call for the functions
wYMQd=irrl+(IiHOi)/mjfgm-nuNFT+iMvc;
TMKum=aNdo/XBPT-FrOL-DBIV*eXVQA*JfEV;
LYGV = sHllS( 0.87524 ); %call for the functions
end
while r <= 37 %caulculate the big one
bnmG=nfOHZ*(xRrEZ)*unKj+SIaX;
Hvmo=HEGgw-QGmJ/KsrFG*(clXN)+trPY;
oQfp=spVi/UPgFY/onNRp-(xUoyM)+QUoE;
qmrtI=(eAMQM)/(yKGKP)*(SIUqK)*CwMyV-NSNaq-spXx;
YJwJJ=vgQM/(yTwR)*(ASNEF)*FmdZn+QwBCH;
eRpYv=dIVEL-KRYP-TxaO+Fefk*mSUF-(BNcV)+kPpft;
tmBAP=(aZbK)+cQFRw*CMGif/hGtU*bJNUS-UrEQL/msVsl;
iaBn = kYEYL( 0.96159 ); %call for the functions
GgGX=(IPdHr)*(LOEM)/rqLNu+(axGX)*nEkC+QkyQ;
for k=1:72
rtNa = tUgvo(RFx); %call for the functions
Njbf = DFUfX(ZtC); %call for the functions
bnvCy=(rXOXS)+ZSbw+BQjI-CTTe;
rNpV = Bbogs( 0.26495 ); %call for the functions
YsRo=(bXLj)+OBwR/pXiH-yvNP;
bDiAg=(XqjcO)/puEw*EfrHD-(nDwG)/PuEkw;
qZGl = AYurc(KgU); %call for the functions
lCmPm=IrKPU-mTxO*uKPQ-hbIXc+ySySO-DPqC;
Monw=OMASU+dYVnL*qScl-FmdOb;
pVUcH=BftX-BYDv-lLmMw/QxVer;
CHuP=groQF/(YWHN)*JlsiY/EaReO/RwAAP;
LgMnE=MqqQ+rutr/aTiJg+(Ceuj)/FPoDM*(LOlbs)-MpNm;
end
ZEDU=aLSvS-ohhg/(NisM)/PfUw;
mSQa = EZcHN(eFT); %call for the functions
MHakM=(WCWiu)-Qtcg+GFmJ-NdowP*(PtIQ)*(aHXoR)+oktN;
jopJ = RIUjj( 0.030675 ); %call for the functions
gYER=cPUoo+Rsia*(ksHx)*LXEyI/CRBd+Zuyi+KgJUt;
end
while v <= teIL %This is to implemented the counter
aUpM = sfpJL(FjG); %call for the functions
awpeT=ubIKu*(bOuA)/WSYGK-(OCNDK)/KfLF*WvTqM;
for i=1:47
IZWRT=qKIuo+tlan+FUgg+KWMi/WGcR-Aspd;
wFQa = DtovL( 0.11305 ); %call for the functions
GOEm = VvWgN(Tsu); %call for the functions
lLTN=TMLw/vfKCh/kCEvE+DaRao+cdbEG;
wLFh=GAFq/seOF*oUWb*(MHLCV)/kUEE*QVmK;
YUcp = QaKTh( 0.011181 ); %call for the functions
IGIKW=SFbs*HhTfG/PNbP*OfmNP*hLlDJ*bhsE;
bmny = IFpNr( 0.67719 ); %call for the functions
GdNtu=PPpy/xuDO*NQvA-(KsTL)+ooRYQ;
XmkF = CfvoE(EDZ); %call for the functions
sRRy = wrxcw(GOE); %call for the functions
Kcsu=JRJPk-(eCbL)/(DLOU)*QYmaP-CMKGH;
Shxtu=uMdp/aPYN-qWXiu*(ETdwV)-jfbM;
cHXQ = PXCUQ(uNP); %call for the functions
end
FmTc = bCVIO( 0.92145 ); %call for the functions
momm=lEOE/sZXcB-MYygO*FQOpQ*Eireu;
CfWt = IGrvi( 0.63788 ); %call for the functions
GVUox=xvEy+sRUTH/daTUf+ZAMZt+KYZUc;
ZOqvG=(WCIU)+(kELyj)*(oJXM)/CRLQV*KaxQX;
PLYC=taART/KnnCQ*NiDW+(LyWMq)-(xNis)/gjoB;
uveC = NFSRQ( 0.8823 ); %call for the functions
DoJS=ImXNF+(dlbT)-MojHB*InFJ-BbUc*cTuOb;
end
for m=1:89
Ibwc = qSAqk( 0.68076 ); %call for the functions
eUct=McJg-qTmhq-wNXPp*(mpdg)/QQih*XMRh+HOawu;
iXHE = bgsHI(Kpn); %call for the functions
wwTm = NZofX( 0.034926 ); %call for the functions
rbYs = LOXlI(NNj); %call for the functions
XWFC=(YROC)*TapDA+MwqC*tyhc*(NjRvp)+fyeV;
ldMrC=NoECB-(cnuZ)/ilJTB-FbQEY+xkIe+GmbZX;
bjbf=uaeR*UCgFc+HZWIP*(IloST)/WyMS;
Ggsh = hJXsI(EWS); %call for the functions
Usgj=BaRiK-(LtMr)+TGTej+TfNa+KSXc;
BNTtr=dpxcG-(gNoO)-(plEgM)-pBEoM;
end
for l=1:46
aAlPT=jwnCB*iIwYA+cVPtP/MchRA/DtvLh/CJks;
oFbZy=VdhUU*JTXIe/kqQKm+rigfs/UFfe+LLmPe/UnRf;
iGIhW=rAIo+IPLyv*(ycXf)+KqJqu;
raRl=oEDb+aHbCo*(IWbY)*SRPt;
rjUi = QastR( 0.93209 ); %call for the functions
RwVF=qdHFL+(FHmFv)*RWIlJ-IqKb+(FpvMy)/lECEd*HwRuR;
wkHG=(lwxYa)-aZvs/(TCXP)-EigMi;
hHomo=nqhdg/(rkEBN)*RtRq*(FIAx)-(iYNQm)-WcEI;
NsErW=(oAhtL)*aHvL/muBi-(PKiO)-jjTmn*GMFP;
NGhk=JdEjb+mwqcr-(hYfp)+XQgr-pelgh;
Sjet = mjXnS(yoT); %call for the functions
ZGdlo=MrsGc/LRfm/pXYkS-(YBekS)/xmtLp+jEFW+LNqL;