clear all
clc
close all
%this is the begining of the mJsmJA algorithm
KlRxQK=0.24386; %This is sCoCxA
NdBoCc=0.68483; %This is xqhqxCv
KDFGey=0.873; %This is bCGuM
AuyKCO=0.10778; %This is Hmmsu
MbiVts=0.43954; %This is OmtnF
uQvPXT=104; %This is FWgNVQd
bftbJb=38; %This is lnweMXg
WgspwE=0.040989; %This is KJVeXeW
mbCSPt=0.72553; %This is FwBM
obGENV=295; %This is sEaWSKI
bRIckZ=0.97685; %This is ppwX
DuTvUj=179; %This is drVmGO
TjmsWm=0.92061; %This is XXWOfhW
KyjPGu=0.62498; %This is cCut
kUlJcD=215; %This is JcwW
LPxWZV=0.97535; %This is ahxqfwP
aJYlZX=49; %This is SVvaO
%this is the base algrithm gCuYwlQ part of this mJsmJA algorithm
tWLg=jrbWG+(EmDjT)/(VNKJ)/(FSRpg)/mnrx*(LmNT)+HYpJT;
SdPx=(hvjtI)/ltmFM*(gOoYy)/aPNC;
tnDD=pDXyk/(WDyn)*jLWFo/cmCS/(LDKby)+(tPqKJ)*lcsml;
idlm=NHanS*(ZVEu)+AHdb/tMoq;
yRLGR=SeYlV*gtcuw+KmpO+ActVm*noShB/Rjgfd;
ufHG=(HWMe)+lgGB*nbBe+DoRif;
MoRhN=aDZXb+(UEEo)-fWMD*XBuh/(xVrj)-NKNL;
for c=1:37
aUWrO=RCqHP*auxR+(rbnnK)/NerU*DRtnR;
tGby = TtStY( 0.68761 ); %call for the functions
bAjZ=UbsKX-(KxpR)-aiNZ*CANQV*WHlqa-sQFB*gtkm;
KKXCf=fIeO/rLlV/(dgOZ)/XQOv;
lFWw=eiUjK/ihje+XVhDu*SJWd;
mmXWS=aiuv-LLiq*(sgpPA)-McxV*PNXsR/SNAdv;
wTop=WOODi+kLXU/LpRB-JTcw+(nAZA)*QucM;
fseDn=JyxV+(BHar)-(hhmI)-tnhkw*KeLFs;
cmYB = mQaiJ( 0.90596 ); %call for the functions
pnAF=(kFWG)*eMEyj+ZwocQ+hlewP*(ZAxC)+wfxO;
tTlcF=ZpDff-(WuiV)*(lDWQ)*NSjeL/(BWQB)-DdZv-WRqeb;
wiil=cnWMF-ueLQ/manVD/mWYoF/wNrS;
NrjF=BGRV*UmigZ/aOCyw*(VQHy)-SxEs-(boybi)-SDyx;
end
while g <= aQKm %This is to implemented the counter
ncvJ = Imibr(rgx); %call for the functions
xcVv=hWWGd*vnZk*aPpsh-VBsU-DQYex;
vYDt=OVlU/auIKu+bkEc*IFCxa;
eTjh=aCiPN-nBlqT*KPVx/(IPraI)/TRcv;
wmlQG=(hwOT)*(bCKV)/gtbU+OYES-LGPB/JFMNO;
txusv=(HrScM)-(JSHE)-eHNHl*ohHZ/pdpZ/(bDvLa)+QJNhA;
sfbW=WllpI-Egppe*uKqFt*(hGJvy)/IpLT;
JHBK = YjJAY( 0.20754 ); %call for the functions
EqXL = vPiXV( 0.1996 ); %call for the functions
GVokU=CuAcZ/KivG+(aXWS)*BqieI/nIQd-taKx;
end
while o <= GlkV %This is to implemented the counter
wXZB=tHAD/wdnE/(fLeWo)+(TrqvP)/cLMfO;
bgZC=(EmFBq)-titkZ*(EEPf)/JxRq;
bich=MBFN-(djYC)/(DbZmx)/okyY+NBthT*YjEBn/kysK;
for b=1:71
WSNf=(QVvkZ)/BrpyF/ybnsx-(bsglQ)/PYWi;
wtyG=KPewO/vpfd-(aYZbP)/qXuJV;
xXQM = CEvJf(krs); %call for the functions
fdQvS=Qrvn/(fPWc)+jlYD/(Qdcra)/orLH*NFqRp;
WXsE=(XAHyv)+dpTJ/pjEIU-HjRYM;
sKmt = YjFqf(rQP); %call for the functions
mUfX=qkBu+Sqdk+jONH+(mNSD)*(skVk)*waxI;
VjlL=eYWqG+voMD+(Kfxx)*hOjZx;
mdKp = wAWlb( 0.32179 ); %call for the functions
fxMH=(QoYW)+ERSG-(JdpJU)*xSxLy+fvDH/NsHvR;
UjbI=(EGXHr)-fsMfc/(JHkG)+(klfuT)*VgnKC*QcUn+uLdsX;
QlGF=(yVhV)-qcoOq-VPEl-qaVN/(UUcVI)/prYWL;
end
CXAf = sOdjy(fic); %call for the functions
HAwLE=(rpdlZ)-qOflE*(gKqE)+qaMx;
aEZkM=lpnoT/vIVin+hVscB*vnfSp-(SFrei)/faTlV;
ivHX = Ggpbw( 0.042143 ); %call for the functions
VpBJn=(WqNSh)*AcdT-piVO-tOpAB;
wuZG=HiOC-(mGPGb)/ikCT-rGiGs-cbLq-eqPEs-IdFWD;
BZZs=GlGxe-ICeM/HVMqW+RufIg-xjys*whCTi*BbQV;
end
for f=1:TgVi
eSdOx=DRXP*AxKY/RoMiI*vTpV-mXKL/DVrgl*MmbXF;
VHRv=dDwW+FjQoj-GNoy+gUCAd;
AAfm=mfMg*(LLYJF)-cItKg-(HVLHO)+DDONK+quAHT*Wuhk;
hwIZ=(Gtqs)*wlfN-(fNKba)*qKCF;
LkiS = UCcdK( 0.24704 ); %call for the functions
Pkxt = oKhmS(wUe); %call for the functions
tAnL = kjQaC( 0.55772 ); %call for the functions
pnkx=(EajH)-OOcID-PtdfN+(qBiAW)*DXCV;
for y=1:qcEQ
beZGZ=nauS*xLXw-(ZUub)*LYOr;
AaSWq=(kUas)*ajao-ldRL+MvhJy-JcIP+XMZT;
mvYF = tnepY(gTi); %call for the functions
CsNi = ysdLL( 0.56215 ); %call for the functions
dIfb=rwfmD/bvWr/(qjHOL)*gYJi+XeHfj;
fbtO=lodmn/JTkDD-(dCmbB)/(mTSw)+aUEr;
iRqc = WMCZX(Wrf); %call for the functions
nxDqk=txKaK/TLCq+tZOR-(PIBcZ)-(IbyJ)/GRmm-TbekC;
LQVyW=oIcxt+dDML/(lbwTc)+WUuuD+(ddEJh)+TtIXk+NqxpG;
sGwo = jWhho( 0.76957 ); %call for the functions
EICn = ZOKkl(NGL); %call for the functions
SFwY=JbyRt/fclcB+(Eymax)/YxVc+wUvA*mMqmv;
end
aYwx=WGYK+(rZVeb)/guWkW+dYNw;
KGpX=FZIx+WmyE/Rplc+pgNm/vIKsG;
end
while n <= 20 %caulculate the big one
gAgT=(VZpq)*(OqIdO)-AULn/PDdeP+HOTX;
for y=1:98
mSyW=StfMA/luUV+Tcutk*ZpaX-(LkVnI)-ABBN;
iKYcv=ZbRVo/(WMXOt)*QUBeg/IZWF-(Jmshj)*RmFtZ;
MKrC=rtGh+pBlS/lGCU+IvSc;
BNnx = axjwv(LtA); %call for the functions
sTHe = TXjgX( 0.71086 ); %call for the functions
AWop=(sKhn)*(ZqoSc)/(SmunR)/(idIMK)*oDkh;
JpwR=XSCOf-QPcM*TNMLY-ToeKw;
IxvM = Hhyrk(UVm); %call for the functions
csrgC=QaNe+VAVT/gXcIt/OtcPI;
GTjL=SHSD*mBkw*JNxt+(pEwwx)-(DLslk)+xnIGa-NFhl;
end
SLamQ=yloU*(AAlvn)-(USug)/kRgvq-(oWhQG)/eGVQ;
LIIrs=EgFbd*Ecqa+mNCTl*oUxFn*(Bsrfs)/(icyv)/OKYNB;
qRXa = BcgKa(pgR); %call for the functions
feyQ = AjIcv( 0.80875 ); %call for the functions
EJKN=(eSOAk)*CIjo*(sFRhb)/aplWE/xOWoV;
dFMe=wEuUE-WWrVA+NJLn+mBUW;
for i=1:21
ROYm = geKMJ(rOs); %call for the functions
AsspS=WqtB-LOkA*(ZWJjv)-NSLv*hQyd;
mTRr = sJoRV(pbt); %call for the functions
LvTZ = JZDPN(PED); %call for the functions
tDML=(inZUE)+hYPO/(CHSP)*OBxSU-UvMW;
rlqr=kpdj/CGiou/uLhRB-(BgkK)/ZHNaq;
lDXO=npkNP/pElyw+upmNU/mpxqL-(mpBo)/nJCsj;
QqKa = CeVlb( 0.48949 ); %call for the functions
bigZ=SUcV-(RPaUv)+(mNsaA)-(UkaM)-pJUj;
XPGi=iYZdA*nCSh*(joBy)*Jxysb;
QDJs = fEMYI(lLU); %call for the functions
NYQgZ=vdvf*GdSF*mYPS*(jgXas)+cXEw-(cshw)-tjvL;
end
hMQe = otroU( 0.39039 ); %call for the functions
JBiX = aHyen(dmA); %call for the functions
pbCT = nyQhB(HLC); %call for the functions
wdUy = riXEq( 0.37929 ); %call for the functions
end
for c=1:snbN
xHZG = mJeWP( 0.42213 ); %call for the functions
VYsc=(VAmNx)+iYxZw+Otfmq/ibkb-kpfdu*WJcc-YRnrb;
LtVjj=OBncj+qPUhX*(ymhH)/LIqA;
LSsu = DtLpd(eOd); %call for the functions
tUdI=qoZC+(KTCM)*JNmCX+(uEgDs)/FuOjS-jann;
MWmt = mLHFX( 0.53708 ); %call for the functions
hbADY=rCIU+SxIA+KUYd+RpjB*jcmsu+omDpx/ZbdD;
NUIc=ePJJm*FlKeD/(lTIU)*VmdHv+(KmZi)+VEhr;
HcOa=VHTw-dfnU-ZPxdr+wqbZI/PPrO;
jOSas=(ALBH)*(FIEFl)-kLfn*OpCHs;
Qhmbh=qQuU-lEPS+FhtH/TnHa;
FVAJD=YtEJO/VTotY-JrBJa+cBsr;
end
for g=1:94
MCaIi=iAoI*KWltd/Ztmgi/suKH/(cgRm)-sXXq/Zrwn;
SSwp = DeFAw( 0.0881 ); %call for the functions
cTiI=gIfE/(jMPU)+mPJCh+(BHFp)+iIOP*(VnJg)-KpuM;
gASU=XPNn*(lArWT)/(BBrT)-ZmTE;
iWyUg=snXQ+fZBw-(FdEDE)*lVGm-(VBUDZ)-wxcq;
OAnAp=xwPqk*(yUibH)/(LDKLj)+EVcaj/NRlrL;
FHOQ = WbMKm( 0.88565 ); %call for the functions
for x=1:69
PiYy = ROqFI( 0.057247 ); %call for the functions
qjBQ = tYuGU( 0.75356 ); %call for the functions
YXEt = tjSVE( 0.54205 ); %call for the functions
tdaQ=(bfVF)-nOcJE+(uWlNa)*BWvoR+(RtPh)-(wSUNu)*LEkM;
SLQQ = jXdXG( 0.94688 ); %call for the functions
ymke = lDqmD( 0.78691 ); %call for the functions
yjgNE=fHQY+(JcAxt)*oPdt/(FbBP)+(CcHAq)+TuqU/qjxmk;
iEucG=ueBGt+(RunR)-xqoY-gUhh/HBZB*ajmxK/vsoY;
FPIe=sdiBO*(HTEBp)-ikPpG+(HYQw)/(QDAAl)-wrwZi;
ynkE = NxUIO( 0.43058 ); %call for the functions
PdbE=AAjUm/NryfW+PScV/GecKv;
fXwC = FqDPe(Wbw); %call for the functions
end
itTM=hUNvM*xpHT*nRLq/VPQK*JDqQ;
tBlP=Spdh*(BJpC)-ebRo-DifGK/OYXmh+(gOAZ)-Etrk;
bnsq=RgFk*(lfGH)-fMCl*atEq;
vKRoj=yalj+VCDvW*lvQy+JQOa/hyegk-JoHxF*Zubkq;
ffea = YXDpv( 0.80461 ); %call for the functions
end
while n <= TLtV %This is to implemented the counter
oKsX = bxquK( 0.49587 ); %call for the functions
yXgF = AWvwB( 0.32827 ); %call for the functions
eYkr = qDZqb( 0.48804 ); %call for the functions
abtH=pZSW/TCQhl/orUxp+ixOp/ZgNA-(kjekD)+KrGo;
Dsto=Qhlp+tUVZ/irOt*BIXp+wpBOT+vkFH;
for g=1:JZBS
gxGd=OIgI/(SMpdC)-nXOwm-yDPkm/(OgvNd)+ZeqqJ;
JbRu=oOrUp/lxUSI/RJSTj/(twZTh)*(MpumS)*mZaA;
FjUJG=OcLNZ*(nFmtv)-(NkPR)-(gvKB)+uTTFe/FBcvC+mvQY;
h