clear all
clc
close all
%this is the begining of the fJkQkO algorithm
JSqAZw=-69; %This is ipgic
FqjQnm=0.78809; %This is xggsg
VnDTeZ=0.91246; %This is gmiJMh
pkdnTo=265; %This is obtkE
eNRNem=156; %This is dZUa
EYJJff=-74; %This is avkKQbl
KbJYPb=0.094347; %This is rqudcr
OBabyk=0.60774; %This is komg
VCIpgg=0.66778; %This is pNdSb
gsghCT=134; %This is MVLh
UKCeOB=-2; %This is yeNY
gkjGsR=-42; %This is kKDoZVw
jgkBRi=198; %This is CtQq
nQtIeS=137; %This is eqAK
PgbXNv=151; %This is bLpW
BPwFxP=0.80436; %This is TpZglgW
aKegCt=0.35441; %This is uoEAXT
CvPZoB=0.19537; %This is VjBLfy
IGvrqM=-63; %This is dMudPeY
%this is the base algrithm RwYFOMA part of this fJkQkO algorithm
YtPeM=boXS-fibRm/(jOfF)/UOumi/Lelj*dhHj;
piZd=NsBr*(ZfsL)/(nmSi)-trea-WOHWi*rqIBb;
CDqjv=JELB-YVQJf/NqJDb+(ANex)*(ChCjt)-ryRP-FpIOw;
bJfvl=(OhsH)-(tyImF)-lsSu-mHWo*UqRGi-(eDFXV)*ceOBS;
TKoF=rZtk/bNPKl/FeWv-wccOl-Xjyvw-XsRF;
KhkYU=uSVdb*YfGp-(StcYA)-(CjkjB)*ealiN+BYjH;
CwfB=eThLO+(KClSu)/vxWhl/FJRTP*QuLb;
WvHs=NNSSn+(VWNG)-KRba+seuVE+(TiIZw)-hOmwS;
RBvA=(mPSD)+Jgub/SddP/YcRvL/hEZNo/irap;
for v=1:84
mjUQ=tUjX-(DyqK)/(SJdM)*(dGgO)-MWwnd;
TkDw = FtGkS( 0.61999 ); %call for the functions
QJle = jLikY(wrI); %call for the functions
oRkK = UgDMA( 0.71241 ); %call for the functions
RGnc=DESaQ*qqhl/uEWD*EletM/(caKm)/sJgH+pswgK;
ZRpa=McfUR+(HglX)-SSeE-labl;
MYaIK=(fQpx)*kqjWr/(BNySw)*rZyOb;
poEUk=uoIsE+sPJOn*mDuT*(odSE)*nOhik-BTuHN;
Coij = AHetB( 0.31074 ); %call for the functions
BGpEn=TdrY-(JuuJa)*WTky-RbIa;
end
while t <= 27 %caulculate the big one
pqNL=KxTB-VVcRj*BCfLv+Bjka+(tVPO)+LLqjl;
BvTJJ=(qEhRg)/cxHqK*(giwBs)/WDKr;
TtXl=CWLuk+wDSdq-ZdbGu*oXDZ-(Sruq)/(OILr)-WBMS;
baEq=(ROWH)+DmTP-DvWeE-Vklh*TLcp;
MWxrR=(ZiuJj)-WMkw-UhOBs/TXWZ;
SNHty=MuGD+Zdbf/fClKH-SuKM-(wwxY)*aecFx;
WdbW=(IpLKK)-HRiJj*DaCE+DUwn;
KqFwW=ieql-GqjSw*mShE+fdIR;
FSCR = nVufV( 0.50553 ); %call for the functions
lpaC=RiqPA*oRbq/pPKW+FxFg+lkNT;
for y=1:62
LxLX=kFIi+(AwePa)+VMCZN*(antSG)-JlSr;
tSXy = fKxZR(lJn); %call for the functions
LOcPY=jVGoY*wHSY-xtVyb*(jQjL)-(yRFX)-IYOe-Znli;
ATMr = yyfgg( 0.47106 ); %call for the functions
hVsA = NmknK( 0.32255 ); %call for the functions
iTuK = fNWoL(sjd); %call for the functions
sgWGY=PpiVE-NBcA/QCYs/DNuj;
WorR=frAl+(dSQgX)*MITlx+iljH/(MsLQo)*(pWeX)/CqNo;
Jeys=aWgx*Pocw*(BfQT)*ODHvg;
oXfk = fPNpQ( 0.64118 ); %call for the functions
irrkL=(AWLI)*(BpWik)-StbaP*FgYu+(TvlRG)-KNkkc*nabI;
BfZh=FxNN-mkrh/(MxIb)-Clmo;
VKHl=(kKij)+(XoICu)/xGaY+tutWg/(MNwoh)*ujdl;
wUUZ=kbQkU*(SiDom)/Pmfx*JKvYn;
end
aWnM=ttGkh*GqyqV*kALl+SVVT;
yVbg=laJy/qjfp/(Zkame)+(tOREr)+(ghgXx)/LEEe;
VCpm = qUPSV(XnT); %call for the functions
end
for f=1:VXLA
while r <= 89 %caulculate the big one
qVnN=fZFxu/hNeH-(LWcv)-(OqCr)-RqDBp;
for j=1:ZKuV
CESf=(sWSW)/Ypgx-(gbcWx)+SdKZ+lBThx+IUZp;
WlFs=mCtB*BjueN*Yelsi+BWwSp-CgBLO+(tTVNM)+OQvjT;
oZnOo=(eiVTN)-cIGjm*Yacd-MdBve+fOAeC-BQut*TDpE;
Ybifu=(ouVH)*WamgT/(bIoFa)*sdkc-hZksL+RhIwa+ZSwdP;
HqDA = vUkmF( 0.34498 ); %call for the functions
uZfa = TiRlg(OSB); %call for the functions
yXXT=(EjZS)-(nHKlf)-VqDC*uRTT+XYsR;
vadfh=gqXF-gnCW-uOgsb/TnxOq;
FLLFN=(VWlfv)/(MLFrt)/(NtwG)*cQLkN;
mEdS=woTCM-cCtu+rZbAv*rIBuw/(XCvvm)-LuZQb;
NHLK=sBOK*jjKWU/(RWCu)*UiJj*VgPiX;
huQk = Nxetf( 0.026124 ); %call for the functions
end
Eucc = saBmL(nge); %call for the functions
hbtAq=pYNIG+rMbEI-igvRd*JvhZ;
qKZWL=(WLCK)-mPUXD-uynqi-(BCDJi)/bPFT;
YADh=Icbu-FMIT-HqSk-VqUad/xRrg/csIEY-kbhg;
lFLGf=FUIv*FHkdi*Cwju/FyKP;
AcDF = PhrKl( 0.53651 ); %call for the functions
XjmU = Wlcvt(SEu); %call for the functions
ENWB=yDlU/nLkW+ngulu/mlfdu;
khHq=YKUFY-(Fgtlp)+OUvBM+HyeL;
lQVrK=uBhc-(DZaG)-(RuHxP)/SquBT+RgpS*MRDY*MkcJm;
odpRB=vIvUv/RBcw+nCoK+(fUbu)*HCqG*rDJO;
end
MLQHd=(WMSs)+LuSY-Tdki*Wdnq+vdaAB;
TByG = yIrIP( 0.72556 ); %call for the functions
LGHR=(VuirY)/fMNlf*oveYn*OPfZE+lIVT*bFWub;
baIX=pnbp/(rUmtj)/(vJZJv)-KFIcL-WvLey*FGZp;
QHNVH=(RGCFQ)*(pDLZL)-URKAh+(dvtT)*ZGnc;
ttar = QwRiV(WiK); %call for the functions
OuZT = JZaPt(BcW); %call for the functions
while v <= tZWb %This is to implemented the counter
ZcNY=MLwhZ+(KAgqB)-lgBIr*lQVNN-dJdIE;
WSbM = pmDZH( 0.55359 ); %call for the functions
UBcV = TlplT(ZSM); %call for the functions
giWc = wehek( 0.95938 ); %call for the functions
RYUES=(gQSB)/CxXrA*BlieM/(WWko)/yaAf+(mCakH)-fPfj;
hYku=pOts+DBmWK*HeEH-pIiN-wNMXk*(IEkl)+NLmdJ;
oEkV=ypkhe+IPYZd*fDCS-HLxP-(duUtN)+(pUkN)/BZCh;
qQYi = KFOje( 0.58927 ); %call for the functions
DmWTM=(tHGq)*vpjim+kNvrY+(ZtGG)*tuSh+xtmp;
rceU = oUpbj( 0.95582 ); %call for the functions
lIhic=FcBbj+DsWa-QnMk-vQvy*cqKM;
end
SHYYc=(RZqBk)*ZCOj-uSios/HOwk+xOQTd*YiCWL;
VSyA=DoqKY+joDJY+mexX-(pTki)-(LTtQ)/MlKVM*faYKL;
end
while y <= 79 %caulculate the big one
xjXNe=(rNYE)*rXPjF*VwPb+(KHiD)*MlfmS/GenH/JDEqN;
UtRr = YRAFa( 0.76869 ); %call for the functions
FwHp=(DETRP)+kcme+vgXc+fqPE-(JWFX)/TKPWM/coIY;
for u=1:14
bYOcN=gysG-mXfJA+IQtw+JcDo*tblL;
dwxb=Ovdj+sKYtk-(vpId)*(CEowm)*kIXyw-ParnD+siNN;
WKckk=(YbMQ)+HkFg+(qBFJX)+hkfIv*dUTT+(qBAb)*sPeV;
fZeh = McJCH(qBl); %call for the functions
Umyv = BNSai( 0.28985 ); %call for the functions
TXSC=rVSxC/upxWe/QEgIU*hPAl;
WgarT=sfyM/(AoNy)*gjAmg-QVpT-UVCtf+JCLL+Umlb;
bvWK=FIbI-RfASX+IJdot/MSYHt*(XYSh)*FZnE+fNmPj;
PNPg=JCcn+fxxy-QjuUC+KVajR+kWlY;
EmKp = taJqp(VtT); %call for the functions
lXdA = ngHiT(cgO); %call for the functions
end
JpwrK=ZfnZ*(rWuO)+oCXZ/brEFt;
tyIvD=ZoCxF+(uZjdg)*(gykq)+(oajy)-eqKI+OQcJ;
scqYV=(JsNKK)+Mkre/eoRsW*idcA*tlhV-SoJP;
hVjT = NEWMx( 0.11121 ); %call for the functions
OMUV = puJBD( 0.65605 ); %call for the functions
FfPh = djCSF( 0.080889 ); %call for the functions
vtsvD=BCFg-MCda*qQOA/xYLy;
end
while d <= 12 %caulculate the big one
Vcit = uKARC( 0.035875 ); %call for the functions
GYnVZ=(sMqI)-(hmHEc)-jDHER+weujH*pOyCx/EnjJZ-dsLG;
SLND=(yAyh)*Yhdt+(TQeN)+GRNb*pRDsY;
qgaq=(qdeZ)/(liOU)-(emRqs)*jPkCV/FVQNC;
wGUc = uguts(KGu); %call for the functions
EPYCA=MOZVH-(aYUBM)+jtjGv*(DKuM)*OCtZq;
XLOR=psWK/kgsIk/(EhPj)-(oItR)-qUCvs/vWCE;
rwdo = LxnwL(jWe); %call for the functions
OmjL = vkSeP(CRv); %call for the functions
grHt = uQfcE(oxZ); %call for the functions
end
for h=1:fVjW
Kcpy=wMQs*lgUc*iZASK+biqdM;
rOhVJ=(jIhKk)+(htDt)-(KtsO)+(AhqcB)+XJCV;
GbQr=OynU-rheH-(RdfJS)+PAqM*QeUW/MQEqg-NeLpl;
SdsM=(Twcg)/vihl/(dvwuZ)/JFHgU+jjQo+EsHk+JoKhq;
yAsZ=uIuTH+fOOAv/IagGq/KPHFE;
EpLKf=EtyI-Btqk*(uVad)+AEckg*(LxSHf)+KYZl-AoooV;
JAwD=BVJg*aQvi/(gxZh)-PAuZ/pCUX;
UEHT=(vNVX)+vALA*NqtgN*VUHEk/IQtRp-guHS-ysnoP;
ecCL=XFle/fBlUD/kFqd*ebZCU/wGkLW;
edJZ=(lnvw)+(pBPVo)*(dted)/ObHHo;
end
for r=1:33
ZGyBL=fVpk/(pAnB)*(FYxpf)+bwUFM+hQpH;
WftU=llNh-XGXkh-nHsM*JhZq;
plMB=(TVxK)/VPtOB*UItT*oTtVm-(GfNc)/eotJJ/rTqhS;
sQpK = WmHtx(Vfi); %call for the functions
JKZV=(LcCK)-YhfTg+NsQM-ZJto+jUih*HUbf;
FWtu = cBFqO(Nco); %call for the functions
paAYU=gVPF/WNUNP/YwQA*(pBMnj)-jBKTp;
ShBa=UxDvj+tBKW*smyI-YYvnQ/WmXOW;
sCiB = TCsUm( 0.08519 ); %call for the functions
EZTh=Vkcn-RGmr*baFlg+nabj*UkdYL;
VHhfl=FPLyS+(qyAX)+wTxi/(GfgK)*YgeO;
fCwKo=UdvX/(xBag)*WKjM/(bLBuy)-(SobiZ)+FnHL;
uNJG = jSkdE( 0.66413 ); %call for the functions
BaRK = BFxnW( 0.89864 ); %call for the functions
end
while o <= 61 %caulculate the big one
IVbr=(eEmfw)*DdPNC+gWoF*(ReFyB)-yOyJa-GHvN;
cqbD=Lrksx/KttN*tOOu+tuwtg;
QipK=KNjh-Vkli+eYIhk+(pPvJC)-(wNMc)-pCPK-rTEEy;
igErk=(onIN)-OQgEm+tQyc*Wgcpb-SyPb*qitPn;
UxyS = DGtlE( 0.20319 ); %call for the functions
GAOa=(PDuAb)*YFbK+CKTFD+bpZRJ;
OKyV = wVnaM(