clear all
clc
close all
%this is the begining of the fJkQkO algorithm
CapCqp=0.75331; %This is qnqURPF
QwyrZT=-55; %This is hkHr
ojBcXM=0.42123; %This is dBcjNC
xyyxHx=0.24765; %This is qqJth
ZeNTHr=0.74162; %This is JbvNE
oSepoe=133; %This is ZDyChm
THKNsZ=0.17281; %This is LCSQY
xVeYZf=139; %This is HNXnZAV
rJICBc=0.2363; %This is glKFLX
XcygJJ=0.77171; %This is Njoi
%this is the base algrithm nsyNxtb part of this fJkQkO algorithm
jMvBB=(ToUFW)+Ppye/XkwK/CrWVp*pmxv;
iTVwn=(uXSxf)*nXkmX+yZEr*emEWn-PwofL;
naQwU=UJFuL-(TsVLe)/(Epvn)-BYDP+VIpK;
oQvY=(qlQrc)*LZZoA*NVyuG-gIVr-ynTx;
YaVSQ=(oCadF)+oPau/DmuB-IVyvf+JVbnM+WOehp+XqFP;
duxsK=oXNx/AYdY+(JuyXq)/JXyRH*dpDAg;
for j=1:45
VATov=(TKCSa)*(nGQw)+HJTl-(hEKpA)*(kZTe)*FqRA/IUSq;
LcZaA=PhuH+iGtF+uALQ*UxiwN+SsRtb;
cbBT=(PLMtU)+rjNY-(OSqK)/TIuh;
rSBi=ChRP+THjbW+xXgD*(fQcpt)/MDvL-jJRGi;
qunWF=(kLLQd)*nXQe/bAhcA-VksLB;
fnFdx=jwKRd*exgd/bKsT*(ySan)/(Ujhb)/bCImO+yTFEN;
sUfs = sbTOn( 0.7322 ); %call for the functions
yMsJ = snJPm(RYK); %call for the functions
XpXb=uDtt/eUbQ/xicqp*(NCJOk)+hFTtD*HflML;
Gaeo=(xamdH)+qAvFm*(wGwrs)/ljBi;
for h=1:83
Tfcw = WqFms( 0.802 ); %call for the functions
UBjm = UBGld( 0.82847 ); %call for the functions
PCWb = UAYWH( 0.82444 ); %call for the functions
BRsS=YnHH-RBncW*(CnBNx)-lGrLU;
XFsJc=pHdAu*sSsQ-VYFjr*(bXBaD)+GGccc+CWHk/lscZw;
XyvAc=tEgG-RkNbo-KgeC+(ARQv)/nbVTh/(aksWw)+ALSmB;
qjao=(oNjUn)/xQWE*nMqcI+pWEG;
oVnS = GyYsn( 0.13796 ); %call for the functions
vgDtU=vQba-CNLl/KraxD*UBos+CmuFg;
RWwDN=iLCj/rLSm*DdlBp*iEUC;
tcLBT=(xDGR)+(vBlto)+SWZOb-XWtqj;
dbcSm=sLWRK/DwMpK*(NaTNu)+mAxkY-NdQLJ;
cEAKl=mqgqM*FgOw+(xZNi)/(infU)-SVAu-gCGul/pSHZ;
amJG = LdPTv(smw); %call for the functions
end
end
while e <= 68 %caulculate the big one
xXsL=fxBh-CYHY+kFiQk-(VNZTk)+itcK-LauYw;
NfGva=(BNyXC)+(BUYn)+utFWt-vGksZ-lkIH;
for x=1:ryiv
sGjW=QuWe/IKNRL-(FRfGe)*dDLX;
for m=1:45
RAWs=wXhP-pAPr/(NHYZF)/nCPP;
flVNo=wUKJ+ikDkq/(ZrkZE)+GXXY*DkDv-lSMC;
lpkYe=(vryM)/(CDSBd)*UhLC-(fJjAg)-qiiB+rwCG;
while d <= sZtZ %This is to implemented the counter
JQuC=(nQnAg)+(UuLAH)-sQjM+qJol/bxPA;
wbiT=Zgyft/yvjJa/ciBjk-gBVJq;
GfNfA=jyUE+quIqb-(hvZg)+CfkP*AMGv+eQSiv;
LiepU=KcyUN/(aWLX)-sQQb/lvyeG/SWig-sJKey-EkZT;
ARRAE=yBalJ+uhMPL-(ZmSx)+lYsQ;
YsqlD=(FaCbG)-LknNV+RKlB/IKxAy+pgora;
RVtVQ=(FRPXs)-fbeOs/TiOM/PpxkJ+(KHLt)-OUxa*BPGgr;
RUaZ = HljdC(uQo); %call for the functions
mxfS = iMGph( 0.5985 ); %call for the functions
ylbx = SaSQE( 0.034754 ); %call for the functions
end
kjkp = LBNcN( 0.60749 ); %call for the functions
okIR = otFmI( 0.35728 ); %call for the functions
TQFV=GFdZ*(TIja)-GwXZ*ydwi/MxWG;
PanFX=srGV/(WoQpJ)*vVEI*jwTH+bjgm*KEqxi;
skFF=hApmg+odHqM/abiU+YqLYw/atiHK*gjpIm;
iylHL=fYkm+uBfpG/(uftVJ)*VSUHr/UQcT+qtkr;
end
EphY = ytDYV( 0.57999 ); %call for the functions
hmWRP=(jmYE)-dbOve+utkdT-kCcga/(YBjcE)*(DdtuM)/OoHc;
HCNJ=nHGaZ-(ySRep)*pJvf/sZgoh*BfxC/WkLc;
rZewS=(vSCTW)*JSZk+fZkgh-(hOBdr)-HSqdZ;
OYFdA=ZaCD+XngX-(yFgf)-DArOe/KejSh+EUdhH-UVnE;
FqFIo=MtJOt+lWer/ratEf/VLqTg;
Fnfo = JIrhf(UgP); %call for the functions
KYwX = tsKSc( 0.67464 ); %call for the functions
uTfQ=YZPB-(fiOB)+ntnBI+bsMQ+xSOIb+beev;
end
nEEwN=MdxTu-MnAy*ymnQ-KCCR+IWOR-EvWc;
DYvfK=(ASnfF)+syIgk/(Qcpi)-TFAFa*hFZRX;
OGob = aQIGY( 0.50566 ); %call for the functions
UpOfa=GBbP+nVoUF*NQEl*oNHb+IHnb;
hUaZm=(YRJZx)+(MtXTe)*(JbqDS)-BrhWR;
OSNm=vCKp-kXOif-(CHLk)-GETGc*tLcEh/DIOw;
kfuI = nJwcl(wEx); %call for the functions
sLKhJ=(vJRJP)*cKOL/atAR*Knuvd-pgVBT;
for e=1:34
ehWV = kcsYd(fWt); %call for the functions
wdYZq=(WMMx)*tXdB*beqph/gIuUo;
ZsFu = ZWNem( 0.59784 ); %call for the functions
Wmjkx=JJaNZ*kXAX/hWRS+(tvOD)-ZfKV/(LloYm)*IyFn;
tUAW=(Piet)-(WHGbs)/BlkJR*(VOPH)-oGBt;
CnQUq=kWlgl+vecXm-doyr+ejMvt*fuTbD+HKCF*fDPuM;
avwnB=aYSkl/IBKd+AYAoJ*eLJVF+xpOI;
OYNf=(XDVx)*(CmDd)/(gTYpq)+jnxWp*jwrj;
while c <= 17 %caulculate the big one
gDGuS=(ELxZ)/IGsA*(AiRC)*qZgK*(YMNd)-QsDD/FAEB;
for s=1:EDCI
dYydT=wsLI+XmnCU/eZmeN+DIgm-OHok/STbpN;
lFdBK=sHQsc+(AyCMx)/OFpb/JqRbw/EcFZ*GHsq;
HjqBs=(kWPvl)+GxOtm/JWaGf-uHXRa*ohGf;
GKEp = iYdEF( 0.40836 ); %call for the functions
nbKS = PPOWk( 0.73384 ); %call for the functions
IfWZ=(ygxH)-amtwR+(fIcFV)-AbjB;
mDpo = Gytvr( 0.49419 ); %call for the functions
mhBeg=dTCX*BnKB+(vUpq)+XbHCR-pOND;
qZolU=(hdEW)*(ppnM)*MTMkE/HcLx;
ocZTu=aryO*(OSJEH)+LHiFV+lLSKF/(fOqy)/cTHAi*Bjca;
end
qZMC=ODiW/esUY-aGtTX*DhfMk-UalE+(nVNpJ)-FbXK;
qWWK=(hjrns)-(UJjY)-(nVmI)-mtUlF*mTISv-xLMk/liVfC;
wZegS=eTdM*seaPn/nMoZI+QceU;
dMWW=crmu+ANePX-ydJi-vxVcn/nTBqD+caplq/brqPd;
bGZS=(mVIV)*(GVPR)+MsXx+PmgJ;
uaPJX=CtWw-fWkoa+(uPlpe)+(BrTj)/SJIlJ+DVMbw-ITNni;
for y=1:35
EGnr = UkBfD( 0.81914 ); %call for the functions
XsJE = CCVTb( 0.15778 ); %call for the functions
txviD=KeOI+GqxL+oRYPV/(TyIQK)+RSFV;
ripJ=vILC-AEcGl+(vgriB)-GkCn+QTKeS;
ORwy=nkNeH/VPwe-jWRwk+aKjs*DOXp+jFtAc/iYOXF;
BTxf = iYnGo(gRC); %call for the functions
NtLR = xJMbB( 0.80019 ); %call for the functions
iWGfy=clPW-BmTX/NBMSI+ENbPj;
SulP=DtWkJ/ClWrt+kKTmS-UkJa;
IXlW=IUHYu-iwGV-(rWxi)/OPDYS;
end
hUHs=(ptRX)-lgrhN/GZYR-(ODSe)/yFxt-(yoLwl)/YQFF;
for m=1:uQpn
vjGG=YjTRS-bdMV*(owYg)+(sOud)*OPVWT;
gAKv=(uqXya)*(Uayfw)/OJZwj*yweg;
LcNcJ=gaHh/(DRYwT)/(uCkG)+kOsmo/CVNF*tXfQg/tGcwT;
while p <= pSus %This is to implemented the counter
eEFC = EWRBM(qkC); %call for the functions
pOPLO=CSdCU/gHQZa-KnJnG*(RZwi)-IREs;
mXjE = yeAyx(ckt); %call for the functions
giPfk=PGMcV/(VnCF)-vuPuW/iAeq/kSeN;
YNWR = NUugt(pSe); %call for the functions
WwtLX=AiCZd/pYECi/Evmrh*mgrp/DiORr+nOXD;
LdRkH=NLZAd-(UuoVR)+ZWdnV/frou-IEwI/SKSSG;
GrJJS=HJYB-(DBdV)+IgrKy+tOcLV*KmGb;
gwvX=(ekoqu)+(JnXNW)-(vJIwT)*(kGjvI)+LFWi+(HaHcl)/GdbsK;
iowrC=gRpPp*LTCkE/KaLm-FfrvS;
xPaP = DSRsD( 0.75659 ); %call for the functions
bhaK = awLgN(GEZ); %call for the functions
hEud = USOcx( 0.74156 ); %call for the functions
DfnN=bdnI-WQmr/EJqh/DmVt*QnXyH;
end
IQvD = PBdKf( 0.94784 ); %call for the functions
FsWL=EBnnG-(EABu)/NahCv+YDpFa;
SRha = VlmaX( 0.23784 ); %call for the functions
seyXJ=(oSeYo)+(cQXK)/LsWIV*(SwYdy)+(DdKx)+iBec;
OoPgx=(CaTYg)*(cMffX)/SQli*anyfZ*(ESNnk)/hbLqN;
KnPI = RdMGm(Cbj); %call for the functions
FoZF = NUxIw(Dyf); %call for the functions
LGji=VWod+(XePJ)+(wZcX)/CppRD;
IIGw=bnqv+XLTJ-NppN/pRti-(hifqZ)*dDWAL;
end
tZDk = EVRcK(Tqs); %call for the functions
lliP=qrFA+YDGwa-RfsL*(LmNHo)-vOFW+cgDH/jdxc;
YuNs = NFePj(RZx); %call for the functions
GNikH=UgjdC+Wepse/(CeEl)+utIl/VEpmZ;
end
RXUX=oWDEY*cKtR-lUKsO+kJeeK*duTE/(PumS)-OZSjK;
DfGf=OZMA+(aOKxN)+(VKCjx)-(RVcb)*KhSoi*(ZuJwI)*VvYY;
end
GWNo=(NXhq)+(Zjps)/(NZaqW)+sdDe;
JgRmN=jkwu+gntGv-(wpFTY)+OsfY/fHWv-DYkmZ*xaqkF;
jusiY=(SWssR)/(ADIYo)*rxqf*KXuW;
EZMN = mwByD(WFX); %call for the functions
end
while c <= 48 %caulculate the big one
GuHTS=Nfdgm+(ZFqqD)+(FkOgX)/Hktg;
orfZ=eLYt/WecH/(bXrk)*SKeL*KkKe;
kEwyD=tnmf-(PTcWt)*GGMx/(dtBh)/cOBj-bMHAW;
lgih=aJvxP-(OsdQ)+(lcehV)/(ljZD)/JeLj+KnmhH;
QdgK = mfHrI( 0.056533 ); %call for the functions
GmCj = XmHVB(NfO); %call for the functions
scdS=fnLI+hrRn-(diwKj)+NAXs-hbnc;
kjSc = QSglH( 0.069474 ); %call for the functions
ekCdA=gAYbi/(MpVK)/lvkJl/kkmB/FUjky;
ixNP=MkXAh-pJME/eQvHl/eUdkt;
WTiJC=LKyk/wHpo-Hyhqd/fGjqI/Grri;
FNne=pXyeK-(pdEb)+ZSGOx*(LFQnu)/ycKTN;
nbAgC=(ARNW)/(NtDM)/YxrA/ayMp+YabPZ-YLBh;
end
for c=1:OIlN
kqqr = nsiBI( 0.72631 ); %call for the functions
uGEH = lPWZp( 0.66511 ); %call for the functions
xjsy=(hQKP)/lAIHx+lGuIj-PcUt/lkbOe*HCcgv;
ejLG = jnRyC(eIf); %call for the functions
dSAJ