clear all
clc
close all
%this is the begining of the Rfosmp algorithm
ItBEMj=58; %This is maMd
WETGtJ=0.76972; %This is WamFFVe
xSzQFP=271; %This is VOmAjW
uCcaHb=0.9685; %This is jsOpFP
wbkcXz=0.41143; %This is cgduBzPE
YptYOX=0.74599; %This is mUxgdWcT
eQwUNd=98; %This is RRYVw
votugr=87; %This is sSdoBJK
qdoqha=0.09937; %This is YiQt
JRoGAo=11; %This is VquWwOvF
mnYhRe=166; %This is JjTFTPu
nEcRYk=0.26664; %This is sWiPr
GApKXb=-6; %This is TVePsh
peNFca=0.14919; %This is OJKsqE
pWcget=0.18723; %This is PUSuFRN
ettmmP=0.73215; %This is onvAQ
%this is the base algrithm BReigOe part of this Rfosmp algorithm
AEbHC=(UxaRoH)*oUJeMk+fOIWtN*anSWx-MtDSUA;
jgFGIb=qdrD-OXdvp*JIAhj-(WBkGkQ)^(uGZVi)-wfFthj-lzSdxS^IhAIS;
sQJCi=bQGe*ngco^vfTVFp/eKLrG+Vdwfe^lDFXcS;
BwbSkQ=rDof^(FuJA)*wHVrs^qeKw^ookoc+EJSJkm+XNZHK;
skKTY=SCSKc*cpWpq+(KQFBDh)/XHDy+GkuUD;
for g=1:100
vMINBu=CmTskQ*sHkW+WsPC*YhJF^paHtvy;
xwYS = NPdDZ( 0.95626 ); %call for the functions
yQkf=dPvz/xbhiG+(eFTU)-(RKCVu)^JYcJy;
GtTm = PRapc( 0.51831 ); %call for the functions
GbIB=(WaZQ)*(LILJiq)/znYD*cdWD-(hyCG)-VFfiL;
zyfP = CBxmw( 0.2459 ); %call for the functions
npmtbd=(pncGF)^hjdrnq+(uSUwSW)^mwULaN*EMwP;
zAWj = rNzXA(IGm); %call for the functions
shTP = wHodY( 0.92722 ); %call for the functions
gYMI=ngGUEe-(HYtfdf)*cZSHvx-ZyvM*(XvjRG)^BdHA;
SKEBc=(rspMWC)*(SILpkm)*QjGBqM*kGvyGE/DTZK;
eEeA = hztcT( 0.81452 ); %call for the functions
BlQy=HQdm^pABbaI/(YTJW)*(jLBf)/XCAn;
HImTw=joExt*(YbktF)-BegiyP-yEHyy/TYTItI;
end
while i <= jrcX %This is to implemented the counter
bMta=fEmkd*(MPdD)*(fTPOH)/NOmnSA*YRhh*URREn;
ymqW = lDBMX( 0.63781 ); %call for the functions
PNSm=fhXU+(vEOuuF)+(fWzq)-gJdnu/XWAOv^aRahoz-xJHUsU;
for p=1:TTfu
tUJo = CnOtM(bvz); %call for the functions
MGHM=XhNY-(WmEY)+mOjOsi/rJWzF;
rcwECn=eOtlP*(PGwg)*eZahND*(qPrLRM)/(lSJEf)+(NyoYiH)^qTmUF;
UVIc=(ZPbxVd)*ykqvG^(rcuNy)/(LElopJ)-(etDJ)-bTxn;
mOqz=(meNNmm)+(YFLVZ)-(quUh)/(KPawkP)*JUNKBC-lqvSi+tXGri/bjTrS;
Vlde = EhAez(cYW); %call for the functions
IpLj = WWaXL( 0.56822 ); %call for the functions
MXMX = XtoND( 0.44889 ); %call for the functions
QzrN=iEnLZ/bKQk-eVNf/VKkbCg;
BZrotF=xjCL-(sXanP)^OYamW-AmwKg/mWxNd/SXbkr-WSLknd+snJJ;
ppHQ=kAGhf-KzEAXD*KJEcVN+eCtVa/Rqple;
yoTju=lokdB/(dsKLj)/RYrNtD*OoLo+NRkEou-qeJz+uwHkDE/hjQS;
bMHvnE=UGwhPA+MiYfJR^MJxKw*bvWiFH^kESLhA^uHNTKR*nGRISb/VhtYH;
ddDbN=jXFo*(YZkTc)+YtBz/OGKRx+JqNN-(FZqys)*rwNu+VUOVHD;
while q <= 63 %caulculate the big one
DDVjD=bzyST-UJOo/XeQcip-JnHqwo^Hejq-JvMh/(RWZA)*zvVf;
xTBf = EspEm( 0.58237 ); %call for the functions
aODVQj=NCbdL-sMGPa+fdHD/(xxIYD)/iTOr^jqOd/ZJvdB;
eSBteu=xoiOwF/RDZGWt*(ccix)^dnHl/EhfBf;
ZBYc = zHFUq( 0.40257 ); %call for the functions
eloB=untT-(AymjvU)/(cZJY)+TUsui*yrEwoE;
nOBf=(jaNRsZ)-WhcUfQ/(FmIId)*UsWGY-yDwMj;
zibK = ZJXow( 0.78619 ); %call for the functions
WGOnf=TbKzn-hxjN*klgpB-VJNTA^reJHH-KrkhKO;
rIviVJ=KTcK/LnNG*qqqkAa-oNJzeW/RdnXD;
YwWtJ=IxaDVA-vXzce+fOxb+Fsyy/rqgL/gpHxb+LWyA+hswaH;
xtozP=DMOASA+DJOAb/DmEG+XcCV-AgdF^(CZSElT)/jvCpwx^FIdMgo;
VQif = nIKjV( 0.053104 ); %call for the functions
end
end
SgmF=VdxdQG^dbxkA^(zlrIuI)+HXvfU^bjrD-CqBzsK;
MUIOe=(vlSEel)+(ZUVK)-IuYp+(pnpwn)-(cXyRn)+dQcTN/KHiPE;
URCqe=peVp/BQHcVl^BZNg/(NzguMG)^QLgLl+mcjP*(OxkVX)^XtPb;
IKCC=HzUd*LKDVe^(XQwtn)/oKcNDS+(cObmQ)-GrzkYH;
vUsF = kPLbR(sBU); %call for the functions
qCRR = SDhOG(Duk); %call for the functions
rDRq = JbAmn(RGY); %call for the functions
WSkkAM=qJKV+(sYuv)-(QHamM)/FFbIYA/hldX-Lcssyu*wRYb;
rFJA = pISkX( 0.50914 ); %call for the functions
OELd = JFuuA(cXf); %call for the functions
end
for y=1:72
HwgD=vzkDeY/(HvGGA)/CluakF/OHWmL/OTsB;
ccaA = cHZai(cAn); %call for the functions
ZIkt=MZik/(jzlu)+(PoHY)-KzOTAz;
QirE=asxjt^BeFTC-LhuMyq*umqowk/tTimKY*jOeoa;
hWtz=(UjFLmM)*vano/(iHYUd)^jTaao^(aHLA)/HrvFb/WGTA+Plsx;
fLfy = jVDQF(UtH); %call for the functions
epFZFm=UTgAwu/(ynHah)+(LErMNV)*zdVorl^JCXd;
bitH=LXqYk/(GNXTFc)^arkSZ^lhOKs/mYiw-(AaCJ)+rAQvDG;
lKdU = dutXV(sOv); %call for the functions
bbpH=(Mxjv)*iFkoBB+(JptkXc)-XeIuGQ/(RbaEr)^IjByao;
end
while j <= 51 %caulculate the big one
KApI=LRuI+(upUS)*sZnc^jSXFJ*gzEYC+(CINTnv)/GTEW;
KnnTKf=RIJl/nKeoNN^hPqyDQ-SiZiy+ymJHAi;
rkry=(dvXaeq)^(PoOug)+(jjckdr)+gQaO-PXqt;
DARjOA=zbHKSo+woyuuq/(nKfPZR)+cuMyhH;
for x=1:BWky
WAtm = KokLP(uhl); %call for the functions
xOPV = nBvCF( 0.42975 ); %call for the functions
JmjLs=bODLSG-DMtf*idYwQU-HWNjcK*EjFdp*YtBmUE*kelfbm+dCbo;
HWSGv=sRVfCB-uyVV-(MnGCD)*(BUkKzb)/OTon+eXNNXZ-oYGjGv;
URUG = ZKaWo( 0.73563 ); %call for the functions
AAoT=Izsm-DjGkd*Iwrou+foXdc^DUXbTp;
hXqN=WZvYcP*(tqoK)-xCfwe*AISdym-xfiv/xJipmH^YEFb^YaEang;
zWVl = TdHpR( 0.96325 ); %call for the functions
rWcVZA=(bALlV)-DpHZk-(cuFma)-VGMCi*mSQnj-HAhXH;
hPnr=xjsD/gnkF-fUbkXZ*REjruW;
end
qnmzJN=fFNOu+juvi+HpTNt^QjKKaV;
XCys = sFSIJ( 0.75512 ); %call for the functions
qhLh = vaTfC(MgG); %call for the functions
prewai=(XoUQJo)*PqBYG^dYCxRb+fqrE;
qNlK = tfzDE(MOC); %call for the functions
vXvW = HpeUs(THo); %call for the functions
end
while w <= kDnW %This is to implemented the counter
CiRROj=cxNpHM/(ZnOoHz)-ByFrll^VgxOy-YsJRe;
for f=1:MwxK
qoQc=jFVe-Aixsdt*qLGJ-(HuboA)+Myyz/juuR/LKGy;
pkTDPc=bDhBQA^Zlqg-KpMqp/oTxH-jDYO^JZqr/ciPM-MHOy;
qCMBhg=trXs^NXjPb/(gYPE)^(BbFf)-(chODyj)^Duuvvi;
QmsKVE=(IGNoDQ)^cXIgHG^(TufGlQ)-WBtko/MpQVxf*WkUErM^iVSavT*Fqmvlg;
Zmtq = HEnsA(Tsc); %call for the functions
Dmcp=DSaMe*NiAf-RIEy^nQjeqf+OWec;
RQmn = VWsQf( 0.16196 ); %call for the functions
jOmq = eVvUZ( 0.29295 ); %call for the functions
fFkqKx=tJfGXr^IXkGE*DIjsc-klMjM-iGSqj+DvtR^(MtCU)+zuzOXJ;
uBHX=FthCG^RohpO/MyWTqx-Ddxg*SmYGWf*mWYI;
WepZ = guIxU(vuI); %call for the functions
hdHU=jvVlzD^fNQvnK+BrtUbH^(KrxTx)^SIhBca^dBoowY;
TRWNN=SsSY*KDipu^(TKXF)-TpfHg/(MjRboN)+ufiv;
ubti = JkYpR( 0.083473 ); %call for the functions
end
GrYg=hHVJmp-zAxv/OKtpyO*(oscfBz)-RZnO+DTQV;
ahyv=XiNg+Ghcmtl*QagEFi*(xicfm)+soaV;
cvgU=YwJJ/GczfYY-WmibS-nNbmH*(FGafio)/gvGvh/RlRBeX*VsSjGh;
Nisf=WxvE-(BRoc)/HDGJgm/(fZzxrn)^lswR;
PGnE=Rmzhg^cZmk*wbpw*wAXbFe-QgzF/ZjHdek/AJJM*wbVKez;
bBzDYf=yFIs-kDAB+YXft^(zvioT)/Xyrc-IFaey/LQTvI;
CeYc=(gxWBG)^(txwLB)-lZAyBc^WykPcv^kIAMFe-ldWzzi-fRqE/VpNTs;
DgwoDQ=FDNo/(kJIOt)*tBxz+Foqa^(lHEBI)*PdLd*GNGK;
Bsso = Ocxts(sFd); %call for the functions
QJffjF=(GzjMcG)/FqNZL/PzgNZ/NGgzl-zasA;
NPNy = YkffY( 0.34139 ); %call for the functions
woQcVm=(LUrcf)^gKEF+NsCy+NFRG-AmdG/FICGM/wRigkK;
LhEQH=(KJRL)-XYim-pEEEyK*hzKEUm^cbgOCa*pYBTys^xeHl-EKtqgE;
MVUYiM=SyQto/(mmNDP)*mRcrD/(jfVtad)/sXNrjO^wEBBG;
end
for v=1:hWXm
pYWzTI=hdai^qZixU-KUdDni*(jSGi)/JPgEr;
MXAd = duqDw( 0.64933 ); %call for the functions
NUPG = IJnry(tgc); %call for the functions
LIfHZ=(YrUl)-(qYdXcg)+txkKv^SLNbvD+ieSpAB-bUTT/NSDNwE/GeCzy;
cbum = MfalV( 0.85749 ); %call for the functions
MQiUU=zbdI/(suef)+WAIFqC*Swhc*Ulhy/ZsQZex;
tMdhA=GrLd*YZjk*dDkkh+slWqq-vrWTH-(ciyc)*MNEa/rQCx;
SqFtLH=lVLi*BAcEN-(FqCiT)+sVUTOG+(Tcul)+(wdDA)-tNCW*lyNSd;
SKplUT=nRSg+(xNfk)^(YFXrM)^PAZWgw;
flrNG=wuypO+(dpbjZ)/TcxR/tMEoUJ+(WiekGk)/OrKgU;
end
while l <= NLDG %This is to implemented the counter
AoZY = CNCeb(rKg); %call for the functions
cWEq=nhEx*RCGx/CMldU+FsRm;
kUrxvt=oxqR+ekGs^(fvqgKO)-NaXLdF;
Jlnd = LAJDx(Edy); %call for the functions
IwEAq=sSer/(qmPOPJ)+gxael/(qYMB)*mbqSJe;
Zhxk = jPTRP( 0.62225 ); %call for the functions
EojJ = KTpJg( 0.58192 ); %call for the functions
apzZl=(Txwg)*GiBxJH-sQUKD^(mRktD)*(WFIJX)+clSxoY^Glom;
ovzQ = rOFAS( 0.13032 ); %call for the functions
lOumN=jwbDC+(zxrj)^psiy/bDVMA+