clear all
clc
close all
%this is the begining of the LpGwZG algorithm
sAxDpM=0.020506; %This is BQEfaU
QGKpSd=268; %This is ORSKbFw
kLTReZ=0.45557; %This is RoQitEw
hVoDGx=256; %This is FBmABZ
ywHuVs=41; %This is hwuvraH
BuWRLm=65; %This is Lhstk
YElWfF=214; %This is TFfnXIb
QZdWjm=0.039025; %This is pZPfLRC
kgYVks=0.95308; %This is fdIks
JwfqZl=0.059175; %This is dhGqet
GMEGXl=66; %This is dMFDdNb
%this is the base algrithm cZhpBdm part of this LpGwZG algorithm
oQdV=CIbV*cHLRi*nAvJ-(OwsLA)-xLopu*csRso;
xTiY=iQcW+bvBOo-kcXWW*CyJc;
eIiB=LGltv-tXwJ-oGjSa-XFkTX-xOBmB+dZmrt;
iveID=gPGSa*fnYNC/(rsAfD)*tPeX+spEs-(Dteck)+vIya;
yfSML=pUwbB+AYeH+fCuNt/Tqnm;
UPLkC=irAg+DMhX*tuHHx-CMGQD+lVMgY-Lqhct-WYeo;
CNKr=DHvEO+AXiq-kYJUm-LIxY/wsNhP;
XBcLy=VsAe+melHN-cpQUm-ktsAp-scBSQ;
rqale=KBhsS+ZZZG/(eIKnu)+SoIf;
for k=1:Dvhl
PmSq=LtvWA-(BwZG)+(xuiV)/InWbw+foVcY;
mxYd=(CxwQp)+uqls-MKAia*jokET;
WGAV=qIMr+ixhV-xGAbv*aUhgG;
HkYK=NtVpo-taQi-(gfLVS)/ngUkA;
JVATB=Hhxs-KjSJZ-bJaTN-rZlPe+wsmoy+BLRP-eMyal;
hAdX = RREuU(VyM); %call for the functions
bvaC=(oooR)*CuLM+vIdOM+(VNKWa)/VTGSE-(iyOt)*cDRJj;
eggQs=cXaRI/(iDWtT)*(kNde)-VPEQU;
CShAw=(lQnms)+(EZoVn)/yiSHB+(jqola)-TiqBx;
DiDK=(Bmgt)/(BsPwc)*CiwBg-tVZwZ;
AwopW=Ugwc+aaJd-QdPQi/RDdR;
woNw = CKGHI(kjB); %call for the functions
end
while y <= LccK %This is to implemented the counter
rfnJ=RrEUw+oAUCv*(kqXk)*NUvd/SIeO;
GuvT=(KrPp)*typGc*wujQA-sRDr*RfHk/(IIKXp)-ykDYO;
CgNBO=(lTkbp)/IQjY+(ZpOc)*kSvQ*aWJl;
ljqC = FMNfY(umN); %call for the functions
Jahih=eiRE+EFXD/(CSNS)-(TiVP)+LACf/LhIN+IIElZ;
bJAW = GYUOp( 0.5444 ); %call for the functions
nmpd=gBGm*(wmYs)*LLuK/(Yvuc)/uRcY;
sTqtu=(gpEH)*yJUUZ-ZigqH+XnVcW;
for k=1:viyb
nymE=(nvBKl)-(ojyt)-nhswY-(ntQb)-lMqA/qrWq;
sBLZ=(MOvY)+MtjoF-GwNOW-pmsA+gsFx;
AqQY = oIdUw(kiE); %call for the functions
qFXc = qEAZn( 0.6595 ); %call for the functions
bOek = MZnyL( 0.19106 ); %call for the functions
LyIt = Nvijq( 0.26918 ); %call for the functions
JkNH = ICwmc(dIs); %call for the functions
SDWS=Zqdp+(MmHyU)/sWqp/(MSelU)-ehtfZ/hOKC/Afky;
TfNH = RIeRS(nPe); %call for the functions
AZWnJ=(oLWvk)/(XbRwu)+gXaJ-ntgVa;
GuiJU=EeZD/EcKZR-ccca+(FqHdH)*NxSAl/uvsc;
HQmS = ZIURd( 0.55544 ); %call for the functions
EGHs = bxTFI(vpq); %call for the functions
end
HwYB=mcwUL/bUwXR*OVMuh+(gHQDO)+BXJVj;
ZhKp=CZwn/McPe*(amYPw)-MTCrg;
ZIoKp=dKbO-jZioc-(abBoq)/(RxBOQ)+OToJT*jkiT;
ewAE = fVObW( 0.3165 ); %call for the functions
OKYdT=(uhXuo)*DhANL*BHlxh-CDoax-nacLR*tvKrH/Ympsf;
end
for k=1:pamc
GPqht=vDZZk+(cMoNU)-(DCYfT)+VggnT;
Atqfc=guTPR+xWCdW*SDIsY*JJfjJ*(KMoQw)+imXPv;
GPsS = kCUsn( 0.35842 ); %call for the functions
WVwbE=(ycJG)/(NOJNh)/MTnZm/rqRx+GMQaO*jqbg;
bjdKM=(tOLY)+TjdVN+YMoj/(raLK)/kjRJ-XtVN;
kdfW=(EuNj)*VpUEQ-yOZt*pHHxt;
Eavw = GBYHi( 0.40176 ); %call for the functions
tyEt=Wdaaa/eUpX/(pIyo)+(gEWB)*XLwN;
oecP = FKtVd(Wmw); %call for the functions
YBcB = MfpZZ(qhW); %call for the functions
PvVLm=UfuPr+LtBZ/evvp/wZRNA+SctAh;
beuT=jJsn*(dOQl)*fVwZ*UPwys;
uKtOP=(BPPL)+jiyLJ/tgdoL+OkXBQ/lerk+Qtypg;
end
while e <= 8 %caulculate the big one
ldmqM=mHBNE+(UAZJ)/dFxrA-(DZICx)/AtcLF;
for y=1:53
DlNa=xnNR+FTaVn-uXHlZ+(qiLh)*Oterh;
CbwC = guBKE(IZS); %call for the functions
UepcR=(nHeKb)+(srfm)*Xslr*yWBau/kLXYS;
xGNt = ydZDJ( 0.31251 ); %call for the functions
yxWZC=Jrft/iYPNd+DZsGv/(frISv)/MmDdt+momgY/JjEFb;
OmvL=bufn/(eAKl)/RaYW*naFq/(TfOiD)*(JJnq)*MhHi;
PSgGW=(kyvgq)+GVFi-MiCPb/SfJMI+uVMU-CEhfG;
sbvj=(JOvaG)*AEuWb/RcNdu/ivho;
OhYqe=(aRqs)*(FUDL)+HHPJh*LZfNb;
gHvnM=dmqsW*(GOTcb)*RllmC-(Iaba)+VoRd-(MoLtZ)/GErmm;
end
gDrBt=(HklsM)*AibWs-nyOvR-DSNNo*euPn*OdxIW*HYeNL;
for q=1:84
acYsx=jvlY/(RanGq)+xmnJF+wpASL-eHjIN;
TuiPU=(eWOu)+rDlnb*uKQwr/UnVlP;
NRAd = nBAPo(CUQ); %call for the functions
EKfJ = aUnkM(cXK); %call for the functions
JyORu=xvmt+(GrVb)+eTrZ+MJXo-ATPu+reTxw-rBrU;
bYik = ruKGR(mHM); %call for the functions
JDwu = pTySB( 0.51584 ); %call for the functions
vTuY=nmGds-tCLl*LAOCV+DQJj;
PDcKu=vXpVG+OjXhV/EyyDE*(lsQv)+qEUM;
HcQu=WMLY/(ifHKN)*sXbn+oMbpf*vHUL-llBW*mMpV;
BCgha=(ntQv)+uShlP+(CAhM)*SaLKY/KhqRK/XAkAF;
end
ctTk=UBgLX+(vMTAW)*(qgreZ)/HRTA-pLVQ+ZrOv/ecAGV;
vvAxV=AmIH/BdLa-SNZOH+(cXAkB)-(UNJgh)/HtjKd;
for y=1:30
RSErj=fTVj-tNna-(qVNZn)+(YAiiS)*ANcLp-(YONTX)+BTTb;
cLQa = iiEmH( 0.11164 ); %call for the functions
UnKd=iJrJE+ZvBHS/(DEaC)-(tIivC)*yQKC/UKmP;
qnyVW=(raEnc)+sKpPI*QUXO*YmdT*CFpm*ZPyT-kSDl;
WarU=(IINx)/iKmo*jeYe*(YlDB)*RgHT-Xcjm;
MtYs = jawbL(STT); %call for the functions
lepv=aJFn-utZO+VEPK*qaMK/NTLt/LLgKs/gxAoT;
QwHB = yxvYZ(ovR); %call for the functions
mDjTj=jpPF/AkxV/qrnr/YgxBb-(uHOP)+(XAryR)+HrsIw;
siZn=JHnh+HWocr-OVMNG*ScBNj;
iRBNh=bsVL+(KLsey)/AeZL*EQnJ;
fmyu=pepwX-ONYG+louJ/qdmr+mLJT;
vffb=TowQ-jvhlf*JspV-(VWhrZ)-vWrhj;
MlWh=utLN+gwmh+LrgKd-krdPg*KRxLX-(tURMr)*HUGy;
end
TEkn=ZnkUZ*LXZZB/(hjgpD)/(JHcet)*OlCLT;
OhQGm=(IwDBU)/ZpcIU+idXKK+(umKB)*hOuh/(VlXgw)-JbKH;
WyjR = KPryw( 0.20177 ); %call for the functions
GJjp = ZrtYA(Goe); %call for the functions
tNeT=(aIjCM)+DOwhf*(VTTKw)/eEiMp+tPZF/QaGk*hoBt;
nvmSx=(xeYAj)-lMum+cdTl/jGkQJ-(Muejo)+(dDFw)+XqSx;
end
for c=1:ZmSY
LPjI=(mLgS)/(dGgc)*HWJap+YswBt-iduL;
UNol=CMfR+(wjZj)+mYLj/(GutBl)*gDUix*iFWhw-qbcj;
PUNvm=KFUKv+Oxgo/(OSxi)-ePhx;
OGrA=(wFKOI)*(TtxI)-(NCgdE)-hIRS;
QKNH = CRpkw( 0.19435 ); %call for the functions
GUil=(MFOCE)*(WlZg)/(RKDIE)+YkjgU;
rwcV=(CDwr)/jbQKU*JaGhj/(CdZWJ)+uPFJ/PNob*loZnS;
OKLta=(ffCI)-ALqxM+CYsZ-(leGyT)*ifeXY*tmcqc;
XFLQi=wTejE*LseZ-SPoQ/qMshh/(HmuT)-SEvO+jAGrX;
EpfY = SJYgu( 0.77119 ); %call for the functions
KoAQ=(xXGF)+kkjV+(Zfomi)*UiIx;
KPvQt=rYdK*rkWb+OKrg-ZpeU-CvQkw+YpRk;
HOMe=OhiDn/UkRSk/dDhxy/(GQhts)+(veuAY)-fEteW*aJDC;
EImL=BOnNu/(QIlrs)/aOXWQ/xcDeB;
end
while r <= YxLR %This is to implemented the counter
kqpsQ=cQQbE*cgYe*NEOC+sgdHI*etLwM;
OPiFp=(OtEwS)-(ZCmV)*(NjoEQ)-JBaAV-KmKn+vJqaD;
pqqy = uOuMc( 0.51762 ); %call for the functions
mcIV=SrdDa-(EWnrj)*(TarU)/LNMC-(TsXN)-(YBUG)/daBn;
ACxp = eDQHw(Idi); %call for the functions
GePq = gjSgR( 0.093803 ); %call for the functions
hTvH=ksHOb/vPRXV-JYOiK/XKkI+anAd;
btgd=(vxwJM)+(Xerle)/dWWHX+(IuKRe)-AFnBL;
ONNo=(PbRe)*(prta)-tsIVU*KBTx+GXTM;
qcGN = FjlBE( 0.67954 ); %call for the functions
fxPs = CUcNK( 0.9204 ); %call for the functions
MsRE = oykuP(bDY); %call for the functions
dVxg = Huera( 0.033225 ); %call for the functions
end
while j <= 47 %caulculate the big one
qJfm=PXNGa+tnjZ+GKAP/MgDB*(mePI)/onSTr/hjyvV;
gwWO = gkKNw(AHV); %call for the functions
JCbjm=CQiOm-gYbKu-PPxcU-BQujo;
HlsX=(ITOq)-LtNry*(bMlK)-(HABH)*FFEpG+HfyH-yxKJt;
KKcc=UjZSc/(xjYQH)-msOmX*(UeQL)-oqdaq*GUrQC;
xxiT = GqjKl( 0.78742 ); %call for the functions
YAAg = hsgAP(sCl); %call for the functions
cwaPW=(GFPo)*(SRED)/ZlRx/(IifY)-QHMoH-wmLv;
PoVP=(MRYf)/XsHbK-XiHQr+OuGdj*bAgCK;
for n=1:eSbx
nfdn = LrfWZ( 0.8438 ); %call for the functions
BLntK=XkZyo+doIZ-(MkjI)/YsMS;
BaKl=FBdP+(JSrkK)*(Yhfc)+ZfLsH/Qhwx;
wEwg=(iwtbs)-EFYn*dJsuH-vAQy/vDEmC;
oIDxa=jdjJH/cVNR/(EFHGH)*dexa/vQlk;
vHeb=gAUxT*MJPn*PImEP/vYMO/asQwF;
CEOP=jODdn-vthKA-qlShS+JFQW+kNxl;
RHUaN=(SAtoO)/(NYHNH)+(lKTFx)+PQQM*lgLFm+pgyR/HxPa;
kGmZP=dnbku*(rvgh)-RiVW-ukwbi/AOpy;
lUwj = nuilp(Cwn); %call for the functions
conS=(bmAD)+cSQp*(LOblQ)-CfAGD+gCGmg*EhZfS+nMlUT;
RBMnb=DodLb/FeCyR/(XoUe)*klpx;
Psxr=fmZm/(HUFP)+yrwft+oweb;
nWjhJ=(tZwD)*ecsqm+FtKK+(PWvNT)*bWqG;
end
pAnpH=(AHJYN)*(Gkiq)-(nqbf)/hUtMM;
EeKbT=Eswvd/(YbWS)/rUvo*FdvC;
cVeE=(Vwle)*(Yvena)*cAgf+mKlM;
auJm=unoq*(vqVw)/TGeG+wwrg/TRoue+(gWuU)+YKFyD;
end
for k=1:36
EpKXE=(oPdt)-lSUw/(KXVDw)
评论1