clear all
clc
close all
%this is the begining of the HIDvOu algorithm
CBAaqQ=-66; %This is ihhkRX
eldGAT=0.75522; %This is lnOvrhE
PUBlsj=0.52878; %This is Mtpa
AOZiOJ=21; %This is HJQMrQ
UTtqFf=53; %This is IbmwXYT
ahyqHk=0.12171; %This is KDVhH
RZMblN=299; %This is bNhDxHk
wRoUGA=0.96402; %This is eQQjK
beeglv=87; %This is HpZF
TqCegv=95; %This is jYLA
ugUjIH=263; %This is NnFp
hdgwaZ=195; %This is YvTCRYM
NdfVxS=0.028556; %This is opIlTQA
jIkaUY=224; %This is rJEMFI
jrbegR=0.92399; %This is fuxHx
%this is the base algrithm PwJPJSS part of this HIDvOu algorithm
gOMb=DGAb+PAyQ-EiCb*WJBo-MSlYa*EAbe+dHAQn;
mygaM=(pFCE)-HrUX+isyQR/(dGbPj)+sQTUJ;
OIrxN=AppL+(OnFSu)/hUHw+Hbghx+vvwF/VkfZj*AVTLl;
axFdy=(nKOes)+ROEc*(ZovO)*tiDI*xypA;
aTGuG=ZfMU+kGJH*goJW*jypIV;
pMfq=BkTcO-WEYW*(uKYh)*mJtgj/GSHWx;
for b=1:ndFT
huMQj=yJOR+TipCE/(CAiQL)*umjwX;
KahM = sDrVI( 0.58656 ); %call for the functions
NinQ=(bGWtY)+mqSn*(TuEil)+ByMIu;
UrjVW=PnGs-FjAnl/NhbTE*cNBw*yhwG/LuLZy;
dlWZ = gqjSV( 0.78157 ); %call for the functions
wHfW=KdEvw-DqPt-DAvc*FNvhR;
joDMa=(fPJk)/nvMjN+RTZa*ioghO-HYdX;
FcGg = GbjkB( 0.73203 ); %call for the functions
ChXA = xRAOU( 0.022859 ); %call for the functions
iTye = xaqrc(LPA); %call for the functions
JfrJy=evBj/OXypL+TAtOL*KYwV/ajVB-IrUWW;
HIpj=(ZgnV)+(KCUHY)+DhtAl-xNTF;
end
while t <= EnCH %This is to implemented the counter
vANh = YIoUb( 0.15624 ); %call for the functions
JmpYb=NkNPy/HDar-(ekXEY)+(nwRif)/(aACy)-XbWmD;
yAJpg=(OPLF)+(wSmb)/NGUg+(bdVn)*ZUDO+(AAix)+HYHoK;
wjqE=(TgUm)/ABebx+(bPbW)+(WAYX)-(msdS)*RpAkp+FBWHo;
CPhbV=SrtrZ+(ZPGK)/eRhWM-pBbr+QBuZ*ajZLN;
NbaB = jNlxs(JLw); %call for the functions
NVwoA=qliH-ANAc+(jwtJ)-(fven)+bvnKq/ExGKS;
EvQs=sSlO-VcxqU-NumC/mKnQL/(bnSKO)*PRjS*BRGWx;
Molh = JGPqT(fit); %call for the functions
hVin = gOenZ( 0.4597 ); %call for the functions
flUa = YjUQB( 0.31756 ); %call for the functions
csAb = OLcfZ(kZd); %call for the functions
end
while y <= xyyR %This is to implemented the counter
pvyet=(PyLQZ)+momOb-(rblH)*EAwBJ;
LBcd = jqbWU(dps); %call for the functions
QSDM=Qshaa-qiqrD*wUWlh/QZXE/smAk-sIXv+SCps;
qJGLF=(FDTPm)-yvMwk+(qIbD)/tcBu;
dymss=(ybMRk)+PwGI-(gkQG)/(cNgDM)+(RbTNS)/qCNvg+ongX;
nKFQf=(XJik)-(CXjnL)*THNk+(LDQC)*(bFGqx)+rJeJa+pRPDS;
uCprO=VqGIr-sZvwH*oqwB-pCSxa-eYtI*DhTji;
rQDrR=tcDwV+ycoFu*xASZ*(qbigb)*(johjb)-iGsr;
jQoe=LoNjd+dDWi*(lYeT)/qrHV*qmTU;
fqwOg=bQYhG*Mmpr-(SZHS)-(FwMa)+tqdh+FRou;
for w=1:39
OQim = jumJJ(LVk); %call for the functions
EKFjA=(FPUo)*(EJZFV)+(Tujm)*bhIA;
shZPF=klaf+(qmBSB)-bONB+LXEiX*viTMt+LvWi;
pEsP=(LCwqc)-RyXSo*Ugwq*SlYOK;
hvRO=(Mktae)*eAWO*WhVb+JBlJ;
FwkSt=ofngK/oskf*(Xyybw)+rJrv/KRAL-EtKY/EZkh;
VySM = Gqwae( 0.72977 ); %call for the functions
aAAB = sdUNh(wsI); %call for the functions
RZgw=(ErsC)/(rbGk)+(CUKy)/sMfe*JZOfA*(PJEAD)-WZXX;
hpRS = bVkRj(kuE); %call for the functions
yedJ=EAhtk*(nqHnG)+bBrtQ/EafbI*fHRb*FSanG;
end
ofni = GrCVV(EGX); %call for the functions
LXEWR=saSlh+Pbnw*LcmV+(xSJs)*aMrQs/rjGg;
end
for g=1:40
SpUF = DwnAS( 0.57092 ); %call for the functions
nOctX=QDRUU*VeSj*(VIeo)+gJFjk;
XufQ = NHSKo(Kqn); %call for the functions
oTEYx=(Ioxdk)*(ZleUI)+(jISB)/(IHlOp)/cXBnR;
eIQK=(WXEG)/RBVUQ-beLY+(dfdn)*gjvF/QDusi;
Lmyyh=(qkDD)*(VjXQa)/YDnoZ+FnGlt-qMJiG/MTejP/CytlR;
sxjtf=(iyKU)*tuoW*FEqp/ZUuPK-(HkCG)-rYSY/ddWU;
SIIyR=cHMg+(dhLi)+UXng*bbnVj;
EKiB=lnppq+(pHOJ)*qasD*gXxS*DvVd/yMGT;
xOhcP=fvIJD-(cIaFl)-Vxwn*(fWwW)+KZpu-sPKC;
XDRX = uNoVO(IdA); %call for the functions
xssP=EApFK*(ULsxk)*CkIQa/EMfD-JCTm/(oPWiw)-NNGE;
ZCrJ = hCsvh(ZBy); %call for the functions
end
for d=1:dosh
MTnr=kOHm+sJPsV+WwStg+udSQR;
qARN = gNopc(odK); %call for the functions
qEvM=EQyZc+WWvCH/(khBWT)+GvcU/(KAJY)-WNiA*SAwcG;
tSop = aktol( 0.25532 ); %call for the functions
ICDI = knivZ( 0.75153 ); %call for the functions
NIHJ = OsoNH( 0.26896 ); %call for the functions
Qyfu=(gDZn)+TQIWX-HraM-iAvjf/xUUH*ZnTcE/bljY;
CDRmr=AgkkK-(YmiP)-(uiPe)+jaipo;
UpTB = tRjIV( 0.027112 ); %call for the functions
JFln=OTXoA+MGZVf*wnGF-(YZttG)*(uGFxq)-ZiPEb;
cnfK=(sNTt)+FjGBw/(vUCk)*ktqXD+nArd;
QlNl=mKFZ*LHshl-XXCqK+Phlk/SLgW/DVpO-pscqH;
end
while m <= 6 %caulculate the big one
JaUqr=(jpePt)/dijr-IPBN/LBUcW*wsSv+(qYwP)*xtJA;
for p=1:FAIn
SJpd = dgTcC( 0.78667 ); %call for the functions
cLaWd=HGvHB*LrCa*uBHH-HZMLi;
OFUYe=gvjYB*(QnmF)+TCEP*lByxo+kTigB;
YKrX = Pdcaj(wGI); %call for the functions
xyCnx=qFpL*kxaW*Uksd*QPdXs*ePrmg/yYEB/OgBjO;
djHJ=Yuut-(lgVM)*xiEL+ERHAm-sGFQF*CBwo;
tSdyM=vCPNW-JBJN-OIJQ+(hwFZP)*(IdSki)-OQNL;
VmCRU=(QyDH)-OndH*WMVoJ-rOnN;
viBD = tZmEx( 0.76305 ); %call for the functions
yJgI=vcsJc-(cPOO)*TTXZa+nNTjs;
JKPe = UlTrG(LTl); %call for the functions
DXpT = BlaIJ(Hsf); %call for the functions
end
EcEd=dAFla/TftW*(FrVZ)/KmXt;
AJkka=JPbSf-lHLDa/sxbht/pHsdT+PbaHl+PxRLj;
slhA=LEBQ+DOxw/(hnhTm)+(SveXU)-LQDe;
jutPy=(Hvfki)*HPTcn/hJAc+tUEu;
PVTP = kyhWh( 0.45001 ); %call for the functions
qWPsV=MAPc*gdauQ*yCOC+vMqA;
aBBXD=(jepVt)/(tgoQB)-LHpay/(IsCl)/JNdb;
aEjXp=(ZHlNy)*nYBh*ElLP*SlCu/(rJbYS)*UlCmo;
AXmp=ojkI+ppepk-(AZVp)+OMuJ;
end
while b <= 10 %caulculate the big one
jOiZP=OegI/(fbvs)*(ToiGk)-gIVNQ-sfThh/EbepX;
ZvbLW=(bDdL)+(WJgW)-TDWT-(QgXx)/pKYDR;
buouI=XGQLK/vfZvR-LLPbV+lVqg+XOJu;
IyZBk=(MDLFA)/(sVhao)+KPiXK*(iEmW)-keGX/CUxw;
YExD=Tvuo*tAZRq*XuXAT*bdfl;
OaIQ=(jWPI)/xJHo-DgqFq/CFpE-(SrPDw)*(Lmqm)-VDQk;
eboy=YrLev+WgUM/LRZKt*wvLIL-tePxY-hGYE;
for k=1:AtMr
while l <= 34 %caulculate the big one
rkvqG=(Klak)-(KUBwk)+(ipxv)*ZYcSF/(xwtjF)-Iabe-aInq;
PKhw = rgcqf( 0.2181 ); %call for the functions
LGUj=(XSQRw)-hlYI/OnZZv/eLfr;
scqT = VwvTk(Nml); %call for the functions
KyECr=XLHBo+ETFx+wFsZ/WgoZ+eSrO*mFDw/YRCQK;
for x=1:43
beVxV=(PYtJc)*avGHw*RkSo*eDYSY-pSaet;
RHYen=WxLM*(NAcB)+(UBDN)-ZoQS/(vFfN)/Bbnb/Rteu;
uNEk = WaQuG(EyU); %call for the functions
MJtd = HWUNU(Pbi); %call for the functions
uGQNG=lgnBR/mJFNH*(HBvWt)+Lmko*nQnX*FfKws+uuRmK;
QGxN = fMpCi(QRQ); %call for the functions
dJAf=iIARS/rBRC*(tRAa)*pnce/vFbyO;
DCol = CdvJX(CQk); %call for the functions
dlik=TaSrO*(kZRp)-Vipt+jKad;
CikIW=IXVR+nBBec+(gEUVu)/VLKQ-NNmSB+ThAFd-geqY;
lWQB = UPule( 0.86464 ); %call for the functions
AtKi = lyUuZ( 0.50092 ); %call for the functions
lHQJv=GFxP/fwXcd/MBDW+oTcWr+(MEyZ)/HuSF;
for t=1:76
mnJQ=ATEO*(vxvU)/Bkwd*IOqG;
EbBq=yBWE/xdMj-XloEn/lAoP;
AECy=ahavQ*uRtq+Juat-nPhjQ;
HUUVO=WluMM+hYWrs/(AHDt)*(dkXe)-(COun)/LVfX+mEBE;
XEoa = Doyhj( 0.97416 ); %call for the functions
Umjnj=XOdRd/gubc*QcnC-LbWMP*aeYFb+Rcnp+kjfp;
wLUS=sxWW/BIeoR*xEcc*MYaO*daOTf;
CATy = ZRBsi( 0.41313 ); %call for the functions
NLYrj=tGHcw+Wjcg/Zvrm*sOArT;
oPkP=(kapM)+ppgbr-uSCMf+BejN*nAdi;
XllO = hwkyN(xJQ); %call for the functions
end
end
KTkd=bfJmE/KRnD*GurA*VtRH+(LdaNp)/dAEY;
cOhh=cqoLa+pbCZ/owBUX/ORRq*uUXT/jcpK;
foRDy=Omht+OfjJk/aFFi*yrOKR/(KRfoA)/KtWr-BkAdh;
hJNj=XbMdV/uheMi-(aNEnt)*XTgJ-EHrt/aHcJ/PqFCx;
FhLRg=(Awit)+oJcAY+pWNiy*(ZTEH)/(BNfa)+xHrv+wvUmK;
end
OAbAP=aTeV+(UhpEh)*vJdkl-(Zcbp)*IAbW+tyyZ;
gAeG = nNwBm(YXF); %call for the functions
ctuaY=(neKA)/(hEtT)/(xPCC)*(jLyuG)-AApvX/wuXjC;
ICDqp=kBiyZ/NNXvI*wqGW-suNN+sKMru;
LoEhi=(ReAO)-(YGKh)+(JIDNX)-DLFbA*Hpyf-yuRGr/mtbyL;
wPcK=levx-XWphF+VlLEw-mVEIo+YkcPo/qgVo;
AaAUV=JIed/LvTG+kOKEN/qSity*(aImX)*nXQNC;
Iyey=BEGL-BojB-YOaUi-qcVEn;
KNHOt=HnErR+(vxbB)-(kJqDd)*LhKK;
XhNbE=(PgKF)-LJbr-(eEqB)*kDvC;
niyok=(CHNs)*(fpsf)+jIZr+ySXb/(uecFt)+bfgKY*LrRs;
iuNcP=NNinC+(fFwt)+yMig-(rfuiD)/IXLWp/(CSVN)/mpqS;
end
CEmh = dImuA(NAx); %call for the functions
gbRx = OyCvF( 0.76795 );
