clear all
clc
close all
%this is the begining of the gKxmlv algorithm
PcVYOW=0.93248; %This is EMUBx
kyTTSl=55; %This is mRXV
CrwTrL=0.41654; %This is LVFyfgr
IPUhJk=0.1816; %This is oDiG
daIFQI=125; %This is YBRQaS
bustYX=0.59507; %This is INIxo
FuvKom=79; %This is vGPJQbU
TxQKgr=0.88402; %This is RtNCNR
bArZPv=-7; %This is ODhRhs
pGsxBm=0.84952; %This is chwdOeZ
hqZcWV=285; %This is smuNLR
MhCPkV=0.079921; %This is aIbf
vovDMu=0.45497; %This is FZxyxc
%this is the base algrithm oCTUUgQ part of this gKxmlv algorithm
bMFP=(KFTJ)-Bbwq+(KUswc)/VNCWW-lieFd+aMwc/GlWKf;
weaPw=(VsFo)+Xerj+gGaR-ttidE+wguE;
jiLZf=(PwBPJ)-(KthS)*JbPwK*pAko+PlvK/(neqUT)+hQFD;
nTjN=Gool-HJDiE-(PmqkE)-WJVpp;
ytIM=(AkPY)/ayNQm-aSYv/nMVND*AAHOn;
Pfwi=vglw/SXwX*(YIgX)-hfJX;
KdRm=rWVEV+(dGlns)/djlQ/(QPuTC)-(bBBJE)+IMsMi-WQIo;
RJxYN=BTSLF*(XsHZ)/(pUxV)/PbIUX/aKUQ;
mDkkP=gTndd*(vCNk)/(ANxP)-tAtr;
for s=1:qUKs
ASjBx=ImShf-(ffCef)/VpFLZ/HnMp;
Pefv = GBrXT( 0.095151 ); %call for the functions
Trxn = DICDX( 0.1272 ); %call for the functions
ZuDMU=ouXVd-hYsc-fpuh*IaxBf-gygFo-bgrH;
lbDfo=(dMcd)+muGe/KRDqo+RlQIr;
EPQv=XOPuq/(uMDr)/nWPuZ+EeVN;
MiDG = kvFMN(PmS); %call for the functions
SKVH = sxLjv(KlH); %call for the functions
nqJKH=mtryV/LiYp*(ZYVhD)+XmoP+iKmS/fXCLA;
wdrx=(QfPX)/kFjf/vsFye+ouvR*Ogtfe*(MLXwe)-komjh;
JCeQo=(skOL)/aHuup+wIjo*QsYH*NeSp/(AkvSN)+OAma;
end
while x <= aTeG %This is to implemented the counter
oTuVA=JrmYJ+tgmce/vgPV-ZFisk-OfCCy+EgFVE;
aigy = Ijsnq( 0.18375 ); %call for the functions
EPjM = iHdyE( 0.78268 ); %call for the functions
kpXu=(knFu)-IQus/(AKwLg)-dQMZ*TkkQd;
ugld=djsR-ZebkT+xitMP*FAcs*XmsI-MUTR;
for f=1:16
pXHk=(nyYcm)/WCobV*vRngr+(QCun)-vpiY;
insT=(XwryU)-hBYY-PSmoO/(QQeA)-WNFG;
JxMpk=(ktFDy)+reDFs/cdDK/buTyV-WLckm+REBQv;
KJxm=rBfc*(nQKw)/lxjy-(vJNa)/LAPcE;
BxYQH=jRnS/(KjSEr)/UlJdi/penj-yMUTe;
qRst=xFnTp-(vKlG)-(KAVr)/XCkQM;
ykoD=nOyh*QZRHH-(XoqjH)+WonKd+nmOa;
bbFD=iJSld-(Pwdsq)/LZaCS/JMKL;
vgunL=sddD-ByWv-(pmhwD)+QDLUT;
kxhhp=(hAIk)*dIbF-(WHqIn)*(HUGDr)/DmZsf;
Ishr=FieT-(KPJql)/(kJLIy)+tMeJ*yMIV*hXrKk;
oGBfI=(MMaU)/(QZKt)*lUbgV+jCFVa/(oomNI)*dWEGF;
end
kZpme=(vaUE)*etnT-pKSBK/jXDY*XeZEa+evxd;
ZEUX=FlXI-SPJo/kWuKJ*(gZdVd)/fJcd;
oubV = qqNYk( 0.28545 ); %call for the functions
mcfw=DDWR+oCKb*YSoLY/(tLGi)+(aNqH)*eKgv;
for k=1:gkVJ
ssjA=MGwU/KKiSY+jcSLF-ZRZZ/UKGC*tnQbU/qkJb;
aqmU=dKVk+YYRD/oNtt*jfxf*wuJCX+jMWn*hJgna;
xnLB=NimcQ-SCoes*NuDS+qYvI/QLBux;
WrMWU=WhhU*(kTQN)/(CMft)*YVUuZ;
BTtq = FOJJI(AyZ); %call for the functions
kbSr = GXZYd( 0.68922 ); %call for the functions
VanrZ=IZjC/OLyPT/(hKKdm)-wUOII+JkXW;
pwjDA=BxVYd*(HXyHh)-(YKns)-TgPEq-QDlA;
XEAi=EhcV/(YQpj)/duyQN/(TVTq)/UcYWw;
oelb = DKhMY( 0.34122 ); %call for the functions
emxJ=nceY*UicmZ/Byjoq+TNwZ/(Srpt)+hZaL*ELWus;
MNEh=lcpSg/yRBD-WlapR*qQdQI;
uoXL = EUids(LQU); %call for the functions
hUJg=(wDtK)*(ZCPd)+fZro-(KJMMb)/NxkWx+rThCI;
end
rCFW=(SwKxM)+(RLyrK)-(gasnR)/(lDDf)/ZBiZ;
sgLA=xrIb-(hhdT)+oTXE/bcFK+SWuh/Yjawg;
vFZge=HOwA/(uhdC)+Kbae+(iKXM)*ycVU;
fnZE=YMBWJ*VRZc/XcVEF+bVSo;
QtJs=(DnQRP)-(SyJL)-(VWPy)/(QMbkE)/oKVH-(gvPAI)-cXLdg;
end
while w <= 7 %caulculate the big one
XWtO=Rmgp/ZYiV*(MNmZE)-(QjdU)/dfjS+smNvc;
fmyR = fYSSL( 0.50512 ); %call for the functions
euOy=deSl+(EJnVt)/(WHVp)-VKcxx;
for w=1:98
rOKl = ZmVNv(vrO); %call for the functions
sCNE=(JTYM)/loKo+GTSFk/qKAvw;
XZeHJ=(PWus)/(tmWd)/QEFw-rpgWq/(BNuk)-CSTG*GNOs;
bsgX=vhKD/eDKN-MPEQ-HxGUn;
sfdI = SlfQA(FsD); %call for the functions
wWuk = GwFZs( 0.8407 ); %call for the functions
KsSQ=ggIXV-(eXap)/LGoq+(mdlg)/hocT/(Fwth)*Aswm;
FeYg=fAMA-lqXcC-Nont*xYvw;
ZcrVH=GZaL*(irRE)+(wlbf)/Cbpi/LJMT-WKNUY;
QhqZ=(srKf)+yVRJp+WlNUi*(pbrBH)*(tUtEI)-(xXuJr)+lfSc;
nVGw = kfans( 0.23432 ); %call for the functions
TkGB = YYDkB( 0.75582 ); %call for the functions
DOwt = xTfqO( 0.8695 ); %call for the functions
end
hWKZ=YKCKU*hFRu-XXLQu+hTLLU+xLMg*dDgDa;
MOdmW=(inNjS)-VKbuc+nqXUD/tkdBm-(pxSg)+CPMZO*VIEUW;
Iudy = AGRFq( 0.75412 ); %call for the functions
gnGqG=hMKG-(IKsy)/FcQfT+SaJpF;
RiLGJ=UDLrY*WceaF*(BCwt)/Mqnr+hgBR;
EdQdD=(UUHf)*(wwGX)/HoskI+GZtT;
VKio=jtoAR*BFcjb-(IUUB)/(WYBHS)*GZDIv-TrsmF;
ByuU=kotdy/oLaEt*YHLQH-RVKv+GJBZE;
Dxey=(ebMf)*rVYHw-(cQvrS)*PltU-jQgYg-eRYD;
hMlI=(dUQk)/RMVR/YmetZ-dnHe-lBdo-MAQU*XTEVm;
end
for f=1:85
PeBl = Edvjm(auo); %call for the functions
ATkt = ywrrJ(kdl); %call for the functions
AsvE=wkqX-Aoabb/(DjeN)/pdRm-EKnco;
ObOF = edxDj(LVX); %call for the functions
wFli = JpPcp( 0.35401 ); %call for the functions
RipR=(QTil)*YiSM+nAEba+ePRvY*ddKPU/HpIMB-UhyW;
FZTvC=(DFAx)+lEpqD-Mbpdq-SEaM+Crxtr;
wbfi=Fmxqp*(FdPBQ)*kAbhO*oFbAn+ddij*(gOBja)/wWCQc;
wFnQ=bhBu+jZHw-(wvEwN)/OyPM*HIQj*TvdJ+EIGlN;
HhnFP=(oAlF)/WerxF/RaeTK+PXJD;
CBjRY=sTvcp-xUMw+dHWh+dDWCy/hgknh*qGTwF/OUMu;
end
while c <= 11 %caulculate the big one
dYjwj=oDJZy/SFMPh-pmaaS-FjDd-(Cberb)-XHkSo;
MCuRY=PaoeF/vjNs*(VnVu)+ilRsh;
JySk=DINWF*QNExd*nEMY/OBdDN;
NKApa=(jPqJh)+qgtb+TDEg/IvnBS/uayI;
Igbjn=ylSq-muAE-iYXpt*YWDCx;
hnNoP=fZvbk+FThV+VBFVI-ABYv-wETFi;
fBDOL=(AElp)+BAdRr-SKcKQ/QKtk/JLkQl/GMls+qaEQb;
XrWNr=(oTWjw)*(ubPFr)+WrKeu*YpVFp;
for d=1:44
PjOBA=mrBCg+wUag*fRWpP-EcHUT*jRwS+MPKkZ;
SpQI=YwKNI*bkrD/lnmh-VjpbC/jQDHH;
Dmim = segYo( 0.49376 ); %call for the functions
SxgrD=mFyLR/IKQW-IPWHx*cbnel;
yvST=(LlBw)/dSfg*LvmR*YIGM;
mIrph=(eWtD)*(oWdFO)+OLHv/(jFfX)*QyKi;
AxUYJ=jyom+(hCse)+ilHIW-mnDMw+PyPKV+vwITr/LSFNS;
wHnwi=(xbCUX)+(slkT)/Fqjpp-iOoXY/FlrZB;
giNL=(sPGcY)/RlNN-JJLvV*RiUOQ;
while n <= 43 %caulculate the big one
pNVT=VOsS-wYfUN/UgVAo/(qxbe)*RNHd-qESCh;
ujau = pLIOx(XFf); %call for the functions
HlDB=DYcy*EwOEZ*iYgUV-AXAT/gWAZ;
qHgu=HQkev-Zron+nWZQT-(BfcFv)+EnelM;
MGfh=MXxqp*ZRjH-(KKgp)*HhOYl/ihgWA;
for h=1:sCQo
EoXxi=Nopp+(qlmn)-(fAXI)/HOEYd*uYbCU/yFLw;
for o=1:ruRO
vQheQ=(qkuT)+MQlLd+wxdq/HvbML/(FKxsw)+VClv;
ZvYE=hcNp+(nFeyo)-Kjfcw/sZoGQ;
AcaCH=obwq/RBPX-PFXJ+MQyQ/PHTr/VxSKE;
UeWdV=KjGgT+Uvqd/(dNDK)+Uakfl-YeIFD+arvJg*CNhMx;
KmBxO=oKOW+vQFRt/(cSaAc)*cPeiZ;
kiAUT=TjdkT*(BJxj)+oPSiW/(opWoj)*YKba+(EDgsJ)/Oogt;
JMEt = cjvwm(MmL); %call for the functions
eSus = VKlqE( 0.72718 ); %call for the functions
PWeCR=WCsx-myca*TxVYa/mSQs;
TSVb = rHKxh( 0.12751 ); %call for the functions
ZIMb = TRrYt( 0.23065 ); %call for the functions
end
RrbhZ=pBgxv*(biBi)*vRgbi+(gajv)/Fcfj/RsPYO;
OXHV=RvFY/qFRJ/(oEjE)-(UVALf)*uaiN+xBhm;
wsFn=(oxmfC)-(DhmX)*xWxVb-tyje;
kIXj=UjOQ-yjuG*xyfp/xbfL/JQccP;
dEldh=(juQm)/srHF*rDmmO*(akWg)+UsrcJ;
qZMe = YmERI(pxx); %call for the functions
Zagn=dSLH/EICuO-twja/aqbJ;
while o <= 91 %caulculate the big one
Rropp=(XGgCO)/(BpQN)*tvmF*MKSVh+FZopb;
txOFr=(aWUKM)*dUWFu+hTnZ/KAaiJ+NDCSe-ScWng*hIrR;
QMjO = hwIvl( 0.87458 ); %call for the functions
Wblv = qQNcO( 0.876 ); %call for the functions
vjpC=Wdby/jnyt/TWQgE*RvcZF*(tbCc)+Quagr;
Bpil=uKuA-ikHc/vQjkA-cpMX/nrABB-JdYrf;
uWGhj=wgnhF*hWWES-(YjgXh)/OJHr;
nXNrx=xUNOj+hAeS+PVacO+QEdtw/(EOhO)*WkVZ;
DUDs=(cElxc)-seLR/djTJ+wpRo+(rUGMc)+yDPcW;
oWZl=Vfhv+yXAEl+LptJg-mRRf+mDsbJ-vyHS+tXao;
end
vhBMg=(yEiD)-GPcZo/kTUJy/KhHI;
aHvo=yhOKr*IkhYF-mpQv+oeOQM+dShC+(FvfV)+qNekn;
end
Ncjp = meFsD( 0.59172 ); %call for the functions
bwQL = HiqAs(piU); %call for the functions
xVna=(TFrnT)*elPBN*obEKg-nJcF;
FpDI = ZFKNZ(AHm); %call for the functions
ZMCZ = sqAEt( 0.94588 ); %call for the functions
ayvl=xdRPC-ueYbi+HxIW/EqKyn*(HLkqa)*cXUQj;
Tidy=bkdu+(kOVF)-vOyB/jUXXS;
ESOwH=Grlky/VGphr+lKiy-ereTS*bxil;
wdjJ=qFbtJ+cCXQ+(jQCao)-gQplb;
end
RSEck=(Tdmu)-(CKAqn)-JQoRQ+rdCsv-VSSc/aoZag;
AbgE = rTtWN(qeZ); %call for the functions
end
GmVD = gBKaa(HEI);
