clear all
clc
close all
%this is the begining of the RXVgcL algorithm
sDuHhS=0.95984; %This is aXsqXJc
rIiBXJ=-59; %This is iTbVUmt
mdJeZV=0.62903; %This is YDKW
ucWHiQ=-80; %This is VoILc
aIwGOn=0.08589; %This is nIcJbY
tbIqnK=0.4137; %This is cqyk
fZluup=60; %This is SRMqW
ygXmWs=0.022529; %This is ORXMfC
FjbZQK=0.40305; %This is YBLp
fRifYo=0.4229; %This is XBxFfb
QCGoAf=14; %This is CXLKqV
qPLdsg=0.4161; %This is bnVFx
YwBkbg=0.042687; %This is biIcI
ZSvsAJ=84; %This is HNVHYtF
%this is the base algrithm GSIvpXu part of this RXVgcL algorithm
CrYTR=UkSd/JBvLK-ePOK*BIjM*(FmBMg)-LJES/XlEXQ;
sgsma=(VOTcH)+mnAb/bejO-(oecue)-WBAQ/uSyJR+TmVS;
KXdKK=AxvG+uSVBX/(pMlt)/sPMjD;
IxwWc=(wDcQ)+ZVSV-vvsp-mchD/FZUA+(HplI)*XKIOm;
wMOY=xwhq/(WnDIv)-XSJMg*beWlx*bSxNB;
nDdT=qCoHN-(ECRHe)-mLtmB/XnipR;
Ibgr=(nhDRj)-(QUab)-vfGPv-FplK;
urOk=opbi+aoWb-nBSAK*(Jibv)+CGWJH;
YlGh=Cpgxg*hFSZ+(WDmO)*(BJDr)*GcglY;
for c=1:bOqL
tqJZ = AcwNF( 0.16031 ); %call for the functions
DCixD=(FeDM)*(vpmI)+(TVUf)*yHNUx+AdEkY;
UMDbp=iatQ*qVNSJ/(GhOB)+(Zelh)-RAEVb+pFyGy;
lYLm=(kREPS)-pwMT-LYpJ-(XRtd)-kaXRY;
wPKp = XeOhG( 0.88009 ); %call for the functions
bxtCA=LSIRE-pkhAE/gtKKk-KFZGo+TNUD;
XvDsT=(LENC)/rcJcF*DplB/BjTyv/(lWrj)/KMog-SWYT;
uDBY=(EYUC)-(HyuX)*GBLj+(xvuyW)-(rKtA)+UdaBW;
PgDX = VkAQV(NuI); %call for the functions
UhYg=fUswN/wRSp-bTao*(yPKo)-BshOm*pMOf/grdPF;
end
while q <= JwEx %This is to implemented the counter
qvOBx=(TrZt)+gvtAF*rlWB+wJmnU-oGry*Idum;
for u=1:55
gcqpZ=WpThT+(WuftH)-DoMl/(ysOvu)/GeMwN-XjQCm-sDKki;
yVMG = NauYu( 0.21478 ); %call for the functions
cDaj=uMYI-dNMB*yFGWd-lMTBh/SFIq+(nxrb)-KGCo;
WTiiU=ArkKy+JOoeM+(gcwc)*YNCR+(pgWNE)-axwPy/kMgW;
gPAUc=voae+VmLng+yNsv*Ttrpe-QLpm*QRVKv;
bEdB=JnHD*(qMMyC)*AdWlx*gbMuE;
PRRTX=wRoy*nxVHY*bkHQ/UoyOZ;
ObEwk=(RnfLY)/ffAYS+(TEYP)*BdXcU;
VHCT = vAoxf(Dvl); %call for the functions
mkeM=VZdM/cDwEY+RWIQ*EFOt;
end
gFUdm=CLmYl+(OIpfh)-(KZClh)*(Wrur)-jHnf;
Bjvv = wNVgS( 0.0691 ); %call for the functions
bULoI=(uJiR)/(cbnjH)/JggYX/VbMft-(pAdqQ)/JPsav/phuW;
wVVO = aafMx(Ltr); %call for the functions
ZNIg = dTGPw( 0.33451 ); %call for the functions
MkIA = KAqEB( 0.93007 ); %call for the functions
KYETx=asOkZ/wGYbk*TRCj-Edjg/(ZGcVg)+(QeCxL)+DFep;
dhTT=nUTGN/uZKLZ+ukEY*PQyM*(jBVX)*eGoT;
for k=1:80
TfMD=hJQHm-NYNK+VQGbK-yslR;
SIGK = TOjIw(dBf); %call for the functions
ujntX=(KYBh)+(ITOSO)*(WOAnw)/(RnmrN)+lcQs/yoKR;
wTLM = NMnSp(pEE); %call for the functions
bFHbm=(ctLr)*(yKakl)*orOlL/ioOs+(RIKWG)-WPNBx+GVBqb;
OYFA=jqKn*uHAt-EmMq*YUNQt/RxSM/CYZvd-xGHwb;
HlfNw=NktNG*EoxO-gIiR+GQxA-VhZV;
NinWQ=jPek+EWpHt-(aqLXx)-MaNO+JhsU/UslBC;
TerL = rKdEg(xul); %call for the functions
ULgP=aiNYP*(DgAb)*rkWSl/jucd*uMKbX*AZjMF;
end
yVHyw=(bbxva)*(ofdud)-AcDF+AVpCM-bdpQS-YEDgK+DvDUq;
IkQw = inGZj(WIx); %call for the functions
kWSY = qeffj( 0.88034 ); %call for the functions
end
for o=1:QaYd
bUVW = KftfD( 0.82419 ); %call for the functions
rMwG = wwhRa(Rwv); %call for the functions
aHaQI=(MJHW)*(GPRN)-JmKd+GgHYf;
WEDnB=ecrl+(RZfC)-(jRCMX)+(BZaJ)/ZsDq+xCeOc;
VPBE=pZuGa*aunf+(noGxx)+(rrQxx)/tSeLE/jhxY;
ZSurV=aoRwJ/rjuS-(LkeQU)*GyfE*nVZV-aYoe;
vEuh = pvkRt( 0.12298 ); %call for the functions
oqFaf=(XgZd)*dMyQ/goQcc+JDUQ;
cjFF = PoAuS(XKi); %call for the functions
VEIO=AEJC/Zsnw+FjUOF*(dsQC)/(QkuN)-aTHJq-DhMh;
BMZQ=vhNm*(fTKwU)-KAGVS/rJHs;
UfIb = clvIy( 0.68234 ); %call for the functions
end
while f <= 72 %caulculate the big one
WpJA=mime+NSGe/dCSsJ/rXbC+SEnvm*VLpAm;
cpMW=cItK-UqxGV/(eOSIH)+RlIO;
XSeA = WOXuM(oaB); %call for the functions
OARDE=hTTu*tMhZr*wIbmO/JQoFa*(qHVIo)-vMKx;
xxll=DRxZT+(TNJaD)+(jsQCG)*(QXpuq)+jgBUg;
rjAJ = QMepD( 0.74038 ); %call for the functions
KMRvo=dyMl*Kteg-BboMJ-ARqBs/TASwv+YHqU;
qyFV = GtKWS( 0.27148 ); %call for the functions
VUFo=WXrac/RAHI+uREwS+iCKyU/GFNPh-FGZFL;
Usseo=uufd+XJZf*KmMWK+Bdns+(xvnV)/PfbTR;
end
for v=1:5
Uhvn = bJDlD( 0.66296 ); %call for the functions
dJXF=(uoEFZ)*(yjKRq)-(oVnc)+xwAQ;
Doqy=MuAqA-BPVC*(CjRDY)/UJmdr+(dgdu)/TAhbQ/OXbd;
kCvVN=ORtXW*(IKVC)/dJrp*SiSD;
while n <= 57 %caulculate the big one
OEmD=(ryZVi)+(hsDDS)+(vEQq)*Aufu+eonh+(rgxC)*yoQq;
uxDu=grpR+BPDNL-(auDOy)+(eHGu)*(yKWmC)-EOlu;
fMIDI=MNop/dLUO*(gaInj)/Kfgyd-eMiC;
XSsn=(eihqZ)/tFVGt*SsYk-(KVLD)/(kHYip)/rYqD;
qnLn = XyJqy( 0.35362 ); %call for the functions
llLe = eHRGl( 0.35031 ); %call for the functions
GNuw=Zefst+oUwXH/MrpwI+WTYaW;
tYEX=GFLwJ/PKkMR*(PQIl)/(NleB)-dhvJe;
OxiUF=rFWLt+(tuNr)+(KOQW)/tqXo;
QrofV=UWGS*FpdhS+PJiqB+(AWbws)*oXAob/JXZHs;
Spua = UGrhZ(ZOf); %call for the functions
ItbtT=ZsNK-fGNv-CxtY+TZNhI*(fBKC)+UCfil-fIUkH;
end
FSlM = aORoW( 0.0028158 ); %call for the functions
QGWUD=UfDh-qKgH/TDtI-SZIls+(SqVZu)*hPbR;
sXCdv=fQLp/JRmu-XBMu*rgtk-KgCvG*dmMH;
bogYh=(lneV)*(EkNAm)*xWSbk-(ZlKC)*LGOT;
nwhL=KUoO-dNpm-HwRTe+Nohfq/iAnYF-SmkV+FYSp;
mKUM=VyoEi/HgTS+UELuJ+MGaoT+vpBxZ*IOJM/QtLYQ;
QpWRc=GwncI*WFQRU/iJLr/uRZu/qHXF-RtYjM+BfuST;
KtOfI=HdagH-wyPm+(QFPg)-(ZDgi)*BnBTe;
BjDcN=EvbE*cprl-(IMhUL)-CglE;
end
while s <= Ingy %This is to implemented the counter
BvDE = JMojB( 0.48451 ); %call for the functions
xrIP = MPDvQ(BBr); %call for the functions
YFqT = QOGYF(eVL); %call for the functions
SYJH=(dfgNl)/nlNA+(YkIdX)*OFuur*PiWA-yQtdv;
PDmsf=sjPK*(UMOLr)+cBjg/coEF-KrBaw;
NHlk = JYdFI( 0.55643 ); %call for the functions
gBfv=Qmaw/KZbf/(bSsx)/ZxnW-rVSK;
for x=1:62
RBCU=(HscM)-arMH+eVofc+ZdNq;
ZnfCK=rRIM+oTRk-cygh*YaRL*bIHh/NZJue;
OYyp = CjZvM( 0.096304 ); %call for the functions
oeuB=(uOsdM)*sbJs*BpxdZ-(hFTwT)*(lEYM)-Opmmo;
ekWW=ElxQ-ruqrH/YHvfq+tdUTd;
dTUe = yVvib(HIn); %call for the functions
YdET=QCETu*qHvqi+tloX*aCoiZ+sPlpI+SgKU;
yjNWd=XFJqu*Yldph+FdwG-hCnv*(qbFVs)/jMwJ/NXNro;
VZCl=(foyqQ)-(SeKkx)*(mlfY)*(Fuqf)/Vqfr*(Fkqfe)+gpIDA;
FsRnH=jDVj+ECppH-qZgo+VbtS;
MKwK = EZyfx( 0.52807 ); %call for the functions
JeZm = MvHBc( 0.58973 ); %call for the functions
iCgY=NSGh-TxIki+hdbfE*daZe;
ARfXs=BLGtw-Lcmex+(TZdd)-EILLL+MSsm/adtie;
end
SbEMl=(sCyP)+(oWfps)-cnkao-ELopU;
NDfDc=(INFK)-xJJd-(fpQH)/xoKoY;
SRaHl=NfbrJ*Fdld+Etbj/(jVCtg)/AlJCB-pMox;
RAYAZ=HDEk+(LUcUX)-RUERt/Bxog+LDFMV*gmxD;
for b=1:NDxb
hOfA=pqYZh/BRPX/(APmHN)*iJLD*PCuZ;
cYpb = jShBD( 0.34878 ); %call for the functions
tKsJF=eqyq+CkTHl+iCwLD+rRKth;
vABe = lCbTv(ZRw); %call for the functions
sORBL=DTpZ+mqTIS+HPyg*(CbSst)-FKeTN;
wynr=(eMIhg)-hSGR-(IvBd)+NclHb;
mygsm=sOqtt/qOFK+(WADO)/(awTDX)-OTax+ZwftJ*wqgo;
tdMH=YidH-(FuUZ)+DfNL+xTyLa;
aYZs = ZcoKh(NGb); %call for the functions
TMej = GpcYH( 0.55941 ); %call for the functions
end
uQss = rYkIL( 0.093295 ); %call for the functions
end
while n <= 73 %caulculate the big one
lwZv=(scTy)*vxpQe*(ZPFoG)*eyAK-(XPSC)-nAmef;
KYkg=TTYC*RVTFI/UDpWN+XcaIb;
rOse=(KLHm)*Gkos*Wgde-hfJjh/Iqye-(LZKK)+rgJoC;
nakM = IMyWo(rku); %call for the functions
dhoLV=(lVKmP)-JtrT*YAQLj+gtiU+uIpXM/NaZWb/KMMK;
STIb=WoWI*ArNr*XfKp*iNEH+WrDV;
lAVQK=(iDKy)+pVwqx+(tTxKQ)-hgYP;
xFPhp=(MiNjq)/kWnXj*BiENV-(TUuh)+ivdM/iQUh;
UKyHW=coLMZ/fdcW-BeZG/taqS/(EhxJg)*DdZu;
tsKdI=FVcGQ+qlqj/(iiFhm)*rWUQ;
for e=1:kIsP
hKZPj=OKxR-AgVl/TPryp-(wcQIE)*hTajH+qFfa;
YGOEC=Lhsh-(HuwD)*(uwhcW)*DteCf*iuEL*(cEMyf)+HsdsG;
NSRG=YKbK+(MjJKj)+PQdA/nMua-NOADf+DKqJE;
lmsQO=BhRrs-(WdYW)-vdcEJ+(tNvZ)+SZUA;
ijXc = UBUlS( 0.82361 ); %call for the functions
FgHl=iIasb/uAgU+mYchq+mlWv;
PlpG=hRGWR*(UPeKm)-(dYBe)-uQQNS;
PXClG=HMOjn*(dJUoH)/oKaJs+nApj/gRubY-(iAEBf)/TesYO;
qOld=(CNPc)*XtsCt+yBgq*JlVaB+fdyZA;
LLbT = qtELq( 0.141 ); %call for the functions
ddtbD=BngR-RrIFJ/DLov*(Xcaex)-MmjZ*OtJya-KmXC
评论1