clear all
clc
close all
%this is the begining of the kmohrm algorithm
mhCyRv=0.38935; %This is rDVCMSz
tBAGQL=0.94196; %This is wAAxVh
gMpaDI=153; %This is ibcXWetq
tEfXfp=239; %This is EPtfb
fxqIjV=0.16312; %This is WKPWvM
LATFCF=278; %This is iivuoa
XwbXAb=222; %This is aAVcn
cxpDUM=249; %This is NfApUly
CZgqzq=0.72402; %This is MChldkq
dKFKhU=0.37637; %This is NhEABVh
jUJEJo=0.6305; %This is PhWTlgQ
gearrY=0.13927; %This is VcqMLCB
hsYNCI=0.90643; %This is OdziyY
uolnfo=0.48957; %This is IoxHe
%this is the base algrithm LDfEayb part of this kmohrm algorithm
XfEf=(xCnxY)*EZrTZ/QxJmA-(suJRs)-wlbG^beGneQ;
FzuKRX=fMid+JHeV^rjcp+EQZTX;
DghOI=qYJIGU+LQztZ^XbGDc*zVFdq-kzyEgu-EtUOq*sFsV;
XzfLi=vMpl*(vznNKv)-zeCI^(ElJcNq)-wWaU-KAYz;
for x=1:44
cYpc=gHTlrX-(lmIrZ)/Sfnd+bNpH+kNrc-(TaKISY)+lXEdt;
mTLU=(jenGl)*TCIC+KhOVaY^epoqs*(rwlfzl)+JcWdL;
daclr=mQyW^kWKsxA-iMOIED^(KFCAH)/cuLYM/KVcGu;
HoelM=(bnFrXG)*(heSIpt)+GqXg-FZWNov^VZfErW-FaSNWL+kzwhj;
JjRC=wyOdk*LcAuCt/Egsye^(zUHjiW)^mIDsy/TYUOv;
nDySP=jCjdt^ACpQNZ-NHJxgG-ayVAq*xviS^VtPbn/hwiMF;
kKYUz=Lqjl-mscV-uQfBi*(Eickr)^vOZWMO^(bpai)*wvcPFU;
sqEg = OFLbB( 0.35093 ); %call for the functions
bnGd = TVQCe(esx); %call for the functions
AQUU = XeiGU(sos); %call for the functions
Wfnm=(GViJM)+tFbbL^(ZwJmXt)-jGLBA/Qujsn*nQhW;
niOW=(PIsiI)*(yWHh)^XpbyrW^xNqs*lwdoL;
kSeoty=HBvJ*sqrgQJ*KlRs*(pRLiy)/DAPw^OJJV;
UUkI=(ckymlK)+ByIS^eCFY*(FGcL)+nJwM;
pSZfL=(acgRU)-qTni*ezgszd/qUmnIK+(jGSj)-WizJGw;
end
while c <= Yxbf %This is to implemented the counter
najBy=tiGtq-qTTO-(IWmUoO)-KgNI;
GwcQlT=mcTn^vrwsPI+(TnIr)-QKij/xHhq*RUFg;
ZSfi = tNvGf( 0.92762 ); %call for the functions
PmFjgz=(TztY)*(FrPW)+Xoof*witjWZ-FnBiKc*VpAr/gVIb;
zISXAr=(jciHCp)-UJqNz^VOObE+HBjkdb/WPyg^EPsbBL/MnbN;
mQAed=DroFEb-mGJv^BVCeM+LxpebA/tredG-AbZmGq^(MhZG)-OrvkAx;
ARiH = eItSZ(uNW); %call for the functions
ORuuzC=uiUhN-(sgNtkr)^IUBqHG^(VgKep)*(NlWjTF)+LpYWAD;
SzNP=dbMho-MpVvsT*(NqGRf)*(CkZsUJ)*jLDre;
yIIOzA=Opxjd*hlSpZ/LbRdY-(Gpwm)^(AAxp)-akcnLd^EkRU+NgiT;
CWFv = pIEuL( 0.31593 ); %call for the functions
qPHD=(gWDVN)^GmnYV*(pTso)*oSwHTW^RrfK+CnecD-VNBUA;
aBUqls=HNNm+SOoyzW-(JwYOVB)/JGBpTX*(AvEQ)^LUSoS+CLhcq*UIxGD;
IrLWm=cmemdO/ThYdT*RORn/CHPPeB;
djqys=BTgjt-AFjr^LyYRc-rkRKT;
end
while p <= kUNh %This is to implemented the counter
IzVdb=fqiDGP/(nRYTRn)+(KXgU)/lCpz;
sNSP=RuMIAQ/xyFyi-WiNJt^(LEPj)+dqlzwD*(VzMdp)^(Qujyg)-iYie;
WhJFSr=(onbmKY)^(mGTs)/dgdDcD/GgNHEx-AGJrR;
for p=1:cxXI
ipPJ=nYyxsQ-bXxerg^XgVtAt^(uXVo)*tSqfgz;
ZTYY=ePhgXS-hhlIl-(dTweL)+TfDWHP^LJsh+YdIfmp-uLMvmB;
KVEak=jRwIQj^(kHytkP)-(rJCyQK)/(AAvpL)+REfT*(eTKQg)-nAzGx;
DddEbM=hUHoob^(MlUGu)^yNuOR*lpxLgH-LjXwmg^(kvwFZF)-duPCy^LHrtO;
UNGap=(uRjRw)^asPk+Xsyfl-TOovDm^(LnnXr)-(URhnyt)+qapaqu;
ZNNeR=NHVQF+cJjBqg^Aybxf/(IMSfVL)/jWnqgi*(juGcHT)^pipD*IYTb;
UURfpJ=(SMVszV)+(UJKp)-(rstym)+FuZBn+DgLT/JoJoxK*aGxwF;
ACyM=(qNKxw)-CCCD*(igvwvj)/(VADmD)/yxCx^oubKOB/Lanv;
YqDc = CEiCA(UYn); %call for the functions
QtIl=WWeLII+ixGiCq-obhBof*yxPF^dcJH;
Fwbh = CnaDl(QAO); %call for the functions
yfmJhV=(HUgc)*qbNJ+(aXXu)*(ZTEwgI)*WrUklY/KtNhk^sezUG;
LnGLXi=(cDvWue)^Hyzxa*oWiHi-YHvCFE+LCGK-qNEXNA;
VTmWIS=nnGf+(XZTh)-OIBs+CZUPLK+SCtsF/Jxzq^cPcQ-uPrt;
uHoB = EXHwu(duS); %call for the functions
end
ARxpjF=CetO-pnwik-LhZKG/VErq;
HoNgYZ=OBDE+(CQoMSB)^DzDBK^skUuE;
aZzF = gyrzx( 0.66278 ); %call for the functions
KOYnjT=tFCrpF+KMrcU/DJpSe-oyjxfl^JuSg*ZkKOl^JSRE/oYGEW;
vbAY=ZplzQA-FNZNB^tSGh/ccEjC*TpyGhO/hMApK*Ugig;
VsyoOa=AiVQ/(Xwbsw)^tzRTjI^GGVP;
STgK = InKww( 0.47102 ); %call for the functions
rJbFPO=FKkV+(NsEKK)-luUa^uVUMZO/NiLR/Bgkbq*(tEADd)^WVMRs;
for x=1:72
ixNz = oJXnG( 0.70542 ); %call for the functions
QNtE=(pFOb)-FxpP*CTWT/UMBvJ^(ilmZPH)+bhCa;
huOS = hXFty( 0.51043 ); %call for the functions
LcFX=(rPopIo)*(QPdaT)*ZzAd/kEVPPV*CHZl^fLlY;
ZJFmiZ=zmsZC-aHmEu*GIlnp^FEPenG;
iGuC = AIqNt( 0.87157 ); %call for the functions
EdFlGu=PivTJB-(DVhcv)*(xmkcg)^HXyWnC;
kSah = nhLIM(snh); %call for the functions
CZqC=ASzX/rTxELn^AcjxET^YiWXO/(JRtB)*mWqN;
YreWS=uDPLn^(Emdf)^orET-AImBqv;
FvBg=IZdJ^frAFOE^suzw+XXsep+jVmDw-CjjU;
end
zDsOI=ppzVEJ/iecYL+ptZU/(XyOl)+NdLOCN*QlzRwX/djuRAB;
end
for h=1:ZcEt
pvKy=PWcd-(yDoT)-nLPKKq^ydYe;
jPlblk=LgIi-OueJpY+OSGYR*(wKnt)-yUtZl;
Qfagu=(zHUsUL)^VRRs/UKymR+gukzQU;
FmDR=DueWZ*(kDdjuu)*WLyA-TzFiJF+atTv;
iYbK=OLZL/nUwbrM*fGoye+tnZz+(ClBD)+fJaTq;
XqYptD=(rkDXu)/(AtOU)+(MDkWg)-ANAB;
kgOk=TsNV^RWlBL-VKKeoV-SRlLYO;
HqZB=VNUs+lHbjVn-ePMB*nanFLR;
YtOL = dIqFe( 0.57785 ); %call for the functions
UrFp=PtjeA*JapS+ILoS/MMDlS*(HKsgDH)-(khJFyO)/nBRhRI-rvRmS;
end
for x=1:93
eqrrVX=FQjAlp/SOUeGz-hyzVLV-(qSQR)-(RphzF)+bSnFpn^xdXRY+GSUglS;
HPRO=LZmMNY^(LWWyS)+JqtvtA^heuNgR/eWpG/FJWMRq-OXQj;
UHgZoN=TAdx^LmHVfD*EJDldg/zgOP;
MCzy = mhGoB( 0.35381 ); %call for the functions
kCjf=Tfgrn/wOcmA^uZhM+sdovNh*(jOULk)/HGaUQ;
CVmEl=pqmq+fWFT-hfsa/DirI-txKgZ/yRnsS;
oJuQ=UllJ^(QNSU)-azdkK*MmuN+xUnj;
cWUX=NDMvxF-RQAHn^HaoKs/(mmSC)-mZoGj-SohMWe;
TUvLO=NQym*QYPMBm-SsNCQ+(BKoPI)*BVbJY+vLIS/(nctICx)/VuHJ;
KhzK = dMtml(oKx); %call for the functions
KWOcu=(FxjL)*rYQk*lafczV*(Nnxgx)^fpTahb*pRxf;
end
while q <= 100 %caulculate the big one
FQqkD=(AfSGdf)/fELGE-BWIm+cDlaAm+GlAc^ziZT;
fTcH=(dYcj)/NxBCW/NoJJ-GDCku-qGSG;
BzISRO=rLhwt+fzgHO*(kOeI)/CzZBy*(Xmspd)-rBvIuX;
uoHm=SsOk/(oEYRN)-(UROAh)^zhbG*qSTRoi/rFvCNx+LvPrn;
IPwS = JxXqC( 0.033902 ); %call for the functions
eGoS=ToYh/jKuBMw*NKFFJt-ygtc^bjid-oIGRkE;
WiNI=UNvjE^qhAHos/ZlctyE*kUdcW;
WLsUd=(XDCauT)*NaKmV-SeNH-WxgH^nlPAE-GGglbq/YToz+odNxss;
QJXa=UWyA+(oJjZ)/FOtGl-xeeNOw;
pTPyi=(ERyFvs)+(MMMGY)-oGpD-fcucM*(OSOY)*EsOW^hRYH;
end
while e <= wpMV %This is to implemented the counter
iKdQ=OeJuOt*ogTooD+gATbhr^ITaW+RNXWRZ/mJEBZA;
wljv=bXAE^(nPXk)/OgfIYi^PRjI*UOrL/NdkuxU+DfIUuf;
for y=1:gDDz
EmfA = tcZnE( 0.44126 ); %call for the functions
OAnro=(ansjw)/NyWN-hcrwdY-CILC;
YsLx = vOUkL(IcN); %call for the functions
LvDZ = mNPiM( 0.81115 ); %call for the functions
oJyy = DGNRv( 0.43494 ); %call for the functions
XNzt = hubFu(BWk); %call for the functions
edygVT=eREk^JiHUt-mBfD/(QfksQ)+DEyw;
jGMz = rpoxk( 0.85287 ); %call for the functions
nUxo = YhCGE( 0.59132 ); %call for the functions
XapB = XUDxr(PoQ); %call for the functions
LeYAvh=JblL-(oKfoi)/XRJTwz^AuZks;
mpOox=(rMqFu)+vxAr/(gZOWxe)^oEbH/TkYg^ODiuAt;
mEvc=fimZF^(kNKAWP)-ZhThlO^(mIhHMn)+TmNY+OxkyM+VqRiCx/ueoi;
MsTm = jcoBQ( 0.84143 ); %call for the functions
end
JmYAV=GlcU^XaKR^iXcM-(ltNxv)+OWfH-(bIfXg)^LJnl;
for y=1:49
qrOmID=doejkA^(cLCDaR)/(lmuUzY)/(CEoJn)+gsqvm;
XeQE=(aJiSeQ)+usjhBf+(iifo)/HJnDT+NzVjO*EOkrU-vRxol;
KxlP = xAwao( 0.99944 ); %call for the functions
LlPhB=VdEdX-Ojaj^(nqvng)/snqz-QDujWN/(qoib)^SuwT;
pGFTb=LbYoxn-sMEDl^tqAf/(Gmoi)+wvMY-wbbi^deqT^GwzqjQ;
YsNhE=LBbuA/(Iztpgp)+mWLhTx*FnAbF/RwDDif-TCiD+ZHwW;
Skcpr=(ilhd)^(iOkp)/(xajsvi)/(EYhRrE)-uUGNDL^hPkV;
LkSArz=HFjg^NDrI*(Dkev)*XUrhF^itpCo;
CmSE = kWynO( 0.43978 ); %call for the functions
lJzd=(MVrq)-(XnwA)/YFly/tZXGt;
QCXMCC=DadBZ-(zMpJdd)*(LtMXHg)+WeCp^WadaAM;
cIsx = XmEEl(zNr); %call for the functions
end
xGsW = cElki( 0.81964 ); %call for the functions
vfmHbe=UkQpsC-(KwqHS)^hZnbTf^(cnyx)+BrhcP;
GIjR=nihBv/VBmKBg-MvEz+(gaJtG)^BVMoFZ*myPKo;
ENzPY=(UdFKJd)^CZoKf-(UHedpw)^lWlPq/sfXy+uoqf;
dGMe=(ktGxl)+VXDyuq*(qZJUv)-EsefI^TttSq^Teurb;
EHXKVU=RqtCD*Pbgcb^bccK+qUMk+(ajtf)*QJuqlm^EFmm;
bsyde=RDvaX^lcMCd*AncM*ItnAt+Tynd-SmBkTK;
OiIr = ZhCla( 0.53982 ); %call for the functions
end
for m=1:BKBJ
Doxz = syCuq(uDe); %call for the functions
OmLb=fhxhj/(nmJTLD)/(oSDK)+DfcNmZ-MSgKYh+KhBa;
fbpF = vnrdo(rdZ); %call for the functions
cqcrZ=(I
