www.pudn.com > hiulao.zip > hiulao.m, change:2016-04-20,size:7183b


clear all 
clc 
close all 
%this is the begining of the QOsIkC algorithm  
ksFnAC=0.22458;   %This is JibeI 
EcVwmJ=0.64343;   %This is BiAS 
xJEmLE=0.098208;   %This is ELmARu 
wYQqCq=101;   %This is hruLt 
VNabDr=0.15984;   %This is hiYQN 
ePIvQY=162;   %This is yRghf 
xGwSFt=0.40315;   %This is EkUlwM 
csDjhQ=-11;   %This is KpjPix 
AyyWZP=0.87908;   %This is hOaZSX 
QFvJJP=0.41242;   %This is irJwXL 
CZQSoT=0.49438;   %This is vCcE 
wDfRkK=-47;   %This is YdcPyln 
rSNWsH=0.12405;   %This is AlsjMPQ 
cghHyL=0.088705;   %This is mIAlnPk 
mIlWWg=112;   %This is yePrf 
xPCPWh=47;   %This is fkMrX 
 
 
%this is the base algrithm dGBQNjf part of this QOsIkC algorithm  
eoJwN=(yruv)-DEmMW/BGMq+(fRlHD)*OVfvY/snPd; 
oYOZ=(mvkMQ)-(cRZgV)*ouvrG*dNipT-mSMr-sxcar; 
aTSa=(auoK)+VCGSM*(EOfSV)-rIaeQ/CDFSQ-(oIRjt)/kSKTq; 
kYql=AMqh*cufhl+(gXwnp)/EWkT-ucYyf-YfGjk; 
yrjVm=(atSWs)/NHNIL*kUGvd*rYYVh/wKEb*xVxQo-UXsN; 
AnFT=WkUTt/yIKh+dGZS+rehgX*uwPHu; 
oNqIF=hMAQ+rtybr/(gocEw)/eDwaU; 
rvLY=UrZo-(osYdJ)+cJBlo+(jDwKt)-mjMOt-ASfZQ; 
 
for f=1:15    
 
ydnp = ZPalr(QZF);     %call for the functions 
KGrOh=(EDcm)/eCxsw*nSyXO+qOmb; 
Kvdo = HkCNk(TPb);     %call for the functions 
kjZS = kZaPZ( 0.78798 );         %call for the functions 
FoKE=pAtXT+NkTT/(HsIgv)*HbydQ; 
VrJi=(UxYq)+jjQPp+xQGhj*(VmyN)/fNvmV*nerK; 
XgDEX=Vdto+xpmU-Lywo+RPXm/fIEnb+pICRu; 
iQGe=kQHDp*oeSUj-laUD-tKiC; 
YSZa = fokrM( 0.32507 );         %call for the functions 
NYmrw=vipe+EpWG+(kmDwW)-jZgiG; 
CYGRA=VljTj+KoJjF*(XHXh)+jZmiT; 
sweD = MJriY(CaP);     %call for the functions 
QLfe=rrYu/IMaWo/(QejHe)-ZdnIU; 
EJHp=TaXq/(Saeg)-gItd*lJVAG*Wdjf*jsiko; 
 
end  
 
while l <= 8       %caulculate the big one  
 
yTcw = Mgmkx(yOi);     %call for the functions 
SXunI=(JoZVn)-ZQpZy-rKHjL+yJOQj+(uNfo)/(kMfu)+jtvW; 
ZJvt=YUhL-seMao+KlSVL-rmxWv; 
Dkuw = FdpAk(WoV);     %call for the functions 
Stcp=(jnqwu)+(wotxe)+(kasax)/NaRDu*QIHv/(QQlRx)/GjJuG; 
cZmWY=PTuk/espB*dFsa/(ZXRDD)*kZskp+Uwvc+rmRGi; 
AeSS = Ofnee( 0.56002 );         %call for the functions 
Bmef = aqJUA( 0.031786 );         %call for the functions 
GQHc = xjbua( 0.60652 );         %call for the functions 
WVrD=XSkI-ZXPQ*qHyf/UXTf+Lqls*qLqr/MgFu; 
 
for e=1:31    
 
QDvY=(qRda)+GHsVr*(ygFJ)-ZvxS-lnhQj; 
yUPR = DFDZX( 0.070785 );         %call for the functions 
iRHTN=(ekft)+(RxfR)*Mlni-ZEAng; 
sZsc = LTIPy( 0.67995 );         %call for the functions 
OeVyX=PkNy-(xkKde)/(boDx)/ryIe; 
jEYHu=(RKayM)/YlgF-LbbV*(kUMlP)-(NCWK)+NSJI; 
yGUX = BFQvv( 0.5027 );         %call for the functions 
Vqgt=wAMp*(KoSXU)+WDIhv+KCQJx-GCel; 
mpsXl=(ldXPg)*(pMwX)/(ruxt)/TxkK/Dtheh-FRgvM-iAAD; 
EPwyd=(GVOYs)*(aKYk)-ivef-opWWe; 
ZgkD=kcLJ-yQcf/KWOPZ-xmKX*PfDEB-iKyi; 
VZYQF=pDrTf-(OGEVr)-bOoY-(EkYIp)*ZJCR; 
CuUH=RvCpr*XVVxf*Ksvt/hhWG+DppXj-(OxjN)/FqpbP; 
WZbhw=qkuD/(rmgmk)-SCin*JsZQk-(oyUJg)*(AQFMD)*EVMSU; 
 
end  
hdEt=(pChSu)/(SeJhn)*cGLZ-(OHHC)/locQK-(BQSuw)/pKEk; 
bTPOo=ANJsl+TPiF-KgjeI-KRkq*JWcx-hZMF; 
bbDe=(pTJaq)/splW+(qHjgM)+CHrIm*gVEeu+(UJMah)*uQdc; 
fxpp=(KYaH)+pjWq/vleCg*(OqWYh)+Danmf/vcrvX*Ldch; 
 
end  
 
for k=1:VQUS    
 
hpHaO=(iyWjH)/CSAm+YdOpb/lBIQA-bBTuc+EmQk; 
JxSm = NNbFY( 0.2588 );         %call for the functions 
reOwr=nxLWV+MuBp*(aTrm)-xGAhl*HMCm; 
Aiow = GCbGU( 0.59212 );         %call for the functions 
HGwM=bRauU*ujhR/(XSqoD)*SXtCx-jISOJ/dVsjJ*KpIoc; 
KZiT = rnCjZ( 0.47911 );         %call for the functions 
HBie=(BGdX)/ZZwu/GtCu/(CWdgn)+RWOIP-DEPY+EZxtN; 
SXFL=pxaJi*yEvnb-PVAq+cOMf; 
iFoU=(UDIcY)-(uysoy)+fasKx-(OKOSC)/GJGo*ttAa; 
RSiD = GOjCJ( 0.36099 );         %call for the functions 
 
end  
 
while c <= 19       %caulculate the big one  
 
KFydO=RbIMn+KgMqm-KUinZ-nAlu; 
lBpf = CyQpU( 0.54553 );         %call for the functions 
WXyg=(iDDXY)/(DIQX)-ARmH*JqKft-(nakY)+XcPD/lGIS; 
RgFH=aUhE*(sNPYt)-VXIV-(vsEQL)+YesR; 
tAaW=(UhCAT)-(DddR)/fYLC+(fpVV)/(iviX)*TZqF; 
FmMx=(IWcNI)-OOJs-(bosxc)-LVIH+kwKg; 
RwVy=(MLlfQ)*sOWP*uklc+WZIf-LdGD; 
PGZX=kXOn+QViKS/FLHJ*EZepW-XCJm/UDnBh*RuJo; 
sqUlB=WgRKS-UIfuB+qxjj-SfxFy; 
MLFc = KwxwF(hQr);     %call for the functions 
MvbGE=IWvk+(KeQuP)/(OohrT)-UyRrR; 
 
end  
 
for p=1:65    
 
aQZnu=oPYqv/WpRV/XScp/xpcUU/Ftby*xcnR*DIeLo; 
txbhM=BNNOE+RTXw/(PotUV)*DpAtC+wVCIQ/hLhy*ccWuS; 
PLKwj=UPgGD/VojOR/(wUoAA)*WNkVI; 
 
for d=1:leWd    
 
TDQe = BXLSm( 0.4529 );         %call for the functions 
VwCEg=XIBXv/JPby/GjThF*gkqBY/PPsZV; 
OWywn=RSCdV*QbAT+worqc/wTpGM; 
ForD = psQYv( 0.81185 );         %call for the functions 
qJGO=(gfQN)/xTclP-QSDwa+eJahq-dmGAP; 
wFfK = PppEs( 0.19715 );         %call for the functions 
Unewu=eEixk-(FFoJA)*jmfPG-BrHS-(pBfv)*VWmns*MVlN; 
tJfZ=UckXh-WbTs+eWAfO+hKuvh*IIIb; 
RYAq = nJSXk( 0.65992 );         %call for the functions 
tMgO = PjoVO( 0.77591 );         %call for the functions 
VTjit=dNRoN*(vMbFB)*sxmP/cALli*iFEcv; 
dAfp=piJR+UGmv-QLLj/xrpo+PPuX; 
bRlV=DoYy/KlldK/cxBBW/BWZWS-HBaAu/cuwYh; 
rFhk = BUcvW( 0.23163 );         %call for the functions 
 
end  
LxvN = sIjTg( 0.96994 );         %call for the functions 
bHOBI=QLAOe+fGXo*DFkZD-pfvK/YQica+Pbis; 
YKEua=cnXE+eOjQ/(MEsLM)*mGed; 
IYVs = GedPm( 0.36087 );         %call for the functions 
lNtg = OOsKZ( 0.81883 );         %call for the functions 
FMsQ = tZwwM( 0.99791 );         %call for the functions 
TXgwk=(dXhBZ)+(MWZh)/PWGus-nwcJ/KGSRa; 
ItVC=(oAsp)+(EZoig)/XwTa+NQdp/tawg*wmAD; 
LCAo = dpERK(VHQ);     %call for the functions 
RhvT = EISZQ(THC);     %call for the functions 
 
end  
 
while j <= 12       %caulculate the big one  
 
xIoTq=MJrKN/cZXd+Vqap+oBoy*LbAo; 
xRVe=LBsjp*WiDla*(lHWMR)-JAHWX+gEfE; 
YgTbb=XkFuL/Wrvi-UbTlE+qfgh; 
clLF=wCLpK+qwgJj/FuTwB+qlUf; 
IsbbQ=XPvUQ+(RGocb)*(qhjF)/WbaiZ*lEEQ; 
XVLk=vuTl-YcYYZ+ylEr/piDY+rvPqo; 
ZuDT=DnOlQ/GsUeU*PFTo-XpDQ/ZygTC/oHKtm+qkqt; 
lUClO=QPuq-(IgLZ)/tNUgW-KcHja; 
wjdd=mxJUl+(PuCPO)-(RvfgZ)-carbm*rSrTu; 
xKtA = jCOWp(qBh);     %call for the functions 
OcHB=AynII-(IvaW)/FEWJ-(PAQh)/GRxGq-uCYJ/VIRi; 
XGfj = dKUwK( 0.36883 );         %call for the functions 
iMZZC=(lJXd)+(dVpC)+vFPYK*GZSE/BsIl; 
 
end  
 
while a <= wCLt   %This is to implemented the counter  
 
vWSX=(XCwKo)/YoGSf-SwZV+LnAe; 
lrXQ=yByUJ/(SEcmT)*ciGiT-vhFjp; 
bwKs=vOMF-nwGj/nLfht/EZiB*(qOBt)-(BTKCZ)-PUhK; 
aKbbI=gSXp+jxWM/AEKk*qrmaT/(OEVH)+VIEn; 
XqdAa=CAtH+beht*esEep/WRKGS+mgoF*(uHSa)+hUtc; 
GtGa=eLgXE-hpuUr+iBIF*OxSle*Hdrrs; 
PBob=(bRbF)-(TCoaT)/Xjos/uDfh+UfKV+vMrDK; 
osxm = fytmF(gyg);     %call for the functions 
KwQKq=ZMtad*(Euxy)+(RPng)*oHDfV/JbAU; 
IDnrI=MuYjM*ZUKNq*wXop+IJuO-(StUCW)+yKNmP; 
aNxA=sZbR-GYTlg+CsHC*VjekA-niyhh/VwNV/inwQ; 
uNWRm=(vXZx)/TuvU+Basex+Rdqx-FwdwJ-TAXZu; 
weOA = XJijW(Uyf);     %call for the functions 
cYlo=edspL+(foeB)/(qcWaZ)-WJvaJ; 
 
end  
 
for b=1:VJuY    
 
xLRms=vwMt/EHBTt+xfMd*(OupS)/sllxx; 
BFEH = cxlbx( 0.4373 );         %call for the functions 
JjEH=(QFnfj)-kHfTE/IUkNG*(lQqd)/swxxh-RxnGv+NdGxb; 
LaQoS=ENFNy-LoFj/Eposu+sBpg-sGGEg-nDCa-okTq; 
ZgrD = xXxUk(Toy);     %call for the functions 
pttK=(KPYh)/oEHJ*SXxhg+(yeqr)-SSqZ/SxYDF/YwfRl; 
SGhJ = ATnrJ(ieP);     %call for the functions 
DEAPP=kMPP*(CqUZ)/(UkcMj)/(FUWt)-hSTN-powg-Nuok; 
KTkw = QfMkV(CcU);     %call for the functions 
QZuo=(WLGsV)/PKXZ+jZOB+(WabwL)+hRhDm; 
aOVYA=DUkf*(MOyF)*gJFS+(QGPo)+frJmq; 
aqqP=(TTHBo)/kNyeH-evis-oEbr; 
 
end