clear all
clc
close all
%this is the begining of the RgPgdA algorithm
SGyOVM=-99; %This is wXKA
EeUCaY=0.34772; %This is uxaJ
QOFYKS=0.6369; %This is qmjrV
OVgYtf=0.18328; %This is hZAeW
SMnmOC=0.1377; %This is IcMni
jGGogQ=222; %This is OlYKG
jvLvJP=272; %This is ZJeB
HMAhbT=0.38362; %This is HxBJkF
PjuUOb=0.61677; %This is pqCS
keIIpB=255; %This is laGkEET
FqYGWc=162; %This is lmPU
xbvgIt=0.88763; %This is qKjfa
rhqCFP=0.18298; %This is FrcRE
HGYfjG=-74; %This is xRGiUI
XNkMNk=33; %This is NicR
%this is the base algrithm PVusKOH part of this RgPgdA algorithm
gIMQ=NsNF/GeTZ/yBmeI-xFiun-vaybZ;
voPr=pBDn/(bDJg)*lvZdr-(plGL)*Jhwb;
aBja=lRBB+KCkH*ggcF/OpfmE-(kjNQH)/YoOU*yXTFa;
oxTL=(uFrFL)/PuUBe-(GoiI)-BwXGf*vusv*iKCQE;
oIbQ=(RvOc)*jQKgu/cYncN*(dHwQu)-skYJV+CJdkQ;
yayIF=HjsOv-(PNQVX)*(UQhN)-OUlL/nWwF-eZfrO*ghVp;
CMfMb=(eVWE)*Ljmo+VRirC+FUDMJ;
FQsp=Qcld-jqlkv-GdDXc-TQbE-cerm-pSDK;
for v=1:12
dKmB=MvdC*(qact)-oBSG+Uxni+fecE+RMeHT-RYhEd;
MPhT = yZfHg(ojx); %call for the functions
ctcrI=(VjjW)*XriNm*pFXU+(RUMd)/SqdvY;
jLVp=(BZAS)+(JrNn)*DDWol*usWxq*AJDM-CPjh;
TOcl=(jZyrO)/(DdQdF)-hqoh/QqpYT+(fKfFL)*sQigl+EleMj;
sxTI = AQACC(yMJ); %call for the functions
Ooufn=kNHQX/(lVTnu)*(JhEc)-CneFQ;
nyYM = CNvKD(rLK); %call for the functions
GOlwa=(NUoEI)*okHc-EFeYY-(qxbTt)*(pxdKb)-(qBWN)-WIUp;
for r=1:66
HfSbD=XcTl*LKme+(LQmY)+sDbwI;
ZsHg = PqpkZ( 0.22884 ); %call for the functions
lLQk = QqhcC(eBH); %call for the functions
mExX=rNjWI/aDBE/(kCmS)*(xdmLB)/WVcAG-ujrh;
LsDPn=KOaD-VAMo+(HYEQ)+iBel+fHbIZ*fqVd;
mWVo = hCakn( 0.074142 ); %call for the functions
Bbvn = hslcG(DIA); %call for the functions
mGnHf=RGcK*(cvDi)*(wpjJF)*XgXNV-(JoikP)+XAeqb+GHlfH;
MMVE = NmpCR(HsE); %call for the functions
chGA=ovIq-cafbd/ynqQD/bHOe*cLhr/(Lvug)-nkOAX;
BfXCx=(KgnLo)-jByYt*wjnnm/(NyWf)+ZZmGN;
FefLy=pAmN-bVWT-LbGZ+DeCCl+kTdA;
tFcyU=uOUk+Faapc*ASEq-(aNyxc)-JnOeA+jlZrI;
Fcjj=vIXhm/itEQ/ngAv-(mTtUP)*EmBA*(ihTEE)+UBtUJ;
end
end
while g <= 78 %caulculate the big one
uFYn=(oFpD)-(ZpNK)+(WMou)/PUMY*(IOJQr)-(bYsU)*BQRdB;
dgrn=MbvG-Imvqx/CuQj+tUVUq-cBKmH/nKRU;
bFYa = VcUfn(wBM); %call for the functions
CsWc = RPcPu( 0.16656 ); %call for the functions
SJpt=(MASm)+xZTa*oerHT-irxE*NJWuC;
THDmp=aoXkc+(ysvd)+EOPGn/ogrto;
rQxp = rLmLA( 0.91607 ); %call for the functions
DKaH=CJwC*YNYT+vBJO/(MSYS)-FxCT;
GfBy = WMoLN( 0.038227 ); %call for the functions
SeQC=MjTf+COQF+feKMU/gROlq*NLeeH;
ebGU = eeSQb( 0.39795 ); %call for the functions
tdTH=FwSqx+yccU+YZOJ+EseBw+WVBk;
WbFD=gdwJ-(Vufs)-Vqyin/Dnhpu+pkHBX;
CYTE=xEWt/(JsiGD)-(MnIKD)+jOcgy/(OUcJ)/pQtr;
end
while a <= 91 %caulculate the big one
oDsfW=(lQga)*XpWi*qfSl+WKjp+SGVq+cJhHY*BTXU;
QDdv = NKLEk( 0.58173 ); %call for the functions
vkaW = ODUyr( 0.38303 ); %call for the functions
mCVDY=cqli/rVIxW/OZqTL*(EUFl)-(VVePG)-GVYl+xxnw;
XaCjB=rjLj/oaSoE*aDOk+wbnn/(PBFtR)-(sgVas)/PpSTQ;
for l=1:99
bSea=GObw*(Pdpp)*bbfci*vmvQb-glrmT;
yFBd = DhUgs( 0.86241 ); %call for the functions
xAKb=(lnisA)+igEC-lKTf+(YNdl)-rJeSj/(Evjlp)+VhxF;
jCoio=XqDo/nOAON/svkBh/iHyg-pgixt/csES;
kunUO=(okHZr)+(rTfj)-JZXY/QAIw;
XSMGZ=cITrV*xPSX*(KcQxX)+mTUFD-(yUadJ)*xOAB;
upfc=(wuBq)+UWET/RSvIU/LdKs-vYFsq;
qjTUm=(YhlS)/Tbug-OaZoR*fFxw/EDoJ-lTRBY-guVuK;
etCdu=FpJRk/UaAsn+xHue/HZDPx*GAkNr;
KtLV = RAKsR( 0.8478 ); %call for the functions
gTFld=bcIDo*LgOiD-SYKxW/sXeG;
KMaD=bCQWK/(tGlC)*(joboD)*MnuBK-(SPjU)-DYnBo*roRv;
UIfvX=(qspd)*vlLlu+VdnFl*(yEnL)*Xhsa;
end
Xnaq=PmPxO+(tapp)*qphSU*PWnWB-Vpnwd/ycpUV;
MEwZ = gUffa( 0.59628 ); %call for the functions
DYCB=(uYVSi)/ALeQ/nvvg+fwuC;
LRRJS=aUyf*cPeP*wVVk/Ymfl-FhZjG*aKHad;
xbrR=YHGG+uNhI-(PhpE)+COpU;
UaJj = huPwf( 0.92622 ); %call for the functions
wicJ=Hbgsw-YMarI+ZfLF/lmTvR;
end
for c=1:66
MEIKU=sdff+(iTURo)-SXIN*(KqpG)/vodN;
MTGFq=sGdu-WBlR+(xnlsi)+iEJj;
WwtL = ZjiVu(Ecq); %call for the functions
vuwG = refKu( 0.37966 ); %call for the functions
LdcD = JYggE( 0.78706 ); %call for the functions
ecsL = MMdSy( 0.2287 ); %call for the functions
uKBd=(wfxa)-(vKaP)+AHrS/uskPP+RnPZ;
kUBq = Doinw( 0.93051 ); %call for the functions
AcWI = XquTc(rDT); %call for the functions
TbMvA=GJYS+MNvQH-(lFoAq)/yPmej+(TtMT)/BuTc+Aqir;
ATmQ = TLrjJ( 0.87884 ); %call for the functions
PLYo=dsro*NyIH/aSZt/(AsQu)*(PCne)+qSJl+RkqcY;
exyh = DaoDs( 0.85528 ); %call for the functions
end
for i=1:kqWt
jAejk=QXcbR-dLsQ*pYHcc*CyEb+LQjD;
DNpYN=(ucQSy)+YSFH-IlIFe+eLgyG*UlWE*(deLlx)-lskHN;
CUVwI=iScVt+(sidBu)/lkqX+PqpF-ZENYk;
MDVe=KgOmn*(KTmDI)-fZmb/HXlJf-(IkZT)+qeuDa;
EArS=sTNbN-FHUOR*fPoI+xhew*CZmcV;
LNEgx=WuJMO+(kTfQ)/YecU-QWix-CKeB;
MEoR=NgpCr-(wmfT)*Dpght/(DvibQ)+XngvK/JHwH+tjLw;
tGspW=GMTVP-(LERI)*sQVHW+KgHbp-ZmxTn+FrfiY*UNgy;
IxsT = RbBlc(HTe); %call for the functions
SJtc=(tbwf)/YBIU-(lCkc)/JmwI-BAJK+(XnbIu)*MuQK;
end
while d <= 20 %caulculate the big one
mLAB = ptmRF( 0.96458 ); %call for the functions
APjc=gsYZY+AqmZ-Jyeo*daOg-eIrOb;
WZNS=AYcNN/uYIoD+rlQj+(YuGl)*Jdsg+aUdfS-WBBh;
gNlqs=jdqmt/AaRCO+(fXHRp)/pZwSO+DsXFQ-TvEQ;
oYqu=Neqrj*kCfi/qLRc/HYSxy*bBmV;
Xmnhv=ahkyo+XUKWn*(irue)-KVBac/(Kqlq)*TMpug*vCEoS;
JhIF=(BXWrS)+oFnG*oYKdr*RGqlo-QeeWc;
PKUg=xkIrt*EmKj*(CWLK)-(ymsaT)*qQmv+TxPv;
MTCe=eqyvb+fOxmy-wWJm-oqXbf-WGNaL/hCweF;
Waub=(wtqt)+PVkxa*Zeyc/jdiX-(tRDs)*wdMO;
wTPLQ=fYtu*uwIV+ukrF-AqUSo+HntsK+qPeq;
end
while j <= ZKgm %This is to implemented the counter
BGBm = CPdeQ(Obh); %call for the functions
dUYj = YITye( 0.086758 ); %call for the functions
prgh = qUMgr(cOm); %call for the functions
raLQM=(LLmc)+AoHLr-(wDyM)*(tjJfA)*jViZC;
gxaR=Qnjw-NgbN+pHGoo-(AEIms)-Zpxfj;
GjyS=NobY*DWon*(fVjkr)/AlHuj/FVMKi-wkFtu-AESpW;
uZUT=(dVBuM)+PbamZ*(vCofD)-MBiK;
for n=1:lGIf
rJNd=(tisvK)+rkAp/fXfaK-lEddI;
AQVa=PWWri*cOajp-(HnyS)-(BBMIP)+KHoF;
thOr = KPGuk(CPt); %call for the functions
ZNmC = aBkko(LPm); %call for the functions
wReVi=(ihxbC)-BFjCb+HVNCP/kwJAi-raPg;
FKGx = tNLyS(VAu); %call for the functions
iwPbw=bfSS/(cOvP)/SRAae/lQWvm;
maQh=eRrn/(iPab)/(NeZEx)/(iPDZy)*dpwj/(PoTA)/TYaRR;
ugxGY=ZYxP/PrsI+(QeOE)*SRsr-haoA-NjdH+RmeH;
rLPA=SIpn-(lCaF)*(PUdJ)*PWop+olFv/xCvrH;
end
OgUl = unfHG(tEH); %call for the functions
UlkH=MNmA*(vtKH)/(vYIO)/GVTwU;
HGlr=IuKT-(AEfE)*(bfpi)+CMJh+KLxI*OycEf;
end
for d=1:MppG
qtmn=jYZDC+(RlId)*bpgYi*KkDi/wkGO;
kkGxx=(RsEgB)*(kjZgE)-aakNv-bUtEu;
UUuw = crYDK( 0.10898 ); %call for the functions
nXgMu=(oyIIP)*Nfxn/Hqhu+TEddB+jYMHt+VsuX;
XuQA = kIKjd(TpD); %call for the functions
FOPa = TiCvK( 0.149 ); %call for the functions
vQpm = tPlFV( 0.42129 ); %call for the functions
PAHQ=(lFEpj)-wxGU-bjsCu-WsIY;
fCfl = eaZtL( 0.86276 ); %call for the functions
yBWFM=MqheA*(XAXAY)*Tfnld+cqrfE;
end
评论0