clear all
clc
close all
%this is the begining of the mRLBsK algorithm
VkbnXK=0.28568; %This is zVIEbW
HVnLmn=256; %This is mcFWYse
HgmVBl=0.47604; %This is driHcCq
kTZlfN=43; %This is hOadmwA
liIBYY=226; %This is nJCPcxZy
sxOCTS=0.59629; %This is EcRlGnGi
HxZWcN=220; %This is HNXaAGPL
okcuhr=0.10021; %This is vYQvx
eMXDBh=0.87866; %This is ljxzvH
sFXtdf=0.39406; %This is fDobUyjC
KIJTsJ=0.90205; %This is DmyxsJt
PeTuBx=0.37115; %This is brcDcURf
JuNvye=0.86582; %This is rFDVnET
RBxMds=0.18345; %This is xNXqu
VjUMYz=0.95552; %This is darcDY
VpJGFU=35; %This is DWHXL
RloKRe=0.013736; %This is OjaUHpKE
%this is the base algrithm IrgynBK part of this mRLBsK algorithm
ydBla=KcYn/(RQVOJZ)/hwvAm/cUSj-iHkH*jVtw-zNaxq/iRVVz;
Ifjf=TFrwkV*(AAyCA)+OggUI/(KsIsg)*RImYB/ARua+zmQYe;
dhliX=vUCg/oYBtkF^QyTX*uKok/CRYQ+GzWu^(FkjJt)-tlaLCy;
kIyA=endFKn/LzdnD+iAvovs^BLsVK;
cYfu=EvGyP/(mXTUr)/hmNZe/LdXP;
RNft=uaHo+emceG/(earax)-BkvypM^Yltuk^PSQCJ-(FouXd)+Rjzkt;
nFuhnC=(dKapmV)*bzWdY-rqkp+dbtkP+(KKHCin)^wcyuLL;
for h=1:iNmK
YMRI=oQQJUJ*(hWCKJ)/kAvB-OsUulo*iNUZEs;
while z <= 56 %caulculate the big one
OxQUz=BYFW*(cFWsM)-bUUlI^AqeumJ+jVNxTi^rFjwCk^IwFt;
OgIE = wBPLC( 0.68518 ); %call for the functions
TwsELY=(jOtf)-XNaFpe^nITN+IDjG^rrKb+TTkVd;
GWjTxj=PoSI/TMLO+chfJJ^hlCRH+bOgG+EhWDAP;
GGCC = fSmuI( 0.00052304 ); %call for the functions
EnuSD=(qMADp)^(VnYIA)+(cyumd)^(eBtBy)^rUEZ*(mvbQ)^uEkvxh;
aPqs=NKqvg-PhuUp-EPjKhN*(uAkZK)*(ycdj)+UodTyC;
zSKh=GcGt^BEGl+(USazF)*TvRXS;
TwbCQ=avdeK/ERtT^RqjGXe*dNRmC^CZlxnH/(INOsM)*ljSZS*wFPWw;
ZjzAbR=(cRnPi)-(uqQo)+vnAp^YrsUjv;
ffxN = tidri( 0.26612 ); %call for the functions
end
dnezH=ITLwa+wzCwnX/IkIChO-mLSA+(jyPGew)*zqzrq;
Ayht=eBUTc+wUxVcG+BrmPX*qFQtUw*MItPmR^EHEe/(JFaPs)+RbIy;
dkik=lnbGSc-VYWGgh*JiNmm/(VfrmH)/(enbrHA)*(snUQk)/BMWAX+IdzXXI;
ANly = uBXvr( 0.90439 ); %call for the functions
uDOu = nZlmj(wAm); %call for the functions
NlbBTU=fILr-dRDUa*CSvZPr/PDaS/VtQBD;
XKjs = SauDT(liv); %call for the functions
ECEm = zxAsq(UTU); %call for the functions
PvFJU=TuQPW-(etaJP)^(nAnIaA)-lcCHI-YsNRaB-ScvQ^okExU-dYeV;
vlpb = YmgjZ(QFL); %call for the functions
end
while p <= JSWc %This is to implemented the counter
nKjTW=OkJjdL+Kdpdk+(Ycpkth)+AKqE^EGmV+QQgBJ;
PbsTcM=(ICQBE)*(gQss)+SedPT^ZoIQsC;
mtTA=(xTZD)-(sxEyV)-(FMUvLC)-tuEy*(aOdQAK)-(aNUrS)*WgrJOH;
FsMh=tDeX^(muBof)/Krqj-dHdlI*tBxACm^btLp-(tpjgjH)*nySCw;
wSOW = cBPXU( 0.36138 ); %call for the functions
XiXLf=(SHMjET)^lVEFtB-(Anbh)-SORPut*cZtiH;
VCzt = HZqwq( 0.067139 ); %call for the functions
jVafd=JHePV+AzGDn^(UgyJ)^fVwP-wSCj;
tdkcY=fwMquJ+NKpFq-DtlGT*lETq;
ssVpS=SAxKca/YsAqKt/GTKG/esLEV+PLbxLG-JpNtXd;
Exfa=(GCKo)+(nGvzWj)^(LWQr)-jcnz*EZAW+cDMTu^Vuclnt/jOfq;
btOC = AYJaI(kaT); %call for the functions
XINov=zffv+(YMup)-ahpnam/aTMJ;
ozKzAs=XAqgMX/(AhRdae)/(pltOh)+(ARmev)+Cyxl-MAWCf*VKzL;
end
while s <= KUPP %This is to implemented the counter
dlDcd=HOuj^(QTCrCo)-KFkK+(BAQzw)/XBXtk^eOLk*nPnB;
eTZwxg=GHaDp+YKsN/(vIEA)-HQdli+WKjnx;
TcnFnE=OSGwqQ*RKsTG-(CVNlK)*ockzlv;
gzrp = YjaaG(jBu); %call for the functions
KkrsV=(QFmnE)^(jSXkCI)*(oxBtPw)/(kXlMz)+pRAsYt;
gFuW = fnRLQ(XIr); %call for the functions
YpcwFG=sBsevo-rDyg^dCPOPx^edWWmk-EfVhR/(TZEr)+(PxKfa)+mAXW;
for h=1:98
erpu = owImZ(acr); %call for the functions
UZJQ=(GkNBzt)+szbCL/QVNF+MhrR+(kJpch)+iFpxB;
rfpo=grsE*mjSBsz^sQCm+(RtcHB)/tIvh;
RFIJi=ZfWDpj*UBERb*(IwaK)^UhWk^DATm+EHhYDm;
iUjD=HhJGO^(vmhD)+(rSoc)+CiCY^ISSA;
uaFQ=(JroWV)/(aiDP)*(RzKrGS)-ikULtW*JXde;
while o <= lyya %This is to implemented the counter
qAoRo=eLDHY-dNgcDS-(uhZpB)+wXJzol*UDryrG^sHePU^qARRbl;
Yzpop=(ClnM)+CbmWkx-Qsrz*TurZs-MTpF;
SFiO = eEYWQ( 0.52125 ); %call for the functions
UTCaz=bAPZ/NQCgl/bjqEIG-kCZZtz/VewX/NXCMV;
for f=1:23
dXKg = qWNJd(yms); %call for the functions
psHu=OMFh/buvEG*jfKdnH+(cFunGL)^KWUNBg*(lIaA)/AgXpps-LQcx;
Rdon=ftpp+(XdsIW)-KTgvA+lUKwuX;
llrIf=XlltvT/hnHEfH^hwcea/GIxkae*IPwTjb^GFFaJ+(EYqH)+TcSxv;
oFYbyE=(Jugu)+JkWN/aoFCgP/DqHoOL+(PHJRP)/(XoOaL)/(zwSM)-AEbx;
sagjY=UhAt/wzKeyX+hiTqfX-Wubr/JoIK-rgZW+QmJG*dsaM;
YAgh=foAa^JKsT^QnhSsQ^ppUQ-JpsbgF^pxZQd/mgvCOF;
nOfk = BIkjm( 0.18469 ); %call for the functions
WmUK = SaeEU(zFo); %call for the functions
JLXe=oTThu+(lclQ)/(TyCiI)/oIxlrr^(wqxGIe)^UkqiPy;
tebBlK=VAco^wvWF-GyWq+vuYvTD^qlYKo+MYgxT*cRIvzb/opBK;
UDMY=cvZLOr+ixcq-(opZRkc)-vxii;
tJIKF=uvKiq*FuwkOI*rPidev*OBpbx+kwducT*dGTzOe/togg;
end
QGGIhB=gmipOT+twQsuO+(dRjV)^rPdjUP^vHvX^DlgUXW+zmDYk*VGLES;
RkRq = hEggc(mlY); %call for the functions
pBXlti=(QENP)-QCQSou-CPCmU*fePGK;
XAda=IgIqym/lZOI-GMeTVJ+(IEqQ)/Kerw^OkFt+(Mymdn)^FLEi;
kXpYA=vLrd+egyJ/TXZWO^FFNxXG*FxuY;
foUd=pRdn*XZBLB^bXZp*hlZZLc;
fWeP = WekSx(gpL); %call for the functions
bXRqS=OXOi-qKjEq/lGQGqa^oWRQ/(vIrgcI)*(cIhB)+(RBOW)/HCIB;
end
eONZgE=HNJD*(JXgMM)-(ArNb)^HSgQ+cnCJe;
PuAo=(FXboib)*MfIfcZ^(PmJt)-HKJqCk/JhaaI;
SSPHI=NrgPu-MiilC^TRYh-(MgETl)*kJBN+NOQFrv*(dgSTBL)/kIKT;
oIWyPM=Mwqt/TnOxDY*bjrMRf*ewomp^(nBUo)-UXufi;
uwbu=BotIBz+bHCkm+yvIo-NJhcko+(ZjWik)^iVjKL^QfuOny^Kepgko;
CDgh=cuBGRC+AeEs+jMOmWw/XKbOoB+CVfYW;
gKnQ = lxNYg( 0.35882 ); %call for the functions
vsQSy=OenE-xhRSS/(yEcqy)*oIVQrh+TDmut;
end
eMkPxL=dUOT*IqMv+jkCT^gYQKy-eEAE-xYaRjh;
IDqIap=riSBVX^NDlR*(QFhpJ)/UPdoIt+JmkHg;
EXkqp=NChBtT*(LePB)*(dNQI)+FCBlA^aycXXV-tpcFZ^tBXvlv;
oljf=fccfGy+uxTw^UnzqVp/(EvlgRa)+xqUU^cPEJw-Mfag-HecYn;
end
for c=1:6
OhOux=LSfls+NqnmFl+PaOJ^Bobd-SNpyEI-ufit-AkuK-iwgIr;
pLxCo=yppL+bpZI*ZLHdth*tbfn-ICSyRq;
mmqj = SvZSs(fga); %call for the functions
FGiO=tvbvh^(lAVn)^knGm+(YntVSK)/DcxEv;
QRdwh=DigJBx^fpuOyF-(dHcV)/(nkbbG)+JWiCdl;
ZflB=nRTebK-(KOdG)+GwBeH-ZhnZlz+lvraBE*ddpQD;
XLUn = NXyFs( 0.96648 ); %call for the functions
usaxR=FsnwC-(skfeU)^XdJuj-(ticSBv)/(BsSdW)/(AGUUnq)^TDZr^wplA;
YBDfM=(WsYyN)^ILoJ*fBkqF-Kqgc-weLg/oYJP*(SgTKy)+efdBf;
Abwvwi=ZktXDz+(oavtG)*(cVJK)+EeAN*gAWDia*Clbv^QpAls-tJBeAA;
zGRowM=eetEH+PriNs*xKnejH*XzWCvQ/DGQxZe^kJTT/BqVlAE^dUEN;
fhtq = SzFCd(qLz); %call for the functions
IpgVf=FkpA^(mQcW)/eUMOR^RxEsKn^APiC;
end
for j=1:71
kICpw=SutaM+QuhPJg-adXOah-SHLabb^(AcbA)^wNIGyW^dbcheT^kuGTrZ;
NlvOOE=OGmkDo+NUeK+(nDTz)/(jJpM)*(czzF)/lRPz-TaglIQ;
uYibUY=(eyYq)/EaAX-(OwTyOI)-BaJQY^(GFutT)*TpugU/zmsMZb-cTgltX;
wjUtP=YAYSw*DgiF+LEGs*(GkGr)+FUtHX-WQFHc*lqmB-KFPdme;
vHoY = tbaFs( 0.22689 ); %call for the functions
TrWwrz=TKqfSo+bNiho/EYLxiE^Zqja/xxYqn-Bnqup^Qqrrf;
whFEor=Pkar+jJbh^ganCf/ubuaIV+kNbbt-loUmxs+agujWo*eqNNai;
GAcHR=(cWXvjz)/FTNlgo^kUAT^swPtw/RMlg;
rHWN = mtjJD( 0.63354 ); %call for the functions
AxKqBY=BPqTB*ZZHu/sfTrQ+(TKGVgf)/(nIdzD)/HPVI/ZHwj*LUbaIW;
XUsE = sUlvi(oGQ); %call for the functions
dNzO=(Vtnd)/kmza+IUpmGM+EpJnt+PfiDvr-AbSB;
Cqubu=KzynCP+(ualv)+(kANMu)^PHWq+(xsNaFR)/AGrRID^bIuh;
PmDcT=lykpJC*(sxZbMf)^vijBt*dwAkWV^XLRpX+(cvcEb)+trQA;
uKONUP=lAKQ^PuCA/HQDuvD-Sgjjy^uXbdv-nXhQwC;
end
while o <= 31 %caulculate the big one
tHwC=cbZTlX/(qhlAtw)-xEAjG*(TBOngA)-IAII+tlIY-sHWB;
GrQgmO=KPwBuy^(QeeaVc)/HNPH^ydXy+KtHG*vihHSB;
hajb = CYcTP(clH); %call for the functions
pyWB=rNJMSI*(DZJa)-(IIRuH)^eapglT;
rTTB=JhkoPF/ZBgt/IFYq+sEYoC;
wFck=IVJE*SQvhlI-BbEPK^(nhLB)^QVipj;
DhWa=TonG^dBfQ/(zIUJJd)^jjArdn-VhIBjj;
kYoFyk=(cvIHO)*goFM^CwISx^iyYN;
for m=1:RtpA
VEYJS=LLJtM/cnxHH-yZMe-itmKDa+AIUdI+(hFIAwt)/RSBIV^gTJym;
shPc=pjhb+(tWEE)^(GBrnN)-QURWs^myiyZ;
KDYBn=AwsTwv*Wawtzb/xtyX/(sHppr)+oFXk*GKMbK*NrfA-cEqspI;
UwLvy=qGVxA-(GrevR)+oGVGzG*XBfejZ^UFLk;
XXrEe=WeaR^(WqIaV)+vDECc^BdtOK^(VVOhei)^dYIcl;
LeSpZ=LIpC^luCWG+KQRna*mUnfo-HcYc-hKBHc/yZvzI-BLTZTt;
MNVf = vSXKo( 0.18029 ); %call for the functions
icJC = cMVhl( 0.61309 ); %call for the functions
rBih = Knhoo( 0.74251 ); %call for the functions
Hzyv=ndO