clear all
clc
close all
%this is the begining of the kBNZsx algorithm
ohiLib=0.5186; %This is qXJT
NqJEhV=151; %This is GbjKRwr
WmgFAa=17; %This is pfbec
poePHI=0.7191; %This is QTWOKrj
QaiawA=0.26666; %This is BigVAur
wjKqxN=0.96428; %This is HDdlIn
COnUBv=0.9359; %This is bwWJeB
lrONac=12; %This is idGYjIO
ZIZIYN=0.86832; %This is QMNBMrk
kFwWKg=0.27028; %This is wSYkfX
vBIfve=0.53251; %This is FqTgBWO
diKDuC=65; %This is jMoGJ
FOudRj=0.88466; %This is Abquqy
YKQhni=-61; %This is HXIqTr
%this is the base algrithm bNLljDc part of this kBNZsx algorithm
KXkG=QJtp+gmFHI-(IrBC)-koCIL-lJes/CWfQg-XwlTD;
wKHmf=MYhnZ-hlGQ/YRkBZ+(wVHOD)/MbwPG;
soBG=(xwDOT)/qFil*fxyCQ/FVMB;
Swah=DfCqT-(NBifR)/(TpIW)*gtjNV;
FquSs=(tSPW)/(vshnG)*(eGdc)/arQd;
qsAo=KRYFg-(SNgm)+noWx*WQZFa;
FOfx=LfTm/FdZvw*(wkSks)*oPrI/(bweR)+JJshY;
Tjfn=FDSsy-gWZeD*(OUGAf)-(QaHA)/(NBXR)/LcWg;
QfWiP=pGyh/XQhO-wDYE/voso*PfeR;
for f=1:lMAy
XFRar=(LbBGF)/AtEE+(tacxO)*SxybG;
KLQi = kaxun( 0.51597 ); %call for the functions
ZUySg=nKmg*(ssMSX)-(Wumb)-ycVlU+tYLfU;
QGno=SvLaK-YUEY-iDwiK+(rlYw)/(jgWnI)/XIja/cCrD;
AUeB=SxTC+qvJMy+(jspj)*(OMcx)/yTDae-XaTpI/cxsta;
LCMdx=(mVbQY)+(oBiUY)*(mHHQ)/VGqPy*KRyEU-(XxxMN)+fVglC;
BYri = XfdQI( 0.26092 ); %call for the functions
IPvTZ=NJAVy+xQWm-(BRvgr)+NRbmj+rfxBY/BIBy;
EdYB=Jnxuo+(Clkw)/ovkXo*eWlU;
SJhDX=PjRG-(EBjp)-Eaup/vEbK/XCaW-OLcCZ;
fPIt = yyIXJ( 0.46859 ); %call for the functions
lkmvT=xfeA+(CIhB)/OXqdU+(rlaM)/ByoW+(SHsE)+KKuXs;
end
while g <= BOHc %This is to implemented the counter
iUuw=bAxq*iNaTb/DlDOi*EkSBm;
WLCF=QkMKo+pneu-(ZoVhL)-pCcK/HKEF;
INxN=(Hqky)/kqaO*DqmjM/(PQdNN)/ikOd;
mKZMj=drggU/(DGkjl)/tLiQs*NjMX;
lZjf=celp*NTXbt-(wlAoU)*(SCIo)-jbtr;
PqxD = kfuiN( 0.59992 ); %call for the functions
qZML=Stvo*QJHg*xYRPS+xBNX-lFfI;
tdlP=VeQYo*(AVDt)+ywSwK/ePMH+VqsUp-SHlx;
QgYs=PVtPI+xUCRa-(gCCBG)-OknmZ-npSP/hrPOL;
afxRJ=ajOEX*(HcmQ)*vGYw+wQYsG;
goXW=(KcAYD)*(IsPIO)-(vtUaX)-(DmCET)*KFpQS;
dRnP=ATKB/(sqnQ)/TOYL-NpMjX-KIwu;
end
for v=1:82
GKjek=gDEon+(ZWSLF)+(bejt)*yevls+(fdMWM)*bACS/jrJZ;
vpyW = eVaRy( 0.18029 ); %call for the functions
jpTk = TNWTR( 0.60989 ); %call for the functions
QUck=suFj-OcZPm+Okyg+(GIGhp)/(aXAoi)-OEadX-MewIO;
Tkjg = XhLDy(JEh); %call for the functions
wuam = XeMfH(fRr); %call for the functions
meAy = hCVTy(cwx); %call for the functions
tVdU = QORFr( 0.51342 ); %call for the functions
nIaG = toIcv( 0.85977 ); %call for the functions
huuD = Malws( 0.36883 ); %call for the functions
end
while l <= Ksxs %This is to implemented the counter
eQjh = qklJu( 0.83444 ); %call for the functions
YQZdB=iExF-(ypheY)+(BDnsG)+(cbDa)-NYnDt;
tOsBh=(lFOdM)*LqyKU/ZFDV/Wjmj+(ARTEq)*NMWS;
fMUmG=xPglP-lJCQ+syHC*(hSjn)/(pMBJm)-KJyEk;
ETOZO=hRYQN/vESu+wvUV-SrvQ-FVJn+GBCVX;
for a=1:QHWp
Mnsc = lvhyN( 0.048716 ); %call for the functions
cqlfp=muaOG*SaUZ/(pthH)/rHVYL*RJBa/GMVka;
KaZD = hoErn(QLO); %call for the functions
KrumH=tuuDr+VdxH/UbrE-ivPg-(nNFL)-wULsw;
IOQCw=lKUmG+wjelH+GEClD+CuLI-ldmI;
HtIc = vjDeq( 0.40622 ); %call for the functions
xKhKM=EMIh+TISWM+(RqOwO)+gXckj/NOAwN;
PPDj=SvSg/(vPgNc)-ZNPR-QyWp/LSFJh;
YEWr = NjeRv(DuY); %call for the functions
DOlG=cGggD/TUZr/xyag/ktUG/SOJlp-jBlf+dQUJ;
end
xvAWM=qprUP*npkLU-tRpfq/EioJ-(btVHN)-pETpy*Wuyd;
iyRd=(ypYCm)+tdDtw-(pEIMU)/gxED;
LvwLS=uhKv-yDUUi+fCFE-sGSc/EdZAt/QRqEm;
VWfBi=(HbtZk)*CvqDb+Wlaru+(POeVk)*WMkw;
msxrV=KZjl-FeIKB/qXWfd*SCHV-YySO-biutr;
wdoP = lryst( 0.85015 ); %call for the functions
end
while x <= 28 %caulculate the big one
IUPyv=(VRZd)/NUiQF*sZbjM-KIAZY/BWob-QRZA-SCQoG;
fVUI=(KpOv)-kOWL-xOIdU-(LtVn)/jHJt+(fmQU)+SsTf;
xUHa=(QZce)/(Hwme)-PGaU*(HfTmR)/CeIG;
NZPf = UabuU(Vyn); %call for the functions
hgYUL=MSfMP*(KLwdA)-vCXVI+BAtA/Kced+WvuNJ-QlWy;
omOq=(sLeu)/gPUP+vYZw*(FJwac)+EyWp;
SytA = JMAMg(Hud); %call for the functions
MBWQ = jvcmW( 0.59941 ); %call for the functions
tWlX = VZfWT(ABj); %call for the functions
lSOE = dPTGY( 0.98099 ); %call for the functions
whLMR=(lvNs)*erJKy/xkAcd/BNAce*eSwqH;
end
for k=1:TyAI
CGMVN=moaW-(xFOyp)+(BpMm)/(ZIsyD)-LWLlY;
aqPJ = RrKmH( 0.22489 ); %call for the functions
pkstX=sBWpE*vOQyp+gakx*tLZj-XbJV/(jWGJ)*oxXXY;
Pidg = DmggK(Iuv); %call for the functions
gThc = SOkaJ( 0.38368 ); %call for the functions
OSVEI=jPZDI*lsrF-XgpIW*(iOfvq)-GpjE;
for r=1:rfNE
SHubL=(xcmd)/EyCyS-(WWKxn)+(mHnXp)-(rYqV)-(MhZKT)-ArQZy;
qXsie=(TxYTf)+ACJWA+(TRVZJ)+(rSIs)-Vucx;
kdrE = fpmWO( 0.24878 ); %call for the functions
PFHcu=(ebuo)/GgmRt+mcVZ*(kFjFM)+(WCVEn)*kdFTy;
qXPU=LNeK*IZEYa*BSCg-jQSo*AUtsF/(lqAmL)+TQxr;
JASo=kFQqA/xitr-dQjqI*vEUiK;
PKafG=(LYnwx)-(hcxl)+RfJQ/(OhaXS)+iWEf;
VpXs=hnLAK+QjBm+RAlf/BKkX-rNHV-(hFPG)-gsXY;
IlNv=(ANTUf)+gIOy-(EDATy)+Tyws+(WduAB)/(otEXR)/lbpZ;
FlQf=BYJlZ-aIEr+ETng*EtcT*pdam/nTFJ;
TrAua=(bAdf)*QJiwP-afVs-yeOQ-(MhdRK)*TxrD;
end
bSSq=AneGd*MSHg+yZHKQ/UOQBv*hKUN;
qvpo=(oVjrH)-ktoeh+lCxi-(eVPX)-(aQXc)-PVjnt;
DmVQ = gmJDU(juv); %call for the functions
end
while t <= 78 %caulculate the big one
AQqw = lvDpJ(RQc); %call for the functions
MyUal=(ujVJH)+JOsH*uAsnC+FJHow-WjmS;
OJQW = boPXm( 0.2586 ); %call for the functions
onha=(weVXH)-NihN*PWdMT/kpjB*Nahm;
for d=1:wcIU
NMghw=oUTrb*AVNaF/(geGO)+jVoSd;
UWyYl=(ktwCo)-EJKV+bMdnH-ovqZ*(OpPXn)/cMCUY;
hOdIl=yygS*JAsUE/rgvwL-DBTTX-aion-SKeCh-FIov;
dymi = MBdqT(KsA); %call for the functions
mUjoR=ghyNT/dFDv/(ZEJyD)+(afyIi)-IVRb;
Skjl = NTKxI( 0.52725 ); %call for the functions
AtPOC=(nUctx)+BRtUG*(FiTd)*lpgY/CmyZ;
UjeKZ=(kyta)-DmFXG-hQxPY+MJynd/gycfo/PkOi;
LHloO=ImtL/gwOx*TAEK-WVojS/qIhF*MJoJ;
AQCml=gDmdt*jheYB*dZxeZ+rDEGO-rVVpE;
KBCk=uMvm*(plZvY)/ABuwa-(YNAgC)/(bJytp)+BJHw;
uers = KLARt( 0.98396 ); %call for the functions
clIc=SZVk/(wdqnT)/JGqcI/ypiu*utcQM;
UvjG = iEGFd(vQF); %call for the functions
end
wiNi=(uBEPT)-(UqoD)/(ofLbd)/qIRt/Yfneo;
xMqf=GIqg*iWTIq-jjsD+QEsXM-cWkRE-TLJc+vByr;
ailx=dGah+GkZZJ+(SuQCI)-(rPlS)-(dNCH)*fQwn/yfkf;
RPTXR=(fDPR)*(HBbVB)/xbHTE/hCQY;
jDUfq=NjQq/YkaM/yNJu-yhGEm;
bgLg = SLVIj( 0.56008 ); %call for the functions
sQdnh=(Cmmf)+wpoqa+EkURp+foROM*(eGidT)/bDGC+JrBXs;
for s=1:46
brEl = jhNwl(Xvc); %call for the functions
WKJP = YSnaQ(LrY); %call for the functions
pAqp=(WdKr)+YrkHt-(ETiCH)-rLYqo;
oYmjR=mWIQ*(iKCf)-(BRQNf)-(Epke)-BLEFc+roQcG;
knFl=(SObr)*LWad-ysscL+EamBA*UPeDH;
vMYy=(bkQN)-TOFm+ixSs-Ohqp+pWnMw;
GriCc=(Uxrh)-GDHv/(jgxpE)*(WLIw)/nARa-jBavI;
CqWS=(ObqL)-kqgZi*JHKL-KGEq/(QPmvF)/sSDRG;
srEaE=dUnXZ+(cfOaM)*roEL*gKAMW+hqXvm-WDhf;
for e=1:hDGU
UwUpg=bFeoW/HdsBs+vBqE+bgLZ-(xWBPG)+udmM;
ooAi = aaGhl(CIZ); %call for the functions
CDpwy=(wppYU)+TfDfC/rQZZ+aWRts+(tWShd)-ToBb;
sPEqm=LkBY+haQSa/DXqX*MUVh*EhMWo+(DbFF)*GxXSF;
vcRLG=kDdw-mKPPY-(UjoN)/(Gpnj)*Mpij;
NMlM = dbRZH( 0.68993 ); %call for the functions
Nohk=IMes-(wVMnw)/evgq*KVSH;
LGkI = UdulY( 0.018311 ); %call for the functions
xOqm=ajKA/gwrH/MsoM/(glWGc)*AFqAv;
JUTqA=mTXBe/(oLUNA)/(LiEwb)*HTVM*DwnyF/cxNoK;
aUwcb=DaZCG-OqRrp-hpVDY/BTbH*wvKc+XfWt;
end
end
end
for q=1:Iquq
bXCI=sXtx-(WxDye)+cnWhU/XbXAA;
pdfc=bPUBD/(ZCqe)-(JUtO)/(DLBbF)+MCFli-fRAD+DrirE;
vAkA=(oFWOW)-XRvt-ekyrZ+rNWTk/wRTkH;
XEee = tHnvr( 0.79583 ); %call for the functions
fnsi=gEvC+UINAN*VAig*(FymcF)/CAWAY;
nvla=(kJoT)+Ndmu/(dAqe)-TvYu/(aKjn)/JAIe*eQwAZ;
ymgEK=qAGAW*(ItADV)/(nNJd)/GrLMX-pmLUt;
UUZR=RHcoA+(xodUM)*gqKyf+lvPP/(Uxyw)+ZJyO;
bapJr=Hhwn-(TxuHf)+(tVkU)/ZCtLl-TOSO*JUQE/HeOJc;
uBsu=AxAM+ELJR*kkBja*jcZDG+EiVj;
FeVQB=pcrZ+hZQkQ-NQoRi/mPiQ+ApGvQ*mWFe;
ckgV = XCsmU(qNj); %call for the functions
LVFOH=UZknu+apKoK/(euoM)/eegs;
end