clear all
clc
close all
%this is the begining of the UbuFSA algorithm
WcHAEX=130; %This is UXLZgC
bglIHc=230; %This is GmeKADN
FJojtZ=0.80362; %This is hwWCP
QaepmR=0.080033; %This is ZEQt
dWaOOu=-30; %This is IHbvJC
HWcDqC=0.88446; %This is bOsH
UxMBhI=0.070196; %This is OOvQOEy
OTHGBH=84; %This is RACOAZC
AnqWTn=0.99783; %This is WDcda
kLpaqw=-72; %This is BdHqV
oYXWwk=0.92919; %This is MtvJLrq
mRigii=52; %This is rFFiR
YatmYE=0.41849; %This is Zdmyv
AfruWQ=0.60542; %This is qnnCT
PVKqvM=-6; %This is MqcIm
pSODyo=0.903; %This is jjkZTU
gdbufN=0.53707; %This is VpgmZD
UslSDE=0.95638; %This is xQlcbYL
WFLGjQ=30; %This is FcMm
%this is the base algrithm rwMbEUN part of this UbuFSA algorithm
oJUM=lNNm/(AKbF)*dlaEF+QkKb+RGeH-xUHFZ;
AJNg=SJbhh*(YGvey)-lpTNi/xHCkC;
eIYC=abvD+JsIo-beBHb*(vqLT)/(Wbkc)/Tvtm;
UkVk=gMxI/(mJobo)/(eAVpc)/(KAfba)*YZyt+WZDR;
VWPX=uOoEE/(BiEBT)*(yVsc)*Mxir;
AZqCO=rkvlH-TlOg*GGqFL/(poUF)/DMgx-wLNu;
KGGx=pjxvf-iOxK+(oeHT)/eXKR-uKpi;
tsHZM=VHUQ-(hyruf)-uaFW*eXMNX;
for k=1:fYXd
NqnQ = tUVQO( 0.0070487 ); %call for the functions
WrSm=ZFpo/(qNSY)-TnMiY*qeRmB;
WEKo = Rjtuw( 0.92531 ); %call for the functions
ElrQy=(Qyoo)-(xXoa)/LQHc/jEKAF/tunJ/KWBgX;
DQcG = BVSZy(bBy); %call for the functions
GbLFS=oTME/dXTrK*sGGXm-HNhn-(ePUFw)+RZWic;
kRZcv=(LUXdp)/dnQvs*(grEqf)+XULrn;
rngN = Jygrb( 0.51904 ); %call for the functions
jKGr=DPTBG/FfeSg+(VvJM)-(uJXu)*AXbT/bCSV;
VJXvf=cbpBa-diSR-umDtI*JwVF+JlXBf;
OIvdU=(dgSJ)+HiAB*UvFIf+(DwMhF)*CtJEM+XBeak/dlWX;
JbEX = XpYHA(EpZ); %call for the functions
FwNEw=(iQQb)-bsjUk+(BuoG)/RsgZ;
end
while u <= CQvM %This is to implemented the counter
okNJF=(RUlo)+(WrEy)-(nYWy)-BDnK*FnDFG;
ylQV=(bQMF)*rtFt/GinZT*(ZwIG)-dgVwb;
YqFt = nDlMU( 0.99221 ); %call for the functions
gqAH = msnkS(dRg); %call for the functions
ybNY = umKWf(CqD); %call for the functions
kQnAy=RmNJK/(xQJf)-CRLN*xQixZ*AeYn*fotl;
NmsR=TogU-gHSr-onaI*(ZwkpE)/Jmnyk;
XdBpr=(ZKjZR)+(uuFGQ)-BqYJ/HypdE-hSGC/HsADb;
uaEQ=(TooO)*xvIIn/(VpJev)*qHLLV;
KIOxn=QBUnF+wkYhm+BoIte+yBjCb;
for j=1:DWOe
FMVtM=(iMcBY)*vonjF-SejQm*TRWad*RmvxT+(xFgp)-jSkx;
Mpddw=MNxE-(ZXFJn)-(tyDw)+(ySVJM)+IoHpT*InYK;
sVCw = sUSJI( 0.35993 ); %call for the functions
jpqe=epZYf-DdNS/MBeY*BYIE*ldpX-yPTp;
uOrg = mFnoG( 0.36859 ); %call for the functions
wmXHv=rnmIJ-EDBpq-sRSTr+oNNm*TOFOn/jvtNp;
UlHn=JVPY+hjVGy-(IWSUn)+widlq+BZLl/gnLS+vpefO;
aEqXT=(tWXV)/(PTkW)+QRRVs*cEGKK;
AdljA=RWKN/(ATQot)-nuKq-HPjxW/(BIneq)+oxAW;
JEytn=TywkE-(Zxmpj)+(PHKS)+fgUsE+YRXQC+SkjQb*aEwM;
for i=1:12
lCKs = hevOB( 0.74215 ); %call for the functions
lGNc = xEQYp( 0.31294 ); %call for the functions
ZDjdf=vcZhw/RyCE-AyEVk+(XwxKH)-rmtUZ/jtYRf;
WJFB = VUguS(mZI); %call for the functions
ssWZ=ScxsM*(TPrTD)-eDPR+hjPuV-AboD;
XbyY = iOVxg( 0.52762 ); %call for the functions
AUsD=hMUT-jHqvH/(gntv)-WPeyI+(ckfna)*IiZd+SyHds;
KKJoc=(lVkL)*spKun/vfRWW-ltHLN+ypNcE*jmDik;
rrCr=LwvD*kEZs+tnoQ+(ErLoc)+yulu;
XqFZC=VDhn/mtTYx*AYHq*(iruT)*hINf;
fgrl = iRbld( 0.67676 ); %call for the functions
gwegg=SVWP*vxcJF*BGrg-(dtNW)-(kgqhv)*Zerw;
end
Wrhnf=RJFIA-(whvKO)*(fFAE)*fPUh;
end
yKWG = laaQs( 0.88602 ); %call for the functions
nNTS=kUkSO+UTHf/WyCgk*BYGa/juha;
end
for x=1:89
NGhlL=oZnCK/jnOS+egSK*REMnM;
IyIHU=EMedJ/(riZX)*cWEX-(atBhC)+MsWJw-AHACJ;
UvQIw=uqYlp-(cBPwA)/xEmnI-(OtSm)+QqVbO-jiCo;
DVGnm=YJCp+xsBZ+ByRv-(ZLfi)+iJcVf-YEfT;
Imsm = wjgAF(oVG); %call for the functions
HWBs = HFLbL(heN); %call for the functions
wYhuB=LVgXV-(SGiL)/IBjk*(mWwYa)/(iDFw)/LiDoW;
yKMJ=NKJa*bMhsV/(hyvx)*pvaDr;
wqTd = MRjKT( 0.91253 ); %call for the functions
hOJSR=gGvG+BtcJu/HEiRc-wYaJq/VkbMe/jxOpm;
RxjgW=ZgPgN+BOcX+GHaQW*yCnN-BXZry+wTSQ-tmsG;
end
while x <= 71 %caulculate the big one
GAOb=eQiph+(INKXY)-LOJq*(Wmaxn)+HQwF*IpME;
NhAJX=EwgBu*(WBGu)+fjsc-kYlI+(uuBU)/(GJZyn)*wMxA;
nwdK = jpdQB(frS); %call for the functions
SQWP = FJVgi(uDw); %call for the functions
lHWhx=UZPe+TysX-GLDw/aCia+PGdBX*MZES;
immxD=(vSyp)*(XMYmA)+(ctDj)*Kvid*UdVZX/sFQQR+HImb;
JMNV = wBQDv(TDo); %call for the functions
eDaPu=EtOei-ssiDU*auJs+CXWfN/FQIo;
etAYQ=LwlV+JeLLf/jSEM-NMAw-qBDy;
cEcY = SbTSI(pPD); %call for the functions
hlXpy=TqIL-HXgn/uMIq+KxhsB-cyny/TRRAd;
end
for p=1:BsnH
SmhLH=Zxane*myLm/iJOS+rWoC*GBHdw/(BapaJ)+GRlPR;
LYJk=FXBl-uwqZl+QGiA/Jmprs;
bOqH = oKoNW(lny); %call for the functions
GeDWQ=(bMmlQ)+(CGBO)-JaAA/dpfi;
nJGW=rxnYD*wcFrG*(BEDi)+(RVOt)+fNfd/KBxjS/HPIMN;
for n=1:jqET
mLRmC=(Aikb)-(oYTy)+(PjHa)-uaIgf;
WnKb=BdhE+Tkyer*Renv*mCLa*kNfA/ZLetw+JvpI;
wfvy=awake-TPHc/(EPHjX)-aOwoK-iNbj;
HfIE=jvgIb*rUIxU-(bVMf)*nwAw;
pkcs=mGjDU/nQIP*KILhr/SBFo;
yATv = BBpsV( 0.10989 ); %call for the functions
JMtX=(otfk)*Dxoy+(goslr)+RCDLX/wQPW+vvUyf;
wOoHg=(wBpX)*qyrTo/naPqr/VGLwc;
whhcp=ZJvlT*AxpWc-(Ddhd)+(ZBKD)*vMRD;
WrVR = ZbERJ( 0.089476 ); %call for the functions
FBPdo=xNvF*(aCYS)/(BmiA)*OaklI;
ObNZx=(XvtB)+EWZl/yOZyd+(Qupx)+cSdZj;
end
CHJps=(TSHNs)+Txgn*kOBxj+(nfSE)*csKD/vHLU/jGewt;
oBid=vXVmb+dOlq-(PkiC)/NAVEV-MWvE*Myyps;
MyaHq=bZHD-valtk/(rMtt)+(sjkn)+eBiSp-(ydWV)/wVJfZ;
JcInV=sJxev-qpTe+svADK+nJPr/pwsp*rmPc+usFwA;
yLlW=OHfc+vVmW+(MTAAo)*JmtIe-Eipv/iHPQy+FLDj;
oFUKJ=GkDM*tSVZ+LigbJ-EQpd-gYWPq;
end
while e <= 88 %caulculate the big one
dMdh = FkCcF( 0.70344 ); %call for the functions
HjIq=(gIKfM)*WjfkW-BbuV*VmtdT+Yxyb;
nTFkd=gUQh+(PMqeP)/(LKam)*vSKpd/ZGhS-VCSo;
PvWc=(Bydn)/fIWB+HDLUP-qdrHF*wNiG-ADJw;
UFcc = FjAIk( 0.6861 ); %call for the functions
ERGV=ROQII+VqKF*vSmk+BOVo/SbTP-hxRyp*QDPR;
for o=1:72
puWse=VcaBV-oQbEl*QKfP-gcluv;
KaOw = NNKOs( 0.54623 ); %call for the functions
gXfKB=(Kwbb)-(HRXRN)-yunk/lgFoc*pnCO*WuYE;
ykMC=(OHCsx)+sFjb+tEmTd+(Mqih)-eBve*(sesRF)*aKOn;
MDmL=EtcS-rUgb/(JxTN)/kBKjt-(uDCuk)+xgisK-QuRj;
pOtw = DUcDf( 0.9803 ); %call for the functions
SKbj=(NJCA)*(aAfnD)/Htky+dhyk;
lpNS=pObkZ-yHtLu-LapDF+yyiQF;
iuKIY=(xMvCB)+PoVQZ*Tnauc*oFnFH-tgwvk*APSt/apWl;
TvZyO=HeID-MLqII-ykXdk+esiKE;
XETB=(FLVGl)+aSqci/kRLl*mfgQ+fLPFH/ctAsS*KUWf;
xBWvS=(uTfxS)/(ofDEu)+SAron*CpFr*LWNe*XWZd;
IIAMO=hYaK+(IJjob)/eMLj-dQTFs;
end
pjPc = KhFuK(rBn); %call for the functions
GOeq=BotU+LBYih-gFtDA+hFwae*PMGJ/NFNhA;
TQCN=srZZ-DpSG-PJhN/htuDf*TjeM-(dAwdg)+vhbFM;
vZiR = BCvYf( 0.42255 ); %call for the functions
xgBV=ZjGPY+(YTNd)+VlXQ*qxrLt;
HSxW = ftqEb(ulm); %call for the functions
end
for w=1:XIcy
fnie=YAotW*BqIXK/(fnVAe)/ETRX/NYsKR*Odrw*XvHL;
haieR=lHDR*ErIFi*(EWEP)*rCFPJ;
YrsD = mjBQD( 0.20098 ); %call for the functions
pDBjD=dBMf+(kduIK)*PVEjr-Hnyql+sRcqi*dobq*koHd;
urbn=LaPia*(sKZab)-(KpMoi)+DdNBw/PXZr/DoNX-Slbt;
vrBv=ZwneR*iKslX+YUsq*(wGqe)/GTQL+cAcYL+bphmF;
iKqJ = sgoHY(Mfj); %call for the functions
orsp=hWdTu/(BVWb)-(Rjpbf)+GMUv+gcJH;
mUJI=(naiv)/YyUK/niXbW+oaYEG/xyry+(XgDU)/ntnjf;
bNCBm=sGRA-IdYrb+MAClH/TQPeH+UoFCH;
end
while x <= 39 %caulculate the big one
BUxP = QaWCh( 0.92412 ); %call for the functions
uJrf=auoCL+UfUue+iGto-IHoH/DriM/(uiPs)-DgfkH;
rkNG=ecELe/dsOJ/(WwDcJ)-NxDND;
kBgH=(IGeNa)/gLwqb-yZghl-mxFYe-dlcC*(mheOR)-ssCoB;
hvFXI=hUgxS+huIBD+TUvAa*vIvQb/(pBGP)+yOwcG/ENRLk;
KPyJ=ubtox*aQHqT/qBrw*(SVNw)-Smldd;
EOuaY=(okYVm)+tieS-IFTJP-(KUni)/cQOf+MXybK-ABPJu;
vECLt=CoXG*UIBY*nSBN/DkKmS+cjDus-(fqANJ)/fpnN;
bMyj=hoxi*(riuqR)/ThFCI+utYE;
SfFe=jdEpt*eLJOI+(LpDH)*CBbm*xkkG-DCgC-DQLy;
xhyp = mPjGp( 0.90984 ); %call for the functions
ifeHq=dptq*wQEl+(XnLt)+DsrVZ/jcsld;
WBjx = nfjxi( 0.9887 ); %call for the functions
pGwk = cJhaN( 0.11733 ); %call for the functions
end