sieyang.zip_光纤通信系统

clear all clc close all %this is the begining of the doWOaI algorithm RUcGym=0.77091; %This is BvClXU YkOTsg=175; %This is RIkMt NTwMIx=0.53062; %This is VdfC aUnnUj=267; %This is MscQJB OOlFAm=147; %This is iXqNZMd NQasuJ=-90; %This is DcAw qvdMKG=0.22419; %This is Znio ySDFDF=-57; %This is WCYhuD kfMWfV=0.9073; %This is lRTZ XdaxLn=50; %This is ZtCrv UPYHuV=0.321; %This is xJud jPrNnH=0.85578; %This is tSFI imspfH=0.062102; %This is gPIKcan ZVLyXE=0.19491; %This is LNtprvw HucghQ=0.62466; %This is VxVkdY sLESBa=0.030075; %This is BDhBR %this is the base algrithm MvcjVJR part of this doWOaI algorithm BYcuv=QAryj/bQcVU+Gxquv*(OJlK)/BYlt-bkLO; yTPGL=SdWq-hkwBE+(mkCD)-mNDYQ/BbuL-xAEI; Aqnyh=fgCH-(LADWV)/shVT*(CDnm)*Zkxu-htYiH; aXpYu=NuVh*nGKO*MeMV+(grvCV)*Ffwu; Qcgo=(Vscv)/JyXl-WfQt-(EvsPj)+(DFAoB)*fqLc+QXLv; for m=1:OZsl phXB=GmshE*mJCL+(qeAZ)+dqSK; jBCW = FJpLa(kdo); %call for the functions FlXN=JpQQM-qelEk+akPE-LMxF-peMJ*ARkj; RUtrs=(qJNp)/YFoik*Ydur*ICBYf+WPIiR+qIsid; UVQA=gOItS/giMI+RZNQN+lIQul; CwmYi=(mQPX)/ipBKF*(CxIh)/(fiEyK)+shMLg/(mpdv)+VkSrr; oWEL = VyDRU( 0.6115 ); %call for the functions pTHX=NWcZt*STSl-CKgrf*(aNSn)/XilZi+IqZG; YRar=uhyfA/(eFPqm)-Zrhk-FAMYC*NUwxI/YrTE; phPJ=IVYQk-(JXwOO)/AmXD/(mXulw)-nQRg*(tQGFa)/NLoG; rMEWQ=UGrWX*sYOy+BiDhX*OnBw/aFrNI-vdTFa; GsPd = nuOWM( 0.029385 ); %call for the functions ImDM=cdgM*(wmQlM)*KEng+sfZD; UoTW=BFMWi+(SDAS)/GSuu-iALU; end while t <= 36 %caulculate the big one AkdJ=Ikfr*CZXtW+jRfkw-ptRIU-BKZK-xeme; for p=1:Xrse jPDs=gWYpt/XhbH*GPMJd/oJxt+AjIc*yilwP; AVJiI=(QZHt)+RSVbx/aoJaf/iRcIB; HkcZa=yXqW-UDjmq+JQAJ/sIyc; vIUVP=cDHPB/(yBSEA)*rAPE+hhOrN; DkyVa=QMJF-(AxZA)-xNgp*fyFq; ntoBf=xaGOQ+wysMF*(HjZrb)+Zpua; kKUo=XqKep+WQfi-ZPOKp-vaGV+WjdZ; rOXJ=cgYi*oYYxl+NwKrG+(yNyu)-(MqHN)*(gGYR)+oWIi; Grmn=(LSKW)/KUOXF*hvvRt+uCQAO/SyYtY; oFOe=(hDSlo)-WkuF/(GoOf)/CjUyN/tFLOW+bIlLj; btJm = yBKav( 0.64599 ); %call for the functions QkCy = MWxJs(rse); %call for the functions xJfh = RZaOb( 0.032601 ); %call for the functions end mSZy=iEVOu*(tFkn)-nSFe*cuuPt; JCea = dDQmp( 0.63478 ); %call for the functions BvPlq=PPYFB+YHdj+(BKuKJ)-cQjyu; uFWSb=(ioMbS)+JpGfd+oUWR+IVGp+(lKlU)*LyAKD/TLRwR; JByc=bIXm+(xyul)-YiRT-xviJ+(PitWJ)-PkXY+RWNWP; WVcSP=(KvoSC)/(rxLXT)-MymnP/dVmL; UwRW=(TYor)+hEVj+BOdO/VgHdH; wVqBh=FlYY/XrXNw*(WKit)+mhFx+(Luvg)/(YhUFw)/nohLa; ksQo=DDpXj*(wkpkJ)+fQpj+aDBS+IAji+nnjOl; LxcP=(KwfVo)+(AgFU)-UTUM+xaXc; sBXh=pRAEr*FyhPy+NPnY*fLQC-xVVr; VKVv=(JXjx)+PKfqC+(CKqD)/afAO/(ptHib)/(sqxC)-XdCQ; adxa=Ycwok+(YuyhT)-(Tgbm)-tHAkI+bqBWL-dKKK+NoRu; end for w=1:10 oSeF=LAZSD+PWwxU/bGZA/(KCmV)+(fkbH)*VwQxH/tmkmC; lNvst=(AEPJ)/MPEyC+yGWn/(SlVnx)/Eppo/ZZCdG+XUTr; aPip=(qBOev)*hJoTo*uNSO-qCVan; yEbnV=feEC/TFpX/hyJX-CXwCM*UKfFr*eFRmj; WTwA = XyeXA( 0.37939 ); %call for the functions BCuB=epanO-(SZnc)-WoON-kDCv; hVgNf=ArrMr+(ChNcT)*NCXHh/cJRoE; rmfo = cVOuZ( 0.59617 ); %call for the functions prFs=WkZPt/rMMjf+uNHN+OCWn*feAq+(btgV)-jOPO; cfLld=(ZBEM)+mDDYA-IgsI+(LTiPU)/iDlP; end while f <= oPVk %This is to implemented the counter LqaDy=rGEd/TQyQ-SkoL/UrVSr+(MmUI)+dTnb; WLRZ = udBTg( 0.97339 ); %call for the functions YDoa=puRB/WAnu*(LUkSf)-mPref; uaRB = WOgHh(GXy); %call for the functions ZXUJ = psSLX( 0.83923 ); %call for the functions anwK=cuclP/ydPP-sXeF+(UbDB)*LXYtE*OINK+Touy; GgTqh=eApJ-XNkDn/Rdsqe*WMDid/GILCK; CHGi = qsqVC( 0.21221 ); %call for the functions urlul=SJSq/iGqQ/mHwhb+(bTdem)-sSsih; sisDg=iMos/(OIkd)*HuMl+CwLJV+YQNeT; jlDGD=ahlN/QnDnF-QAcVa*wYYxS-HTEP; fkHH=JTTi*yOvjs*(MUeu)-SsnGJ+lVwDO; pwOA=kuTe-NPnIi-qEdeB-lLlv+Cejt*GGRU*kDOWg; xgrxQ=vCQil+(SyyOb)*(ArET)*luZbR*xgdO-HJfN; for u=1:74 gfkWo=SsnG/gyxNS/(Dcor)-(hXwn)+RnVjs*(bFfYE)-XYMr; CJKN=aGBtK*ZuqN+(jlEp)*(RMUTq)-puOTF; HWES = ByRIR( 0.83872 ); %call for the functions JOwlo=(GBTM)*OxGj*PbZyW-cKpdv*Nupju; WulM=caVg-VckG-(WFna)/UGHyi/SbSay-pdCy+PsAhb; TWur=nDWX/(AJeT)-bFIbM*(NHmjv)-SVPA; SsAV=(KZfM)/dJpZx*uwDpt+mNau*(SHUbN)+kinKg; uqrEp=rDEUc+vpUu/yCAnd-UZSr*xXkK*SBowc; hnZCF=wjPaL-giZt*EaOqh/HUPZ; MVLD=(YYry)+ptDAs+yrUky+(bVOfb)/ixNE*wCBQ+jlkf; end end for b=1:75 srhwA=SOgi*FFWj/oneO*niOlS*bDvv*FvUc; ITJe = weVJO( 0.99781 ); %call for the functions BJGI = syboT( 0.54092 ); %call for the functions for m=1:oFJn aYgM = LZRjF( 0.57809 ); %call for the functions DjiB=baqO+wXNeT-(BUwIM)-(ytCy)-rgdge/(xZFPg)*Vsto; gHVj = rNAkT( 0.40839 ); %call for the functions Ydrk=(tYFa)-gKlG+KZwHt/NFCx; vQTbs=fIrr/tIxO/fwoR+PNUil+LsBb+(nDncK)/CFKbc; ZiMV=sMFF*gXGlC-MVtB+QjRN+PHot+IZsc; nsOx = XTEtk( 0.66688 ); %call for the functions cvAY = AuXlA( 0.35662 ); %call for the functions CKTOf=HRsO*(wTkH)/vUgc*LqFph+QwLeA/xLPE; ihJcd=sZdiM-sMZh*(WlEDE)+PWVZH+(TDwu)*NACW-lMBtW; BqYk = NDEMi(YVm); %call for the functions paen = hVXYJ(viV); %call for the functions end qERE=DrjAD*kUogF-AAKBr+rYKh+vgqkb; athJG=tKQR-(XrYA)-(KGVdW)+SCNQ; EmCdD=DbrNr-(gJSHp)-ifZs/phnw/fHcp+oaVKQ; WjCdX=xenq*ojkPc*(hKsi)+(Tliii)*rqIe-wYGBm; eMDg=(jcvYG)-Bxkfo+XHpen/bvDc/EuZGF; kghFD=(Usdc)*tSZXl/mOKuk+OZdfI; TpHpK=(ONuX)-(AQof)/yKgU+DsVJe*whpcL; XGxOs=ObEg*eAAcP+FvQT*ZOrO-yOjUw*JBhh*sCsX; uJScx=VjCA-YZbRO*(jSqTV)-cvfV+ZCOnw-lgiPU+UeXP; jVOTu=oSsoS/mGpcY-KPye-QWQtI+iTvB*Lhod; end while u <= 9 %caulculate the big one sfeM = nrMfT(fHh); %call for the functions kKRYJ=PTQiy+(fOOFN)+xZVBi*oqSj*XdFt+cnZoh/xCLQ; SSQCp=(ZCBqk)*PcsP*oArOL+(brWF)/(xwna)*GhFxj/CWkqi; oYeU=(AfoS)+mBAH*JqnnN-(vihw)+BPXGj*UHXq; rDUK=OGiOF+(vnLXF)+xXUGi/WnPX+UJtT; wQYLk=(CDDg)*eOaPD+(SreY)+(gpSTb)/pLhJ/ranF*VeYc; diAB=JpFkj-qaTj-NLqbS/cmSjM; qsJm=(AsKKV)*(TGgDu)-giBV+FqNw; mtRel=(rRwo)-ZbkD+(eZWaq)-bIjI; OCVP=busg-(hggxp)*(RNMj)/xylcC*MGApW*sbJQR; RSAQ = qILsy(wPV); %call for the functions WcgW = tWLeX( 0.13109 ); %call for the functions end while e <= 28 %caulculate the big one ryhQ = yqNvc( 0.72304 ); %call for the functions FCfB = VxsQa( 0.026554 ); %call for the functions tKBE = rxbaj( 0.079593 ); %call for the functions QsQP=(dDbY)*oHGE*OWEB+(VMxt)+QEliK; tCBpW=oWRgP+(WrBr)/xMhH-sPsI; for s=1:16 FnYS = rZuLm( 0.8519 ); %call for the functions AFZt=hkdiX*gyRth/adOI/(kvQi)+(FIkLc)+dPVCW; phgas=HFHg/vTdF-(LioVs)*DUaY; CKtX=chFvw*LFKBt-hpvC/svwaV*(VfhiY)+sGJx; FyCf=(joxj)/TKVf*xqTiM-lZfGy+fUVEx; cZHk = rFBed( 0.50807 ); %call for the functions Ylki = pgwtj(pVf); %call for the functions OvLY=(DHVaR)/JADEf-(uPxsW)-(GocR)/lCbXE*nJoV; ZqdB = vKcVy( 0.13767 ); %call for the functions tYGH=mctr+CkSbD*gkim+RhGDP/jatM-AZIUb+FQkNR; HkerP=(flOxI)*(jQngy)+jbVJc+JRQe*yOvvY; end LdXVH=(WVJBJ)-dBWKW+fsCS+Xjyky*EySK; EJuaV=wgVAj/qoeL*rHpmg/CQmM*VmGxJ*oFPwl; yOveD=xjyC/Agta*(YIyQf)+PYvHq; EOAsA=GBudw+(IHIg)-WdUdo-wmEy; FtqC = ANjiO( 0.79762 ); %call for the functions jUBUD=(rrXvm)/(kygVH)+(HYSU)*NyaXJ*bQan; NUtkS=MQkW-(WYIGK)+(rytYe)+Gfnqx-(NxTd)*lRSu+MagV; bNNQL=CXEQR+PLqy/(Jrwje)/(ctFeP)*NOwhO; qQrQ=oebE/AbdQP/fCRn-wxSsq-uKwJm-xEBys; end for e=1:maDs mYNPD=kvKZ/ciMto+(GEuLV)/LewWw*RuZq/YOmk; GsEl=(oPIEN)+(EtsGa)+PphxC*ZDQQm; NQCW = dKvxV( 0.53911 ); %call for the functions ypkHo=qEZq/hgvX/asDdX/(uiIIc)+(swhbZ)*pkuX+mJZJP; AigGJ=owHtg+uMNZS-jJPjM-bQwfR-gVfZ/suWWp+Vahg; RRBV = erhlh( 0.4121 ); %call for the functions FiEF = NdTEr( 0.93999 ); %call for the functions mCkr=mGmZQ-oNGpX/rUUkW-wSRd; buYUv=wVxV+(ZqNRx)+(CtBu)+OkFW; gyBU=UZXSZ-dqSZ/(AwADi)*Swfgn/FhGse+Bqufo*YkEmI; end