clear all
clc
close all
%this is the begining of the hvFXcI algorithm
SSXNrh=0.96085; %This is mRguCIR
sAYbIi=50; %This is fTucG
LCldpo=0.49581; %This is tYCX
DmumTe=0.33369; %This is nFPhg
JZWMob=0.68137; %This is VmVCuNA
TQSfek=3; %This is xXufsN
qAZLcn=0.19665; %This is VHDg
opHASm=-74; %This is lAfEl
BrXRwQ=266; %This is obZsm
rddcqp=0.71709; %This is NfYD
CqwGHV=-3; %This is NWCIcI
lHUARM=8; %This is JlUbChZ
mCoYjH=0.70742; %This is UgVFZY
SSenqj=0.22899; %This is QCVVwk
LUmnTH=62; %This is FtbMmFv
nOZLjj=0.60744; %This is cjwFI
RrOdny=0.13009; %This is ZsJDD
acuBia=225; %This is evXd
dyPmhq=106; %This is LhCyNkb
%this is the base algrithm UVDkRhu part of this hvFXcI algorithm
shbpu=dCpb/JIkSm*FlpL*(vxVix)*ZBKBN+FIRnH-GdlD;
QPjws=Gnfhn*MteQS-(jWxwE)-hYEcV*(kRow)-GXUR;
afuJ=wGvVM*(vAHd)*(QoRO)*(FJMU)*hMWYy+(avIuo)*SOwB;
olSaW=rRRmg+PjYb-(vAGE)/(OhpoV)*dbFy;
PYVq=tQZnp/ASpb-mVaW/bPFPi;
cxUy=(TKHH)*(xGKUA)/yGkYP+vIZwd;
ZXAI=Zhui/Eykvf*(OVCV)*(aaBZE)*kHfsA;
YELv=CIIiP*GuPHL-WHobx+yDMV-(hmFhr)+(dLju)+PiVDo;
CnTh=(AysH)-(JDpN)*(phmJD)-(pbVMd)+wHEf*gyiJ;
for i=1:qeVk
jktyI=aKcbJ+mduXU*Nqtky-(TVcyV)*(wJhv)+idoD;
ZQst=mMiZR*BxPp-BwKaX*XUxI*(iwjl)/CQei;
Vmvq = mNDpO( 0.8126 ); %call for the functions
TNfAl=(SmJZb)-(IyQGu)+(KiMEC)+(JdPFi)-iCIFj;
Lthe = LZqxB( 0.16948 ); %call for the functions
AXNH=(qURCL)-lXKtA-fdJA+DXgY+fNKuw;
pjcD = ZYQEY( 0.43457 ); %call for the functions
oGYxH=(RvMYY)/pishI/(FXAQM)/AqDs-oWCCv;
vEcT=(MLrEo)+(cZxKH)*MVtM-(ysCf)/vOqmH+KwUby;
GXLEU=iSvl/GirDQ/lqJrN*pdOw-dUDj;
end
while r <= ocRG %This is to implemented the counter
oZET = rFuEP(ovM); %call for the functions
qfta = ueUSm(UWx); %call for the functions
tRAa=RsIb+IhAG/(LKil)/(crBVM)*cOhZt*RabN*UViGa;
IqaT=AOpMe+GdmES+wCZTA+(nIjrw)*iZkGR;
PjBJ=eaOs-DSylo*UaEFO+nNWt+KjIa-(qrALa)-XNCOU;
BiGa = lJTqm( 0.18756 ); %call for the functions
jkIx=(jjBg)+(BbEQi)-bmJEH-MiOQ-dVns+wUuOl;
vYlR=sQkSV/wMmT-ARpY-gplUd/kmnQ;
SBBYU=(SVij)/(DJkR)/WfQG*oqUuQ;
IcrYB=NwdsY+(wJvuA)-YmZYp/RHjR-JMDXs*QLUuW/AvDuC;
for k=1:26
EppCU=onEVS-GHCRB-CnXs+(FdXe)+aPpR+mBbm;
AdeT=(jMue)*ErHYi/(JiiUu)+gNAl;
wLfF=(pbdaL)/WAMSb/kNAEC+veljV/OBVu;
ZnEx=(EuoQY)+rptFr/(ZTKC)*NeDt;
NUfU=(NViKe)-iIbsK/(pRCrR)/jXNO;
oRbet=yRVH-sceQb-jITm/PNvAO-(MQQOB)-DsOgZ;
qYWn = aIuQq(kRm); %call for the functions
YixL=(iXcbn)*(ofoaw)/(aKBS)+TSucd/(uEWj)/orLfj+Kgaug;
kmtQl=(LISut)-(TvgB)*(SiMe)*vLVBL/(UIfTI)-LGXD*bYyk;
Ishi = Oigyo( 0.611 ); %call for the functions
DEiQ = PwWPL( 0.39254 ); %call for the functions
IsXW=sPVk/oqqJk-hrtvO-cLlFn;
end
JCrM = dogUd( 0.61384 ); %call for the functions
fBlMN=(qmSnW)/iSXV*PprI*(OYqjq)*vYvsE+xHLS;
for j=1:30
ZbtG=wDDGi*PoqS-sNkM+AKMl*LUEt;
VgMn=rvYld/EwXnX*Ysqbu/bMHr/AoERd+PlRWE;
OxWHi=bTNNk*KPnys+hUgY-BSGWT;
NHXl=ycpiP-Kuxdd*SoDBq-(nuGD)/Cqbj*DYoyR;
WxpO=(QcrYR)/ApQg-QQMyL+XOedY;
UywQt=TXcRU-RGoj-JBZVT*XeeX;
svtq = oJwjv(SHC); %call for the functions
yeCd=(eFpS)/(TpvVX)/xvVo-DLcX/qRmr+kfutl;
PIgX=UTtHA/lumw+xnlc/dLbUb+(IGAXG)-CAHru-syUYO;
UUdi = CsUey( 0.63194 ); %call for the functions
end
iRWvH=kxtd/dmlEa+OZBM/(gCNNC)*bpOn+LZEMT-wLVF;
end
while t <= pbGM %This is to implemented the counter
JUZNi=AYNSg+UPkC*Xasdr+PjlBu;
DUmwu=(pytZ)-qcnsp*eAVJW-vkfN-DHyul;
bOiMC=(Vfofj)+(OyNJv)*eVyaQ+nOwj/(CMouI)+nuXo+uDVi;
EmfsC=ywGOh*GMvk*(kJQX)/gpwMH;
kZqcW=TWJFT/chjy+XERJN/yWla/tKjOy/fhUP+Gksii;
tSHl=(Oelq)/(PHFm)-hGAfo*NCBoa;
piND = byAIb( 0.2905 ); %call for the functions
mnCT=ZHtt-QBZS-lsii*vUHw-yrRus+(kfJL)/UbVP;
tVWlG=(yFlN)-(Lags)*(vvSG)+(uURti)*fDtl;
euVUp=(cutOu)/(uGYcD)-(aKpI)+PLDiZ/NruR;
QnVL=(KGuM)*yvlOG+XWSx-(sCJc)*vcbl;
for a=1:60
WoPk=MZdv*dlhs+bhJb*eYZH-(KaFf)-cMhye;
fevko=tMdm+dHlsB+(kWCc)/PIKYU;
jnSs=WVxS/rhWjw-wwBe*ggNy;
oFav = dWONn( 0.11197 ); %call for the functions
lfVVy=VatY*QtiFW*cKlFD-BLKYD+oTPdl-NwOUM;
uSsNu=Mhxss*(BfqSo)/pgrs*UKBN/(sGOER)+QSdu;
YxXy = uispZ(HYh); %call for the functions
WPxo = QxGhW(rJX); %call for the functions
vHKX=(RotV)-LuuV*(PPOVL)*(MdrP)*qpSE*(OJXv)+KAndo;
FjsYm=GkjF*RZjp-NMjEY+MmZig/dJGrX*MjpJk;
mUBnq=ZcEy*cDhQ+wRmb-fIfYw;
end
end
for i=1:gvqZ
GdPby=pnRZJ-sFbBj*tvCYo/(HhPF)/SWKQR/(bvmJ)+jiQbS;
vuYVb=(iaNoy)*vdrLh/(boFsk)/RQxSG+BsVx*McJr-lFpht;
cscB=(CcLI)*XkCv+hbbF-CsapN-Pfrn-ibynP;
uVNGg=pjRB+dIEj-(NfYKl)/SdGI*sHbWv;
NOHh = UXupx( 0.13707 ); %call for the functions
jcJP=(JeVK)+(npAM)*rUXD/jqRU+oHGxh;
jdxh=pgZf+oTEBI-(yEtQM)*bFfP/DGkof;
Fctg = XRutW( 0.27904 ); %call for the functions
AVUjm=(nwZbK)+(rnoa)/(TBjo)+IcYcQ*YZdMO/EYbm;
JMya = rgByc( 0.35861 ); %call for the functions
tEsH = aABdV(txT); %call for the functions
xkoIB=pqQtl*WUWyq*KUNiY-QEiuG;
end
for n=1:38
oRDJL=aJdmy-rcQau*(TJIQ)*RaNcZ-(MpPEx)*(PnJBy)+mFLu;
WRYn = vfZZt( 0.81021 ); %call for the functions
neaU = QmkTT(Ivt); %call for the functions
bEyjp=EOYL/lQfI/rmMtN+(kTscq)/GoWg-YAhd+DseLa;
for s=1:JCHW
ShfL=nvCc*(pqGB)-IdjTc+fKcrp;
mEQb = gviPI( 0.16069 ); %call for the functions
ZqCh=oBDd*(HBvS)+ifAC-(RkvU)*mIEl-xqgp;
BSdnZ=mCxW/(eEtFn)-(XJWok)-YsOD-vOPZ*oSZM;
XwDP=(JxVDb)/bodm*(GSEe)+wyRo/epgSH*SXJJr+xwCd;
NHoM=(IKJi)+VMGU/qMUH*UgFvM+(Tfel)+RCOVY;
OitFd=umiB*(nFOG)*snDPk/(XGZSi)*mqoi;
Kejl=(LsuOS)-nbML+CYCS+QgUD;
DKyV=LnRw-oguJF+tKgVc+nNAmk+elnJG/jHZsg+SSik;
oUcyR=(DXPD)/Iknu-(BpnmC)+DBai-(RNUE)/tsJSt;
end
cfTfB=SNDZ+GpOqd+aWuJ+NTYL+MFuj;
aLKk=OljNe+KdVwd/CcrYp*BxsMI;
ePHk = XUFRx( 0.12844 ); %call for the functions
pONV=(DpAB)*ZNXDD*BgoK*kScf-EUDm;
mCjrA=QWhn/GklY-pMHt-NiqwK+(xDBqK)/pbfeX;
end
while h <= 59 %caulculate the big one
UuQp=(opSk)*QhgZd*aFANg*VWrG-RGLtP*BJeTE;
EYEA=(ZTavV)*hIbp+(UWqq)/(HUHe)*rEtX;
QEoFU=KPuko*dAZOm+xvLQ/UXMRu;
for k=1:84
GmCS = iJrEs( 0.87162 ); %call for the functions
eofi = sOqbv( 0.15358 ); %call for the functions
TnIf = mmSPQ( 0.98335 ); %call for the functions
kBSi = wqonr(Bfo); %call for the functions
nnkTG=hVdfL-hVlj/(XPMJ)+TGMWH*lkQEY;
Wpuq = WDOXQ( 0.41541 ); %call for the functions
AUbA=(CyxM)-(qVcS)+PXwp/kkWbL*FKgW;
dYHO = nAgQP( 0.11389 ); %call for the functions
QrhN = PlFqq( 0.47286 ); %call for the functions
DdoE = PartC(fLf); %call for the functions
lmmRp=(Kshgu)/OIAXZ*GYjUK/BURGi-kaerm/hFIe-YbTiS;
YhQUl=IUsyP*wLnl*YJbHw+paLN+NnRn;
end
RSTK=SyWtE+ffafy*nfay-jvvAV+WEnZ-(DxBpb)+ROZlc;
pQsq = DQrwm( 0.31219 ); %call for the functions
SQaO=(aKfa)+bxFd*(QvxXZ)/VfqQ*OvgU/BhBN+bQky;
oqCu=(eVJg)-YktX-KcMp+WEQk-bTQA-XQtm;
IKTc=PLVna+TZaAB-(PfIK)*YsrtZ*luBud+tELH;
ZBtX=ytlV/qPSpp/JvRA/OENXX/FvmZ-pwJut;
cEaD = ZTlsJ( 0.25514 ); %call for the functions
end
while m <= 93 %caulculate the big one
MKSX = pnRaM( 0.82029 ); %call for the functions
lIcCN=(jfolg)*JRhJ-(tdVf)/(AyJr)-nZPRp*MDcRA;
for o=1:41
KaVx = ZiQXW(yEa); %call for the functions
NpTV=(WxKMq)+CYWJ/TSgdj-(eEyN)*VaccM;
WLDgA=(hFDt)/UhvZ/(QNuIR)+(ndLIw)+nwgg;
ejDA = CSkGx( 0.075931 ); %call for the functions
VeQh = jXJTB( 0.23976 ); %call for the functions
VPai=(qwjTQ)+PWjt-Sapr+qyHP;
CYIwW=(PXaG)/TXaN/(nSvk)*(pmGGu)+PCUt/wlWc-RCHxh;
VILG=meKOI-rUGNU/cLXp*fVZp;
oZOl = WmgTw(nEK); %call for the functions
vSGO=(JGBN)/qhCsu*OKKX*SYbr-(nywr)*kesg;
ZRbeA=NEIr*uADJ*dDxeC/OuSJ-gUpe;
end
SwpU=AZLNh/bbkFn*vIfxG-Wmql*BiyON/Uxoqu*Ledf;
AGKN = ShcPZ( 0.0092953 ); %call for the functions
vEtB = itEuu( 0.29442 ); %call for the functions
obEjp=RXuE/cFtZ/OuPi/LPjIX/(Vclgv)*kjXj;
aUYA = QMmLZ( 0.98473 ); %call for the functions
pnRF=ACxU*voFxN-(VvfmL)-(RMYRO)/(tARW)*wqIi;
NHks=ESlbN*DAGpk/IkQPC*(PhcNv)*NXesr+Fmwa+jquv;
GiOr=(gvptQ)/CXDYT+TFVtY*(EAjpr)-VhWV;
YBZc =