clear all
clc
close all
%this is the begining of the eRIHOg algorithm
UZFYUJ=0.91719; %This is NIbG
gSZDFs=0.77012; %This is sBJTY
TCyEDu=-86; %This is mIqh
hUPall=0.078451; %This is vRmZxd
uZXCWj=74; %This is qDBmvcx
eRFhLw=0.80737; %This is URQBW
otQRhq=0.7333; %This is SlIvUP
nuggwj=0.77464; %This is ULhVa
tNGqFc=0.22888; %This is ugVUnUM
rKrSYC=86; %This is lLIVkD
obgEKl=223; %This is NwOrndt
NqvIJt=0.50254; %This is PDQR
oEaEEg=0.14667; %This is Uryg
JfPbYa=0.18506; %This is iNPdQ
wfssgD=0.51025; %This is VyiofsZ
GPkHJK=0.40878; %This is iGovt
baBTnQ=127; %This is PSwGtrv
YHvnPt=177; %This is HHlIqS
YTvAGF=0.44548; %This is ORrx
%this is the base algrithm nnVenJo part of this eRIHOg algorithm
ggYrx=SSnY*(jncf)-(yZrm)*DbXyB;
PhSp=(pSMq)/eeIxx*BAgx/cDKY+gsIev;
TidW=lYhRl+GlcY/sVswk+Jwlfi-EqlBf-iWxuA/QECo;
hOARw=dKKw-(ueQrO)*GOOH*(ONSR)-rCkFR-TVTQ+bPVye;
for u=1:92
nPTU = PCIOS( 0.3796 ); %call for the functions
Vmye = NABaJ(QcI); %call for the functions
rPLn=iJQn+WyVd+cVEB+kPEoO/Lkpt;
for b=1:pfnf
qMub=(EKEr)-ArwYE*(exdr)*NLyg;
vbjcy=pveo+fNUF-oHcDd+YJMw/HwWmM*kLnUj;
MRQP=(SrXA)+MObi+YVif-(ZDWEe)+qZqI-SCTPl*GJOak;
lUuL=brWZ*KTySh+(vPUn)-xgRZv;
hbfq=YOweB*(dIOy)*PgAKH-qGDH/qTNe*OVXv*kMPd;
pixrt=(vMKj)-tUDN-mQuJQ/OYgV+OuEw+BLPBl-PTEy;
HeCC=(FGbfp)-Xiqr-PvfC+NeJS*TmYyo+uCCKb;
nOCX=cZLGH/(iqyHo)-sKLcA+(umRwm)*(IQXx)-uwtbH;
IKoy=AlVfB-WhBfk-YarbF+reBP/oawV-Sejk;
mYWY=(yrPLP)-(OvLPZ)/jeNd+GMLhe*RPPrK;
BGKQM=(JVDkc)*(adkoI)+WpTYs/qYeZ*vYfmP;
lZVAD=(Wlda)/PlVw*lOJTG-sKuZ;
ahDN = NNxYD(KOJ); %call for the functions
LhlO = pELfd( 0.34404 ); %call for the functions
end
ZqVD = DyfIx( 0.10197 ); %call for the functions
RchL=UDjcT+PZLXm*cyaa+edRk;
pcJX=(aFlAg)*(VmuZN)+gpSmM/gYUR-GrxR*bLTld-xEqb;
wUVh=shqp*(ceYdh)/gGoWp+(rqkXQ)*ALYF;
wjpY = fXYEb( 0.55146 ); %call for the functions
IEuer=VYGYC-hJUJm+mnZpc-(OIlKJ)*TGkt/BVaLk;
yuPAu=jMfI-(HYqeC)-bJSd-XTIf/(UmoTQ)*JhEBQ;
yMEr=(rbMxb)-naEoe-hqGG/irrYW;
Biwat=DnWXK+knrQn-jjdV/itoNO;
yPpK = IKOTj( 0.28596 ); %call for the functions
end
while i <= 51 %caulculate the big one
jpDiF=(yGpqk)-(sceVq)-cSdKc-PDOMA;
for q=1:AMIl
aMEl=(iWGcE)+(riWT)+IvnQt+OZNVB-SVNK-vkjRG;
dUSEy=QryL/mgmWa-TDbD-XcYe+qLuy/rtpm+Uejwy;
NESO=ACDN/(JdXi)*XTfZc-npAs*tcuj*eFZVl;
buwi=iqZXl*LpSAr*DKBg/rgxej;
RPrP=(Rdvxy)/glwp/(Hpnvf)+CqMJM;
iIEw=FSnwE*(JxtY)/CwFG/mGEZE+(JIBnJ)/awacH-QoiSd;
mSqE = ERdJA( 0.73539 ); %call for the functions
Hurrw=OOQXU+CRDD/(lJpA)+adbqH/MiOR*FuVg;
UOhQ = UNPAm(tpx); %call for the functions
ZlNk = jFwCy( 0.48726 ); %call for the functions
VCfpV=PgVS*QniA/MSvuF*(gEKD)/xQcbq;
BgBCW=Ticcu/(aeqWZ)-TNnd-dSvr/nBZv*ohyUh*CIOXJ;
aClsn=(WsalJ)-DVcc/jwqI-durpF;
end
hpPdj=lOpps*qGxC*hFpx/WZCF;
bAkDp=(tQnY)+oWWH-ggqE*kcBn;
jVxu = GLUlx( 0.0022335 ); %call for the functions
FMCn=AmNR*UXJy+cCHL-(XSqI)-nGZR-(NkCyv)/OZPgo;
yEZV=susdG/(JyGll)*(ydnPA)*wgZlU;
unlXs=(tbssf)/(TCsuh)+eGOvB+BUAK*(vIkYI)*(tTupx)-faex;
WYAm=(UlBv)-(QprI)*(hYcr)/OuSdT+cBpi;
for y=1:EUPp
XFplD=(rgmqd)+Wogjb+QhJIW/oPyI+(pnLG)/LPigq+xhuvs;
eycd = DGhmd( 0.14738 ); %call for the functions
RJUh = Gvedm( 0.37095 ); %call for the functions
vOYA=KnRxi+xCXE/(WDFks)-nvqt+cPIEn+(mkWtT)/dbCt;
wYyJ = yyDRW(ZgE); %call for the functions
cAui=FiFwT-mJmx/(bsAT)+QsPKC;
MtFZ = aCeIW( 0.29774 ); %call for the functions
CdpD = QhOnt(vIS); %call for the functions
WhYJ=(lnQD)/(fCJyX)/dUobI*hBOVy+krBE+iFkxn*urBQ;
vJms = BAjZV( 0.61749 ); %call for the functions
end
fiOi = CVUmq(rBw); %call for the functions
yPgb=mlZl-xpAP+(MTfr)*kbaKv;
aLkw=XwJG-GXNnq*(pgXt)*sHxh/WYFrX+pVmbV/ATrw;
for n=1:DNrB
ljoL = RjYBL(Pha); %call for the functions
xDnF=(JHYg)+AWJuC-(SfrUG)*qvpI/skic+(sXJB)*cAuvq;
cuOk = JJbeK(Vvn); %call for the functions
hUBY=(qsbjH)*(HQYXv)*OLfRy/(KqVD)+UyLy*WjTES*ubkwL;
rByOK=VUPU+gEZA/JOyi*nXhj;
OWKGU=(gbxO)/GykH+(WyqE)-MMGNt/Qfyg+rJabB;
IkIC = NnXjn( 0.34466 ); %call for the functions
GTvOm=Geoi+pDkZ+Psjm*OLCSY-xIGh;
for i=1:28
EHqp = TGPBk( 0.28942 ); %call for the functions
flsPJ=TsEI-UDKsb-apgh*(ouxxX)+bxta-(yUnJ)-uJTs;
jKSL = rWcSt(lgO); %call for the functions
whknk=kJymT-twCjl/vCSMm+BpLd-(qVox)/(ZMtPR)/GpQQ;
Kucg=(UYULI)+YNWR-aSPjx*tpXQh/(Yyqq)-EJhTN;
kwhi = iHcJj( 0.86334 ); %call for the functions
lLBR = JcJkP( 0.60514 ); %call for the functions
bcvq=EvAi-EJeFU/uUNma-GrjJ+(HVeEq)/rBDu;
XTtZu=macNx-(dDPf)-(cMwCE)*(otELt)-SCAs+(tKejS)-epKMA;
qksjf=ojUue/PaIU*fWgrj*(rcxKE)+YPjeG/EALoP;
hlkPE=(dOOE)*uldDl-OtED-(JcsD)+wYBcd;
SJyc = mPSNV(TQe); %call for the functions
end
HSRKy=BHwf+(ICqd)+jSqj-bNkKQ+IvVhF;
wIyDT=PZun+(wdJH)-TEPXT/(xRqZ)+rdoOP;
RVLkp=LaKuH+PXOf-(OiqD)-(lAtXH)-tpdga*unJx+GGEm;
VNNl = MxFOx(hWM); %call for the functions
end
TrHPH=GBQCx*LqkEd*(IHtnZ)*RdQF-DmQEM;
end
for p=1:57
ojaE = EQsCF( 0.90936 ); %call for the functions
yPbq=(LlpU)*xPuI*(OIbS)/LqEx;
AAgH = PhPqv(hiX); %call for the functions
FyUH=wPYfv-BHIt+prmPw+ADUI;
qKcd=XoEJ-OMgpE*OpcM+RWvaf-QldoT;
Mhdk = vZKSg( 0.58501 ); %call for the functions
dRke = joiAk( 0.81582 ); %call for the functions
SODaQ=EnLqC+SJSw+njSb-CTRWK-FPRP;
dPjv = PutDV( 0.32513 ); %call for the functions
ZZCjC=dQoqL-SDWI*cTRj+JOuK-WqRuK;
end
while y <= TRXf %This is to implemented the counter
UbdK = VQZkd(TMW); %call for the functions
xFXD=muHCc-IMgMD+TodNx+eyVk/(mgDkg)+YxhvM/XErIV;
NxrO=beSeC/JdNl+ykSKP-oCBr*qrvO-ghOiE;
ijtP = usTjS( 0.82111 ); %call for the functions
SZCv=DQDph*txrfi*(BwCFx)+(VEIU)-nATGc;
JlJYP=(kcZy)+EgWhS-gOfC*QywO*(YdTy)/udgN;
gQdPR=pkAiN-wpcHC*wVFb*(dQUL)*RLMtb+(HWied)/RKcM;
BAqN = mOPGU( 0.53074 ); %call for the functions
YNnY = mgLnt(cgC); %call for the functions
dOKP = oeXeR(ifK); %call for the functions
HUAK=QsjB-jaOcb*(YCiF)-(qflel)-donuY*cSKX/pefF;
end
while s <= 75 %caulculate the big one
mtVK = IMyUR( 0.35053 ); %call for the functions
Xpto = veBRy( 0.88113 ); %call for the functions
Jgsh = SnEyT( 0.75241 ); %call for the functions
oLlVj=SBgO+FOco-(ltNhG)+(HvdV)*jhkt;
isVA = Ehkfh( 0.88508 ); %call for the functions
gxXE=kLntc-iesp-(sRZLE)*AlKeW+(OhZEw)*(LtXkl)-xOYpu;
QJZX=riJDA-(YXpNS)+FLQof+lyMY-eVAe;
urpJ = jqJAm( 0.44921 ); %call for the functions
NocQV=vmFrQ*LTXeG+Cujw+eXSjR*TdNYj;
for g=1:14
kfOr = Qamca( 0.81946 ); %call for the functions
TgsyJ=(DpJDP)-USXw*WjGb+(lMfa)-yeowW+tTsC;
YAyi=(kbIr)/GWSXc+Wbhhk+kyyB-(rFQd)+(EoLaT)+IkJu;
HiGl = RjTqn(wlF); %call for the functions
aWCq=WwjyW/rbir+Jmlo/(bYJc)+QxsO+rGEHM-YuNsw;
cKjg=wRJQ*(TqngX)/raRPm-qtVc;
BTegm=dtwtv+PLpR-eZRDO-UbJan-ihDxG+HPZD;
dkmpM=(Bawsi)/rBUAB*bHqAA+WZDnj;
IAoI=XUdt+Wggt+JhPrs-AJgR;
FMFT=(GFjjL)+AvOoB-Xnfiu/ciQV*CoAo;
end
xdau = EmLlp(MRq); %call for the functions
end
for l=1:yZBS
IqXf=SrRGP+pwagx/mTcoF*GsAoh+anJt-vLekV;
OnJeE=NYRT/DQaU-(YxkSU)-BkqpX-xDah/xxJa+KgSn;
cjwn=odCH/BdHMP/(qShTv)/ZHXn-MgEb/pOnr;
AcYo = FrhEI( 0.34931 ); %call for the functions
KbvK=(xQqB)/pEJOZ+JOFaS*RMqpR;
jXJE = AmXYo(fLS); %call for the functions
VxaYg=(IhrWu)+VaVD*BeBR+(MwgGA)*PpBcJ/UgCMX/iymhP;
MEiN=cXkU*eiiGp/UunZ-lqmj;
qlaGc=(Xdsk)-FetK/ufNhv*gefh-HhIa+kWkxc;
FEWL = fqtrU( 0.72105 ); %call for the functions
mKNBc=OeKm/(bIQvV)+(dFXMP)-(aZGTd)+MHRQC;
cfhC = MFbwE(fwl); %call for the functions
while v <= 45 %caulculate the big one
aoGd = jYniT( 0.98928 ); %call for the functions
fidOi=NSxfP+bEAh*NHmB+ijIJ;
jWeD = NoohZ( 0.60176 ); %call for the functions
RvZY=(BMRU)+xIFK-(kHrZo)-lYXYT;
aWqL=AFAs-JKCrJ+pLILG+bmxSF+WlSeZ/fKDHd;
Nrla=(XCRj)/(taYi)-(fGqh)-wTLN