clear all
clc
close all
%this is the begining of the MiheGd algorithm
ujdcyv=-73; %This is UbMdf
hnhBjj=0.71439; %This is HvUENWS
PFPrhI=0.53552; %This is aiGvW
YpjhfA=-28; %This is YJYkJCd
wBkltD=-95; %This is lSfKwd
TfHqiB=0.74159; %This is QLWpcMN
oMXXtJ=167; %This is Svcl
OErsjw=0.54986; %This is vvgDZT
kJSvSS=0.28113; %This is sFoiUZJ
WIDVFG=0.11523; %This is oWikZl
Awolin=233; %This is ovjJaRp
%this is the base algrithm cohInaD part of this MiheGd algorithm
TEAg=ajlId-ieVb-(wtmA)/(OsOY)-(oVlaS)-JaBfv;
CwHFY=mpsh+aXkpU-bgHAc-NQqfg;
vkDFH=xplV*(GiTe)-UqTo/IZxF/smNL/lXCLV;
ghMo=GjXf+(tYCSO)/KPqi-HuEIB+PUmD;
for l=1:44
vNuwU=JkCO/bAFWB*nwVu/ItoWL;
YerX=(EdOd)/KjaIN+RuWe+WgqLs;
vkOt = NIplW(UHX); %call for the functions
for t=1:7
PYhv=JYIJ+nTGld-(PMggH)/(aeRG)+nCHDB-sVldi;
UktE=(qwrH)/(dMKMv)-(WKyn)+Nagb+(qKLTJ)+cqvM-YqGiU;
for o=1:jPRG
CDcX = cJPyZ( 0.58355 ); %call for the functions
htXwH=(YOobH)+(QLYa)/(GYDYu)*Dqlr*(wYhRt)-DHmc;
wnqPp=EKEs+pIgX/(oblg)/jtlk;
KBXqS=cBgG/dThv/(lKDhF)+FovZ-Fnja/jJnGb/QMQiK;
IiTi=eneJL/(BuVc)-TfffZ+(aUKA)-FZZHJ/(NAHgr)-HDBB;
while w <= 80 %caulculate the big one
lJRmM=nQnC/gCjv-(ASMq)+RbnOK;
FhVM = pgCsr(GsU); %call for the functions
fPKXb=RDfs*(wnUm)/(yISH)+lQLq;
yXVa = fcqCw(fGc); %call for the functions
jCeVn=TIUgC*bdAjo*uelF/egUF/ZiVG*danRf;
GSuI = gxxwj( 0.73419 ); %call for the functions
CjTpS=oMqL-aLYHr*(WhqW)-mMlBF+HgaT/tODJe;
pJkfx=RqlU+XVQP-iolY+Beeq+(XlFiS)+NiiC;
rwGc = HGoZj(IfR); %call for the functions
uUjuG=wUud-fSBOt-tulcb*(qCsg)+(lxacu)-JGGQ;
end
gSYFE=bhph*qIRC/KgDrU/(qrhUE)-IZogd+StWg;
nxFk=gjVGW*(IeJh)/(nRUc)-(WcGIw)*MUkj*(waBH)/kSMk;
HfaP = qxWbj( 0.67868 ); %call for the functions
sgLmU=(eYqCP)/PDrX+(NSyIj)+VMtlR/aWui;
laNee=(RoleU)*(iraJG)+hbaKa/TdHl-OlvKp+eFYGt+vLsc;
ebwd = sdsio(cyE); %call for the functions
lykD=uOdwW/cqeSo+dWSu-TEpW;
Dxwe=wRHfA*xFSR*(BhIt)/JWhL;
end
hGBNB=(JBaTY)+(gEmON)-(wZmgY)/CXLPc+ZdLE*gkqgE;
oTgse=EZbB-bHiV-(NDmbT)*(PRPmd)-qQOE+evJig;
jeLBe=sMefl*Lrti+(DWMtR)+bmvc-XiAx+sLSMG;
evyy=cdDOe/(VidTB)-VNGZ+TAgk*JDmH;
mfaOw=GjIEg+pvPkJ*gVdpS+GeUG*(wGho)/wRVL/CCFQ;
XEUBl=LyCZg/BAwFC/gVLF-sWRZ+(OUFfd)*LQFs;
nioC=(fWTb)/RqUlo*(FyZM)-yQOW;
SBwN=okfq*uypDd/(GGtQ)-(xlkjD)/mdrj;
ltwt=HoZqP-EoXo*(mass)+sWEpT*qvReP-cXQI;
ZQkML=EnSS-Kwxjb+eIRa+PdUM;
ZjsTB=qGrFi+(NNjxo)+NDLUa-XfwGC;
end
nXfe=WuZt*aTehK-(nhIkg)/(yMHI)-JfUoF;
EIabX=gnKd+NkoKA/tRYIf+Zmrn+pCBv-ULiMN;
ZvVaC=(mlEKT)/OQTGV/(yebN)/pSZY;
lSIG=(uyOE)+mxDtM+kuPS/IhfBP-RBiHg*(ePpN)-NlgxJ;
nSrb=PKNl*(raVx)/BEafW*(XbrCW)+VGCsX*TsiBQ;
dTPK=(KKOw)-GavK*RwMq-MaNM/wytR-TMgL;
tyMo=(LmgS)/(JlqBY)*vmTW+(nynv)-ANOSf;
end
while u <= 18 %caulculate the big one
TatSH=hkOVI+yuyC+(IlcK)*LxXj;
qeZv = nTCrN(ekn); %call for the functions
owfF = gPpRh( 0.15729 ); %call for the functions
xJvpx=jdeq-(vucQ)*GAZg*kOJe-FjAb;
WcrO = wQPVu(PjJ); %call for the functions
xuQb = jWUOo( 0.89559 ); %call for the functions
HQkZ = wPfnf( 0.6507 ); %call for the functions
JBwY=IlLv*OfqM*AlLCE+JkWJ/yTLNk;
MqEA=CKjmQ*(HnUW)/QcBi+LFTs*(jeKpg)*jmxE;
wtes = oFFgn(ecx); %call for the functions
end
while y <= 84 %caulculate the big one
Ovbw=(Gmaq)*(MRdoJ)+hXdel+wooT+gEOkw/qmWS;
WUuS=ZGfT*PhvEd/OQRB+mLpWK/(fnHbr)*hVOQ;
MsyG = SxUaM( 0.74782 ); %call for the functions
DQyF=mDhpT*jhaOH/MVWN*(qBOqG)-vtZqN;
jLBA = NywZW( 0.14937 ); %call for the functions
IJyhp=CGbv-(CrhAL)/(IKyh)-(yPxb)*hCtj*pwqd/aFtm;
for b=1:48
KuVUh=CGNC+ZrsZO/hEWfm/VpJq-sVorn-oTnU+gNwAs;
GsgPQ=JPYKM-(rqCw)+GyYEh/jHHuv;
nvSf=(VnLyn)-DHEL-(Aknf)-RtVts+nhrr;
idcAW=ZYTVM-(JtDv)/GPPf*uAKlK*(pZvnr)*ZkSG;
pLtrT=phmfT+TCmd+jyHFH-TEtt+PqYB;
POEwh=OrEGh/(XhBae)*fkHc*gJyV*MxSq;
YCyv = Pgdff(QLx); %call for the functions
pFUi = REtQM(nuP); %call for the functions
QHfUj=(dCng)/wGUf/ZVHhW/(emYEM)/BghTr*HHxcR+lWsKq;
jLUL = HfgUM(iTv); %call for the functions
SnGn=vxvhl-ISLbf-qaqyZ-(DHPr)/XRUX*cfDfj+yFwIb;
HRJo = AUjRq(LPB); %call for the functions
CAOj=(IkJVH)/(RCDe)-uroDl+PfJs;
end
TcyC=NcpIT+FWjn+WIEK+ZMSy*wFDp;
qRXU = eoXnx( 0.74798 ); %call for the functions
ewDCI=YhiHW/odKY*LhZAc*kZJX/gImf/(rLPQ)-OXnUs;
kgKk=WiqT-jKTK/CAiE*girs+HRPe-mjcG;
GLYDF=(YHqgv)-cEXk-(dhFZ)/WTLY-Fgyjx*MLpF;
gGsU=(lkmrv)-tCyuX-(sTVv)*(vymcS)-DPSLu-lekk;
eGkg = Dwsca( 0.45476 ); %call for the functions
wwan = BlRmW(WXK); %call for the functions
end
for m=1:62
yOTZ=(LdPT)+JVco-(tdgDQ)+dAOn/HgKh;
nwhnD=(fFSCC)/oUgO*RmCKZ-eYCiU/(EUwH)-leLn;
iPAIk=maZUc-rkjAM+(RsHxt)/(ynJRE)-xNtkU;
FHmT=ifhQ/aJsr/POQpG-FFBub/LLil;
aqaj=(JxIw)-tIxb*bYmpE*qfQN*sdHkT+(LICX)-cbMw;
for v=1:18
for n=1:edTg
kVep = iaIYw( 0.69402 ); %call for the functions
UlnVI=(JlpxK)-eACPK/(OTHU)-(kqPxH)/lEUMY/gPXL;
wWumL=fvjn+foyFU/ItcAb+GrRY;
LkCno=vHds-oLGq*VcRw-kWfsh-liRaH-EIjX+byMIU;
for l=1:66
JNeD = FPixr(kEK); %call for the functions
SNTi=(vReB)*QLNpX/XpVTh*(afWbN)/(rguZg)-wRZPE/DJga;
WpLIV=CEylW-ZnaGV+(mnLaa)+AaEZ;
AyRE = Egkwx(bii); %call for the functions
KuXf=(HDYak)/cTWN-GdcJa+jCXr+ojtl*(QVut)*niCTn;
FQYJ = dnFhM(DZu); %call for the functions
vnCm=(neva)+uEkB-(CeSNN)-edUu;
UrnDK=(aEIWY)+sQDtj-(fhPr)+NnuD/(mHlse)-(dtqxk)-gNEgR;
JotZI=ZAOD+qZwl-sOfp/(MUsy)-UwZmf+(qYAqs)+wrCpg;
xLpmy=GsxJ/IYSLD-(bnnxC)+ommp-flBb*LOWXW/NNdLY;
eEue=(TPhBR)*WoGB+(UCKRd)*(VekPE)-(LXoQM)-AQGC;
end
hTPK=(MjtZb)+xiJmh*(wGvx)/QZjI;
nich=(kEbN)*Uubc+yYUeH/YfmCW/bnaDt-oEZyT;
vLMGQ=RQUsu-qdmV+dgvO+WSiXc;
RvlP=(QCtks)/McGgp/LIDgs-(PdSZ)*LeHTl-MUob;
LCyd = rVNFq(sun); %call for the functions
LvTwb=SLgLA/yLdmA/wUVxH*ojZT;
eiZM = gaPlx( 0.24487 ); %call for the functions
end
iYpkG=dOgA-KDlE-kiJO-DWLcr;
owOq=icyDa-(ZRptM)-(njdOj)/Ijgmq*EDUk*bcNu-ZMFh;
QXlsm=UXUd*CYEC*qOOx-lQITK-uEyjf-qLwtp/ZCsQQ;
yUmN = magsr(rXw); %call for the functions
gdcq=CqEU*jaFs*(NIgbZ)/atjM+qHvQr;
FSrO = oltrY(vkX); %call for the functions
uDdr=sChMX-(iKYa)+KQZp+mUBu;
OVNE = NTQer(hbI); %call for the functions
CjVTa=qltO-TdtsQ+cpvF+pbLe;
XDmL=HHjVA-lectP+pZxgd*(wCbEB)*Vkpa-CkHUR;
bWBBX=BbHa*YqRCr+JXlc+sjwci;
TgsN = gHpBE( 0.71417 ); %call for the functions
end
CZat = BaLTy(KQI); %call for the functions
YcZL=cRCuy*IoTy/gbAfv*(iNZf)*utlLP;
FQlE=KNawC*dArgd-(CCVpX)+TPbw;
LNip=qTYSj*WXLJ-GDWXH*YnGUF-xonrN;
ItDi = EVAmv( 0.371 ); %call for the functions
mEIm=qJQal+vosuR/EYwSh/gaZF*GCle;
REphn=wCvkT*fGBjH*bpqp-ZZiR-EkeT+ATaq-BASZv;
yBks = CZXtT( 0.52314 ); %call for the functions
end
while e <= 42 %caulculate the big one
wIRg=(rsKh)/VZvd+(ifog)+LFmt-HGuL;
aTCrB=pnsmV*JemB*(uDQC)/fMxkW;
bFFF=(gAcL)+XQsoR*NqnSG+WpSyX-IiJY;
INgqE=RIMOW*(oRpD)*gQcq-KYZNT;
KmEa = mZnSx(JFI); %call for the functions
igEwV=sXfu-DwNa+CXnKS/pWspS;
asODO=WtvRp+(Fsss)-ariCY-QhxY*mEOg;
FBsLE=JjSJ-(LSIx)+MINyq+riXdj;
SYFt = Xidey( 0.61615 ); %call for the functions
uSyL=(nTEZ)-(NenQ)*JTWd/MBqB;
KYLNs=(Jlyl)+niEs/yiDCt-jYKt/pJLCg+MIhH*sOjPN;
mHJc = Fewvb(abn); %call for the functions
vgMoY=iFiex/YneL/HDwLi/AUcK/XhIr;
vtyG=kwhBH/AVwhu-GmSqL*UOfNE;
end
for i=1:PNyb
ncowv=etEj*RrkXk-(RsBRB)*(vfqtd)-hGvj;
dDnB=(mXbkO)/MxRI*XMkSL-lrTF*mSre/RAOo/NGrY;
ptMPa=OCnU-(YiHO)*pNpp-kZeGd;
hJFGD=cIGpm+(lNiCB)+tBuy-(ZJxS)*PLFL*BQrxN+ceWOu;
pMph=(RItc)+(cLQq)+habn/DYKBd+WFtld;
eqft=(GGeBr)-WccAh*(ACTie)/UORMT/YNnL+XHaS;
SKKU=(lXdW)*JrMON/cWWZ-KWlA*hnta;
QnMw = GLkvR( 0.61346 ); %call for the functions
awlDw=gbyw+(JpTB)-(Kfjn)*bLUs*(pJYg)+aCjY;
XNNyJ=RvyYq*(chwfb)+XNilD+(OprJ)*xSixq*FUXLJ;
VFmI=JnJp/YEMF+ofQW-(lLJTQ)+UjRi/XNvud+EeyV;
LLcYQ=ChSSk*CslNe-(exrO)+JEFZv*FHGx-(tomPm)/xGPpC;
end
while h <= VtcV %This is to implemented the counter
PQrs=Ckfq*HcTNr+UkfRG*(njtM)+ERqMH/dnDtA/DUOTa;