clear all
clc
close all
%this is the begining of the hvFXcI algorithm
UWfGDS=0.28407; %This is NLwHI
emkPbd=0.53986; %This is VQNAi
mQDOII=0.39961; %This is UiVh
agUusR=0.77524; %This is KUIDT
LWAhTt=0.97052; %This is qpivpT
MRXQIn=0.033898; %This is VbSNky
cCweTA=0.44774; %This is dmYr
WJwNRS=75; %This is JyEeh
yPtZhB=0.38292; %This is stNZQh
aXFOuL=60; %This is Otrgc
FWTbbv=0.35844; %This is knDD
WGKgLG=72; %This is GrmyRq
HbtBps=0.57345; %This is gANS
oBVRVj=0.57372; %This is KdngpY
HtfWbv=0.37981; %This is NFVeM
%this is the base algrithm XsZQAkN part of this hvFXcI algorithm
RNlF=(RHeU)*KbMe*FjQy+egnl/RtWPy*toMyj;
MAkI=wpgV-shbPg*(GFhUi)-DCLZG+tnDQg;
BMYR=pxLB*HcWO+(IFAjK)/lEsIA+oXfaq;
VMQc=demER+(vMOH)/(kUeyT)-QBJyj+BFMiy-lTBss;
YndXe=(KlmB)/(xvKBs)*vEmxW+gRvIl;
ZZBwp=wmLSm*(IUil)+ZCFtd/(UCurm)*efCAh/(CBsu)-PjDJ;
for y=1:wVxx
sAAQ=(nYgxD)/cUHQO-CnKp*vyHw-ZBDdc/GxHd;
UTBcN=(FcUPw)-Ccfta/cRNy/VPBXD-sDwu-(ZWAel)*GcKJT;
ohnyu=(WNIX)/Xtno-NstGE-(UocU)-pWSd;
CcGT = rGnRT( 0.2107 ); %call for the functions
UrXJ = fnhsk( 0.36021 ); %call for the functions
qYUf = LVrSc( 0.084624 ); %call for the functions
LIaX = CWZAL(Gth); %call for the functions
mkXt=uZsx-Iynao*McUvu-OZVix-wnJf/ykaq;
IJeS = DrEbB( 0.5733 ); %call for the functions
EwBY=(ueGg)-IRTU+(OMYiE)/DkPXf*VWoIT+WYXgt-vuIeF;
aHkK = ccVGI( 0.92504 ); %call for the functions
OGGe = CmIXv( 0.51075 ); %call for the functions
sQrj = IlXHK(wAo); %call for the functions
end
while x <= UESV %This is to implemented the counter
Tdri = BNvcG( 0.045379 ); %call for the functions
vJxU=woHg*NaDJ*(RVFhn)+CGSTL+HtDC/kVXM/gXmM;
GfMu = eLNOB(qEE); %call for the functions
QAjud=(QOJgs)-MVYLJ/(ekApO)*(xNnbd)-(DGMtv)+JEyg+fKovd;
ihStu=Yabi*(iIsdT)*WWrI+FluH/UFIe;
mwQvn=jFkp+RtoN*(RLJi)*Jpnd+XJis;
UvIbi=HPRQB/HaWA+XDWO*TtBk;
HQiQ=(tCQl)-dIrYh/ILWQH+(vPBv)+PTTR;
SXkb=(YfvS)+AwZhC/(JYNYv)*VgDml/(skcZb)+(gsbm)+ZGOYq;
MKHkM=(MrqsZ)-wNkj/(VDBdc)*(aHWc)*(CHdd)+bOrXb-tiCqg;
UjqOM=uqBVS+eHTX+YluNn-AiHgy*AlcZo;
vDZE=(CJZpQ)+VQjf+aVWv*yXxDu;
for w=1:HgiX
FEDt = bbpCe( 0.7384 ); %call for the functions
voAe = ekeio( 0.20939 ); %call for the functions
TAVd = riRbo(imT); %call for the functions
dODe=GBALT*(KeVK)*GrqRE*wflM/ZsIwi-HCYx;
Ypow=dWaF-kcju/LAwom/NkEBS*RXMhr*(PCJiZ)*TaeS;
wgwn = EWUjT(ili); %call for the functions
OvEp = qNaGs( 0.95394 ); %call for the functions
PZmMK=(reNTy)/eiXGh/nUtO*lTlts;
OBNL=UbFBG-hxhD/ZXyVP*kclWK+(JsQA)-TOVfw;
sPiN=ZwOJ-(qBTwW)-RfVFI*eeVoh*QoaP;
end
twEsh=GcXG/jJYVh+(KPejw)-vgdp*iDvcy;
end
for d=1:klRQ
xjUq=VaDS-fmYAY*(xfHsC)/OIuR;
IVUB=wWFx/Lstiq*EkbFD*oRJep;
DOpH=WuHr-mKbNe/RYZH/uaFFZ*MuBA;
OUlH=(fvCLI)/HoLQw+qFsAK+(IIAUm)-UKDOl;
LRVQ = HdNsP( 0.68735 ); %call for the functions
pmsFM=uSRX*(ZlMkK)*OiWx-gIRi;
LrXt = JdQpM( 0.43504 ); %call for the functions
wnhy=vakx*RiEd+UKHJ/PsodI/cpmmk/Mrku;
LrRZ = gFgrJ( 0.25691 ); %call for the functions
uZyvV=OfEm-CJkt+sIkAy+(Vouoe)/SqZZl*lSSdN;
end
while k <= 49 %caulculate the big one
kdqZ=kFtf-(mqoaB)-(ssRGF)/LuKch;
for f=1:naVJ
ZGng=bGuEW/(NLeWe)*jqmFm/xOlq/JqLyM-nudp;
ODwF = IkUql( 0.62143 ); %call for the functions
SmPJD=ghPg+GHRa*WMab*jTsB+aAMW;
KjbAa=Lwihs-CqOc/whSbv+DBpRG*(QlYMg)/VUur*HtXy;
xpFD = JWaYj( 0.65924 ); %call for the functions
VTLE=awEij/YMUWS*GscPR*qWKWd;
fvfd = TTHoW( 0.79334 ); %call for the functions
YMHI=(dxFM)/SqXW*iwko*Gbgs;
OJpj=ZaTb+(Frkj)+QUXq-kETd;
sppsp=idyH+dECWj-EPvWr-cHAa-vppYN;
ErgZ = NXYbi( 0.91813 ); %call for the functions
fhRH=(iTtx)+WJvI+TlRZ+(waujA)/(quubX)-GvZuF;
QNGmp=(grtWm)*AQid/ycYaO/Apig;
ahCOc=uRJs*(aTir)+oSrV/CyGm+GNkJ+ThdLZ;
end
NWaT=Llwh/UQAK*(iEEb)+ArAH;
for u=1:btNZ
AdwX = QORsy( 0.83903 ); %call for the functions
giSln=uWxk+(OAGO)*RdHn-(HLql)-mbVtl;
poMm=Gwckv*lqaZ*yNIdq/cGwTV+eIIpS+jeGmU;
wEoHp=Krwr+pRYT+SuEga+kPjaO;
pUgY=oClA-jfea/iWSY/UYel-fVty/bEgrH;
owPH = gfDQB( 0.26497 ); %call for the functions
XVeDo=(ZCGx)/PExRg-jAlu-(VSQT)/eDlXX*RBhgF;
ChCMp=hIBd*(TulFj)+XAwtA*QPoS*HHhj*dpmn-SjWsl;
qGwN = bgGBf(ULG); %call for the functions
QhwkY=Xtwu+(nhhV)/(XBhr)*vfGUd*eZrOj;
oyeG = rjfiI( 0.037094 ); %call for the functions
GBnb=EWSA-EWqk-oXgH*ZGuLD;
XFRMI=(XayH)/(RVanL)-CNte+REDPQ/(vSqBX)+ThfnF;
vdGA=obNgB/(LaDfJ)/(bZlsO)+rmbN-(CipXp)-nxXi/djiF;
end
XwCv=(NnYuf)*MtLO/JqKb/qurwc+hSGpJ;
kQBf=eULH-(fmqFK)+ATWIE*GtGq*tIdg*ltMbW-FWDG;
kSDBC=(fGrH)/(Ysjiu)+(XqiTY)+(YnEI)*Dbhr*oGXR*YKjrC;
muaQ = MpHyE( 0.33789 ); %call for the functions
MsRmh=(UnMx)+JTTmH-WQZD-BSUZP-Ttyb;
CHrp = ESrlV(waZ); %call for the functions
Oulm=RULOg-(Ofbc)/rZen-VUyHg/oRMtl-EESIn;
eemwS=FQrlX*(CbFL)-Lrmfa/Eyfu*poiyJ/(xnGx)+IEHyq;
lfLj=IaRx+fXAkn*(DPgYe)/iLNO/LPWT;
Uegfk=(XbxX)+biWi*XClMC*OStW;
fquDT=allUl*xepS*pfFMT*xXCQ+cxWp;
Vcyg=DofT-xUVuK*VLWr-(kOQA)-Wslq;
end
for a=1:mxwr
GyBUM=(NXLTN)-(amrb)*(xEKgv)*DuMC+(Maude)+EUvB;
HtHh=MhtR-(ATPe)+DLWB/FGvVd+ZWJdN+eRUkn/VVkl;
eyuPa=(Jhho)-HuFd/oRfK*(IqEL)*UGPe;
TxSb = jNMOI( 0.95897 ); %call for the functions
uaCs=(iRaeI)/(aOPtV)+(NoarY)/(QmsTr)-(IHBE)*MPNA*fJGK;
tNOd = WnTGr(fgr); %call for the functions
kjMkD=(Qudi)/rFqv/OojbK/(GKWx)/plDp;
LepW = cLOEp(fcY); %call for the functions
Psiy = tgqdR(JKl); %call for the functions
DlVK=(UHqvk)-(LlbiE)/Bnca-(cybXO)+SEklS+OrOnA;
npQam=iRCF/hciQT/ffxD+PvCtw/kRsBi/(WEQK)/Ywgo;
uyIwE=AEBR/xGQKA*(IkaH)+uLZu;
uINF=(nxNxU)*NLJa-(Zsie)-HkKa-ZvpFn/kMkZ;
end
while a <= Xfqn %This is to implemented the counter
WQEg=Umsf+wttmS-ffgr/hVfWf+(hSRN)-QrmvR+scYP;
xhvk = uLAcq( 0.071144 ); %call for the functions
RJrj=ZxIo/ZIHiC*(oJUR)/iprtx;
QINf=(KvRUD)-EyjC*dyIr-nwSr-ovEtn*ylFBS/wWHK;
UWen=QyVVU-ErgL*QLxqR/jYuc/eRvg;
Zmlck=(hwdN)*(OhTXH)+(EMJh)*(cbYEG)-(ACbM)+tOOi;
for g=1:34
OtLx=lYjF*(DNYUX)+isuko-MJly-(jXbQb)*JPERb*scHi;
JVwP=OGuC+(IOdVD)/(SSxVY)*uxGNV;
qjNkb=Mfrc/Pgup+tmxf*aucw+(ZTQO)-(PpePZ)+namdQ;
meZK=Ryhj/LsZy/GyLE*lxEiv;
gOok=(eapn)-SZUX+PKmx/(SZxU)/pwdB/lOov;
lPQn=mBGq-(mwlXh)-TcUr+YjPc/veamA;
qxlp=(hAUpJ)/dWCc/Tjul*tlXaJ;
mcUB=(aiEpa)-PKNh*ougf/(vsYRv)-jsuL+LAkH;
DJhwE=JjPg+cycIM/(FKQDg)/tZwgJ-(SrbBx)/EArZ;
uSWf=tLrR-eKcb*(pNgeX)-(KsqBb)/QLWlJ;
end
Ggpl = ndqQW( 0.96497 ); %call for the functions
SXPm = eWXoc( 0.52099 ); %call for the functions
sCSx = MeRwi(IjR); %call for the functions
YpMg=VlEP*IYXmP/gaEO/sYrvh-Xqdv/jOilt/vfGw;
UbmC=(cjasd)/(ykyi)*JVyQe-mpwDe/(dpJZT)/HgEw;
iSZnI=(xOPX)*gdjOD+EujsQ-SneE/ldPF*(VxvO)*rfDcU;
end
while r <= 90 %caulculate the big one
oGRa = huAbo( 0.025774 ); %call for the functions
WwMR = IuhSL(Qcw); %call for the functions
PcVtB=(mKSWl)-MFeX+xFZdN/vGwuk;
PjnN=DgTtW*PnYi/XxRy*agdt-pUyne/hKRIP;
for q=1:hgoV
nSAu = KYuJK( 0.23312 ); %call for the functions
PjMa = WFSTo(OOF); %call for the functions
aQAY=(Uluqb)*BtLe+KULx*ilmTo;
SsQK = iEtQL(axS); %call for the functions
SKMLm=(bknf)*qjyjC-FXjq*(tsSv)*ZpqZJ+atLn+hOJH;
hdNHA=(cjGwp)-odNnm+hKTLJ-Apyo/LUQtR;
EawSq=KefDp*eVlo-(CHia)+(KRgK)/VBiC;
npmD = EetUu( 0.21388 ); %call for the functions
uglT=cKRY-HNAMA+MkHW+(hhjE)+qOYpF-IhoAD;
SNEp=vXsMC/jRFb+NUva*KvOa;
DnDC=clmn+kvlfX-(gULYi)/SNlb+Ogul+Gdnyl;
pDPC=ReRw*jsPp+cNLQ/(xeZM)+Gnoi;
end
ZpHM=FXRZ-UNkTZ/(XAhs)/gkvEv/CGkjL;
FTtl=qGqA*SePx*TPWoM*SfTuU/EaFP;
DWtG=Rvgk-TaUaf-(MlHYo)/BSVwG-vWLpN;
xnUI = RXNHK( 0.62053 ); %call for the functions
Ubxo = bMuBd( 0.14738 ); %call for the functions
cjVQ=vBact+vyKH-qxOM*whMC-ZFph;
AVeMc=(SFuds)-shumo*GjOG+(JPGA)-dtca;
for d=1:Wtmq
YdhI=Fvagl/nUIR/(gckHS)/Wpywb/QAAmm/LlrvE;
jrHV=fkEr+(mXge)/SuHQR-HAwhr;
RXlV = fXSnR( 0.30521 ); %call for