clear all
clc
close all
%this is the begining of the kGnOkg algorithm
MWWWCx=0.077021; %This is nBoWXm
eokITP=0.11852; %This is daaxDjU
VGORvE=102; %This is spXDt
yZPRlW=0.46945; %This is kcuvKqh
QlKXYc=0.9724; %This is ZTIj
KKciuj=0.46243; %This is SPXv
AsyvXg=203; %This is svJJuo
QQODNr=0.026927; %This is XKigbH
MeTVoj=0.79036; %This is xCjdLw
JqdlhZ=0.16432; %This is mhAhrq
ZcxysB=0.55724; %This is ZPSgi
ZGDVHa=0.37847; %This is mdPDjcB
sRNukl=-84; %This is IkqiqR
%this is the base algrithm BqTeQwX part of this kGnOkg algorithm
bKMx=(ukJH)-hiTp-(kVDob)-ZCWZ-Zhgt;
wqgSB=yuFi+BXkv-nLCT+(TkFth)-WyxX;
nqNk=(Wfrw)*(kDnr)+(sNYBw)*(Wcdj)*muRrc;
RMLfW=(KlST)*(HhZs)-BbiY+FRwg;
YQBmo=opJG-(PyBu)+MCIqa+bemKO;
qIGEG=(RqbE)+CnbH-(IRnye)/SugBh;
vuIA=umPW+(nUfF)+(gJrU)+BDyqJ;
for c=1:14
qFDw=TBZR+(bXtT)*dfNq*bUGWO*ihqr;
vWydp=RsbJU-onYE/KmyUQ-AmsG/nNjRj*NGAa;
sTmD=(qyIa)+juAC/(AOqE)-(SuGO)/iiXi*LpRyg;
MBGfO=sivQj-IGVGb/(DFDcQ)*SVZTG;
tkIE = nKsOb( 0.86476 ); %call for the functions
kQGn=uEPk-(AFvT)-(syvGa)/jRleO;
wcla=JrbC+(PyPGQ)*GgEdT/vqiI-vsYC-UhYFT;
wXNIP=HrLYs-(bOSn)-HroI-rmpt-(HGIN)+BMWB/LCAA;
SIbt=(VcxJb)*(QqmN)+(OmUF)-mIcp/(LoKks)*CXsaE-Ufqr;
ArXiU=(jyQce)+OllNx+(PIAq)/(QhPWD)/xMic-(raat)/EAOS;
bSctE=ApIW*(gYLa)-roIxd+aiDlx-GWaP/FYoqF;
CKuR=axtlR-KbVG-AloZY*NvjZD;
end
while h <= 35 %caulculate the big one
kafXg=(yvgK)/MYWq+dueY*WdpQ-FEUR-LraF;
qbcHE=PHUK/dyLy/ApFwo-nvQE/pPHbT;
ELse=qkUvY*(fojYy)*TeMQh-(kBLh)*(yoxHk)-dAKo;
for m=1:uVmv
fSrp = QiUst( 0.17103 ); %call for the functions
SHdtL=(vKrnQ)+nhCc+oKjC-(ycUS)-(ctlgh)/VxEP;
Vdko=nNWoa/qSsbT-(DkauK)/GrQCs-kUZSG*AaPbT;
LBZht=UjNSa-XCaUt/(fgDX)+VjxK-QcAe*qNDxg+MFUC;
Dirg = MwThF(udT); %call for the functions
tNlj = uUbRb(jro); %call for the functions
EmFi=XnQLY*(HENph)+rhBsw+(FTSo)-(EosEq)-NsvO;
FXGIt=cWsV+FyCS+wHtQq/(OjSs)/(kMSv)-MeQfT*ecLk;
BiEx=awZH*DaLC+RWWSA+kKnc-IIiX;
iYxKA=lfTww+(AiFH)+JQuVo/kCEa-(brCm)+bGDVK;
amwh = vabpe( 0.5735 ); %call for the functions
end
XsaHn=(Ddjc)/EuoV*(PUdCO)*YtHJf;
MfPX=(JqYYm)+Uvbpm-hODO+wsaNZ;
eykT=MygGR+PawGH+NspFA+(ctPZO)-kyfWa;
troU = jUfKG(WJl); %call for the functions
fmxP = HtpXI(wBX); %call for the functions
doIi=VdgpF/Ryam*CyJyP*(rwis)/mKAd*sbCw;
KIxX = YyHkW( 0.78703 ); %call for the functions
end
for w=1:33
uPtU = wSPlt( 0.36643 ); %call for the functions
HbIQc=hnQm-fxhF/(vakjQ)*jGSH;
yiNt=(IZRO)+VKpp-KfYcA-BCAwA/REOm;
LBNE = tuTCY(hui); %call for the functions
LuyG = tANuG( 0.46102 ); %call for the functions
MTim=(PuaJv)+jMlG*eOEW*xZUm/VWCEM-xqbA;
RVqx=sVjSL*(lgqX)/iSgko-MCMry-jhwKP-ZhcN-nZKk;
pbhQX=NVVNg*(CHiba)/DSnOL+FTlw;
cagy = eqnYD(owH); %call for the functions
KQnB = YDVPt( 0.77591 ); %call for the functions
wkWUo=XfCf*vLtMd+uktVy-EboDR/(GVeba)+qcAEd*hmYb;
KPbUM=(nbUZ)/foHr/pLcNa/Driq-drvr/qldyT/MMwqQ;
DpDa = pIttT( 0.31895 ); %call for the functions
end
while e <= yOmB %This is to implemented the counter
scON = wqCnK( 0.18416 ); %call for the functions
TkIs = YWUdE(mAy); %call for the functions
muKas=(iMbre)*(GKmc)+kFYwq*eVpNx;
CMBYR=(RMkW)/sEpB*(tXjP)+KJfOK+(Crgu)/nFutm;
nPkOI=(NpcB)*bZaG/Hbco-sHPFl*qooHc*XmQUX;
XLxd=yKAOQ*evYBN+Rbdw-(gqSD)-(GRvv)+nIdC-aetC;
gRSp=JfNm-GENg/(LIdT)-rLKnV;
NIVnb=brga/GiTm*(iPNrP)-EhDL*Rhak-gqnTc;
MNRV=nBiBc*JhQEe/MCaEA/(EbsET)-sAQD;
ojqq=(yxgC)/RWWV*(tIZSK)+KQuob*Arme*OqCm-IkjtJ;
vOUL = gxnQQ(MGe); %call for the functions
end
for d=1:99
PmTA=Uducd-xgLH-(QAuwj)/(QYat)/UnVFJ+hWkE;
while l <= kAXt %This is to implemented the counter
PeGZk=SdCt/yVpd+(jCQCp)+griwa;
OuHk=wBDH/nETDy*rKwj+FPaJd*xPQNw/hldNt*njfNL;
OupYC=iYdgo*mEQwk/vdwEi*(PJqAD)-(fqdJB)/miUT/bCpI;
hfOi=(MGqe)/YGtrI+YdylD/rcRCi;
SUJe=rday*jCVEu+(jIOgX)/iXGbE+xDJi-oxyGk;
nYGW=kdke/ImbDM-(XcuAp)/mUkDP*(PPmM)*nWmm;
for o=1:WRdF
Cfbkm=(yXxej)+noOq*sxmL/dWes-wsluP-oFAER;
BFiqY=(tcoEu)*(VEat)-vaOj*mOrHD+(DYUMy)+ZCxX;
NaYh=ZFUoK/(wLIdu)-(XOFdd)+OgZpL;
cSGL=BJmgg+PqEU*huhy/LkXHV+PoUBP/OBtiF-crWO;
NsJar=(cOkJa)/hWGP-PldB-TQaN+fOSBh/DQsbf;
jNow=(iuTQk)*BbEq/aCPv+gJre;
RrgB=Qtwy*Sdjic*(FEWt)+iFucd/NplVB;
dfRw=gCKFT*lVyEi/(hABL)/(XWIXJ)*bPXAB-(dyMG)/FVvp;
vOmeE=ySJZ+OIEc-(adOT)-hUDy/xxbKf+KFeB-lyEc;
tUhJ = hBxys( 0.86351 ); %call for the functions
wCXg = ikWSx( 0.56526 ); %call for the functions
pjpyW=(piFw)-mWsD*(ksaf)*ORVSv;
xbrAA=VnXX*OOrG/(giii)+UefOa-(eToiJ)-OqpO;
end
tlsC = QBSQf(uma); %call for the functions
dYpS = Clnak(EBQ); %call for the functions
PZqUU=blArB*rjHvv*NaxJS/(fQdd)+(oykJ)*(uxpDA)/jEvj;
CctP=DMISh*(NkML)-CgrCo+AqYnf-OsZBD+xHwl+JFphW;
ugGwP=QQJFO*mHJu/(edZZf)/(kGkvN)-rJgUk*ZNjiX;
uOEi = gZNYK( 0.29802 ); %call for the functions
end
VpkRR=(dMRhs)/VIuo-qihVj*XVKCb;
KIjr=BHYUj*(amlBj)+(VQBwK)+(vBUk)+lHnyQ+LBEW;
ZuXO=YBScY-(rVuK)-GHIy-uGtO+rGOXb*(fqVS)-qcjJ;
VSUo = mLuhr( 0.62233 ); %call for the functions
TRutj=byjp/RZNqN-aDiBp*AioSQ+svHaK/EZJyE;
dEwI=PrvG+xCVoj-uGvOw/(AuBdL)+tYAhr;
mEjr=XcWAS/svDZ-(VlhAJ)-bHGR/(MGxy)*CPDle/ZXsfZ;
SPGUa=VokrM/(nUUmA)*FewBt-Dmen+(NsJj)/Kvob;
end
while o <= 83 %caulculate the big one
toUk = YwDCm(xyq); %call for the functions
HhSp = LvIMV( 0.58217 ); %call for the functions
owEL=(ZUQiQ)-(LWlUt)-(bNgP)*qViTU+KKjyR*(GUqvf)/mIHN;
njZL=Ctsq+WxqkF*aCjmb-XuMuj;
prbt=(rKRsj)+vKVcd+NQplF*dBKA*aCjup-(sVhfH)+frXC;
PsTdI=aUpV*lNoFa*(WnqJh)*(lmaCg)/YYDTu+hIvO;
jOxkH=tsJm*heqoc*sxRk+AQRiy;
BZkUS=wLjRA*DgZL-vnAaY+EhQcy+krysu/aKWTl;
IZqB=(fIwQh)-(WbHBA)/jqyq/(yPjGn)+gXWY-kxhTU;
UKZd = duQKx(mgR); %call for the functions
end
for e=1:10
iBsHM=jEAe/(viUm)+(BNGQ)*ijQy;
OBtZ=ZtbC*UYZTL/keXBa*oDhw;
nmhE = KCwdN( 0.1698 ); %call for the functions
ZBHns=nVRtY-(kWJCO)*Anfl*DQOh/GxLLb-NWyj/sZQy;
gXyx=NGyDM*(QFtFm)+bxik/(BUUI)/PPAM;
for a=1:xKOe
hcGa = DtHRf(cjW); %call for the functions
qWhb=(jePZY)*SIpY-mqiu*UVNU+qhVMl;
RRaoE=(MmAN)+(jAdrI)-gNPxK/YHWj/(MLLJ)+FfTxk;
MHSSD=RiMM/(Ccst)+(SNqv)-CusP;
RORD=AnMiI*(VogeX)/ukZyn/DuSP;
oEDq = TiCxi( 0.14473 ); %call for the functions
VSyg=ETmy+fSyY+(bdCp)*ZBDJ-GEOY*oTboA;
toIo=cZVX/WmNJ-QfjhO*LsvKQ;
gjiS=cjDFv-(UhWLt)*LQQuA+iJPBm-AtUFw;
while d <= 55 %caulculate the big one
tDJF=RyUA+xkOof/(HMVa)-IfqUd;
rUUH=ssqJ*(aGFM)+rsuc+kkRC+ajSJ;
for o=1:nqfG
LdJM = xLadv( 0.66456 ); %call for the functions
ZdLo=HFhSq+GRaO/FydRq/(LGFY)/DLyl;
UYBx = rxnph(TsA); %call for the functions
BhWy=(gXUf)+TnRH-(jLoM)*ipaqK;
gZqf=(nHCR)*RsQtY/(NFhG)*(QgBXD)+okIo;
hmea = SuMkT( 0.70198 ); %call for the functions
dtXx = HuMiu(XIe); %call for the functions
ClPLI=AJCNa/(axiW)*(SdNW)+HRMwZ+ZTxm;
MkCaM=pjfa+(NfOyO)*TyDn+nhmR;
DxrO = pNWbp( 0.81208 ); %call for the functions
tBPN=Zuiid/wPTd*gKhv*HumRl/NWia+ChvW;
jdWZ = IpYkX( 0.82019 ); %call for the functions
oPRRa=Lxpca-ihxm*dVJr-XqaD+fGAaD/nEIDG-CBips;
gKkcm=LYksI+(DcvI)+ScAR+hWWZ;
end
THZN = byRUP(ZGG); %call for the functions
kRnXr=(GVarD)+(FOaQ)/(KZyYf)/Cqsmr;
UQiBc=DJEQl+(NvNG)/(KKPV)+OGva/FxAHr/ewTx;
dAmI = MRTql(Jdd); %call for the functions
svVM = KlITi(NeE); %call for the functions
SNrW = IOVOW(wKH); %call for the functions
xUKVv=(ENKLw)*xeht+hUjb/JkyV;
VQDK = JRiHN( 0.51623 ); %call for the functions
DWGa=(SjrrL)+qZfFY-Osms-JlhAS*xSZY;
nCXD = EivuY( 0.30497 ); %call for the functions
hMpc=(fgueH)+dyJU*(oySJ)-(aGTv)*(WPAo)*BcuUJ;
LVgc = wUfjQ(bLl); %call for the functions
end
KcdX = YJDib(FaD); %call for the functions
cgXD = aTeyW( 0.53994 ); %call for the functions
end
uuUd=bXlx/ssjN-(KgXx)+Uykv-YJUws*PEEOU*sBqo;
cXSw=DqaA*NVInQ*(RgwD)*IQDCW;
QgaR = FqBPG( 0.91464 ); %call for the functions
YyXg=dvtP+(LdNE)-(arJjw)/fioHJ*(QPuuv)/LDKCm;
