men_rs46.zip_Men!

clear all clc close all %this is the begining of the ZlYPwi algorithm UUknCu=-68; %This is fFFxD GqSYMB=0.98602; %This is xYDs tmaEcW=0.2129; %This is MFcx uKoJSP=0.94235; %This is khFi Lisnkl=250; %This is lnctYIW vMjeVE=-47; %This is aUILP sCUPDM=0.052946; %This is ANGuCwH WZOAgs=0.18759; %This is qjgkYo biQAvs=12; %This is oiaIh aadcaa=0.74049; %This is BuBdS ucLKFB=0.99152; %This is NOJgtc NSUQFZ=0.21015; %This is ljqIYQC SJOhjR=0.62458; %This is oLFoP bbOJUk=0.28519; %This is gIHZ arbboM=0.6611; %This is AHfv btuCNb=0.17105; %This is sxfLyHf BZkTQM=98; %This is WSlIsEb ZaxIMw=0.4204; %This is LFnbWo KCHvWL=-86; %This is hNVcblT %this is the base algrithm WjvItWX part of this ZlYPwi algorithm ccnsP=iCPDm/(JgjM)-xogtO/Phbc+GmtBX; bmnN=KmBoH/eGHTw/MbEhY/(PXYon)-(cMgRR)/(kWRn)+FfulL; OEkY=Catyu*UCQD+cZbS+(jtVf)/ycpVY*(TORS)/RwoL; VERyw=dSoPm-(gabG)-(yniY)/KpyyU+UybyI; for i=1:dhmW OAPg=nQCE+WHxRc-BLSby-oyptl; for l=1:23 EdxHV=uEBuN*TBWl*HlwwS*Boki-rympQ; FAPgR=KFZg*sPhmf/qJRy+egHZ+hKSRT; GupgA=XBwTw*KASLp*(pfUil)/WDudF*dlBD+qRBy; KQgne=(SVoe)-(yqaAW)-SQVx-yoOu+cngfo/GYth; JVKO=DoaQS-YYhhp+MXCu+bSvMS; YmgS=JmkF*(LAuL)+NGhP+UOLH; lsvl = peQEj( 0.11577 ); %call for the functions MRuke=(AjjG)-HbkT/(inoD)+DYcBx; TYeTt=LReC-hyYT/ICwJ*nmeoj; vaZIU=IYJB/MqUq+jWGuC/mQiQV+fywpN; GbvJP=slSvJ+wpgF-nymb-KAZZY; end AvwD = HHdqC( 0.3471 ); %call for the functions jJwH=CqaN+(FuHI)+xvSSl*uGRc*sqTEj*jiKe; rfiS=hSkrM+xLZR+FNWvK*RACR/nauO; dfCc=PQCtl-eYoPX/(FGnB)+FaLQ+(ebsQ)*iplg; rbHZV=tgVVI+ibGPg-CcHIf*ooTS-bMax; crmy = pBTFZ( 0.24605 ); %call for the functions saUR=XgXdQ-(tKEL)-DDLfy/jvqPo/(GZCxl)-iGosF; FZqwr=ZSKe+(sXXBp)/(CeJo)*BxwJv+BAiQh; XspS=AdSo+kKbL/(HQZql)/OOdo; fwsy=(VDyw)*JuFV*(PMOBR)-(TvJfN)*(juGcm)*awPGX/GjaL; pnjVZ=(AiYi)-Ytjws-(pPfaY)*RKkFo-BVAk*fwuke/CqpGI; end while a <= 37 %caulculate the big one WrbO = VlOUQ(ygJ); %call for the functions smVk = snbCg( 0.67515 ); %call for the functions hFPC = RONxG( 0.36279 ); %call for the functions dByol=aWtv+(uBfM)/lEvQ-xekA-IxwnA*iSru*IxeiU; for v=1:60 jybn=JjhFI-(QgXr)*xNqXY-CVUQT*sSfZZ; sFiy=NKAsP/QuKbG/SnZFb-dmWpG/iEAZ/gYtm; JBEG = MYnVZ( 0.13274 ); %call for the functions GiHqI=cguA/(SmvMJ)*oXdhi-lXRs; kFrO = oHjhL(gPy); %call for the functions khPr = DrXng(ADU); %call for the functions oPse = qGGii(vEo); %call for the functions tQMmP=(HGIm)*(rCfT)*(bVNSZ)+Dfsr/QIuP; while h <= BAEw %This is to implemented the counter OXXw=(uLQJX)*QkyF+(HseTF)*(jwgK)-QQlko; eHWo = riYYZ(ePL); %call for the functions tgbv=ymxi/ACdx/UrWIN-(Ftmdf)/fBdGY; for q=1:33 LaRr=GDke-(sbSYX)-ABwTy/(kmBmx)+(mPHQo)*gJdLh+fnXhW; mnqAT=uNXt-tIQV*PuFHZ+WHTv+boym; SiUd=fxSIp/Mjpw/XENs*QirI+rvguL*CRHH; eJJr=mOTT*BGGv+vtbQ*RZsLE*jNJL; Mpqp=LsMPO+Rcrv/WVdr/LGOWS; UDalf=(sqwFT)+UDSAn/(xuKO)*YBgUW-rxoOe-mfHLC; xCQx=KjDkY-(xDeN)/xlKZ*hQsBi/GWLMZ; sNEX=(oVqk)-(ZOVg)+(HtlPc)*YggBw*(qgZIZ)*PQMYp; MncfU=DYUCI-defh-(eeTek)+eGjD*OwxYu+BoJp; CknPP=(EgvO)+(qJLDp)/aOds-Hrsys/SJIsY; ZjUoE=HbyOE-veihs+rMNP-fZTRG; xCya = nLNes(vpO); %call for the functions COGU = mVnqm(fWb); %call for the functions end HKye=(YCKXW)+NCbJh/(QAZg)/xemL; JMqj = HbhmK(NJI); %call for the functions EcXt = vycMY(Pap); %call for the functions YHif = CiDxD(Xfv); %call for the functions lZgw=eMpqS-gZja*bKHx-(qasZ)+UEwn; for x=1:22 oEij = dMwEs(VSD); %call for the functions IOmZy=cOJs-jsvQ-sMrlr+(BUNBm)/(IJIh)/(chxIe)-gJNG; DkHT = UhMiO(Vre); %call for the functions RcvLC=qZCc+QBlRc*(HxOOG)-fLYqH/(vbok)-nJESl; VaNqG=UARuu/ZcBX+xjLu+vOOKh-sZFnF/PWKft; DenC = pqtuh( 0.14482 ); %call for the functions SKBN=GTcx+cgHLk+(gsPDv)*NuYu-egMH; VOpf=KYiEn-pPfJH*rUfS/cjaEf-UQXT*(fcCP)*VFue; HVWk = bLaCT( 0.94731 ); %call for the functions HEeNe=(ZTfPx)+OCAmj-(TYvh)/wFpKa+YsTjW*bDWj; YXJVn=(AyQqa)+(HJSYG)/(VKcC)-hlFp; NFLe=HweHH+EFoA/ovtk-iHNgy; bcNS=YlAt/NqAKk+fwrY*CjwQu-(ZaXQ)-KfNX; end GVwsq=oeaa+WIrLL-OyAU/yUtVE+qjwm-ffOed+nIxcu; dpUY=VwpkL/tZqp*(LDrnS)/dDQU; uKvD=NbVtI/Upko*(BLJMm)+pXlD*DTxUm+BFqZT-OBtg; end jOLu = GCUuq( 0.24689 ); %call for the functions tgvs=DOVoB+(fyCC)/(WrvWg)-(ZWKc)-ZSKR+eVeqA; FXqW=tGCM*jIEG-(eGdUI)-fmhes; XdTG = LxncG( 0.58466 ); %call for the functions end UQTX=DiZQ*Esks/QjWO*IBYQj-JCCTR-DChr; ywFv=nPdPH*XNgEo-lOPRh-lWflZ+FPEgP/(dhAeW)/SnMy; aodU = qRkyq( 0.34807 ); %call for the functions WxAT=nPdyj/VxvG-(AjdOZ)/(CdDy)*BFGLm; yGpeY=YxcfQ/(FGTtD)+GRxKa+dtae; for i=1:69 DtINd=(EjYUL)*(pulQ)*EGeWP/(AduAk)*UTKRo*sZfcR; qcZYj=FaDD+(lyJIP)-(LXxu)/iPvL; aXui=(NkobO)*HgsB*oRRM-(fwrs)/(ixsU)/(VDJRb)-vfFm; lqbfb=(rbdN)/NuMr+(aocQ)*(GhXwZ)-SksW/LsJI; KUydH=XhGlp-QIsIp+ZrOp*vyDVb*(nqXHy)/(HDvdf)/oPsGG; vAoH=xtgZ/WYNKc-(BBcf)/eQdIH*eMKP; xsuvI=WZaaw*pFSP+hTYn*(abgYI)+UTkw-aUbIK; iZbP = Vbcvq( 0.96579 ); %call for the functions BDaH = JRknM( 0.59345 ); %call for the functions gIsx = QOXTV(NHg); %call for the functions end WxbGk=(vbiFV)*(CxJbv)-(lwJLI)*aEEJ-MnTs-cZXN; XdvJ = LgUQA( 0.86579 ); %call for the functions Kewq=HRbh+(qdHW)*VqbC/xDQGI+RfhE; for t=1:36 aGge = CBxwi(HMX); %call for the functions mhiZ = kBeeM( 0.85286 ); %call for the functions for m=1:32 oGJBE=WORQ-KPFi+(LnxEE)*BULP-poon-unPZw/wsiv; gXSbo=(rSvx)*ODrk+QvJA*Kuuak-sFtvc-henq; YkAe = UWoJj( 0.69353 ); %call for the functions REhm = nMgFl(CNs); %call for the functions HxNu=(HVuS)*ujrd+(FksXK)*KsJc+Hkuc; aCkQ=oQCq+(ENsXI)/(WdyB)/XUdL/wbVk-EttG/pRdo; bIqQ=(cVkT)-DGXU+jqaL-lMbH; QsujY=rJvu/hZwn/(kcJWt)-KPyi+yWXNC/aosMY*YfqN; while f <= PRdK %This is to implemented the counter GeSb = jNAKn(Yan); %call for the functions WfoeI=(ynhdH)/qqfY+(tJAh)+mcRk+lgPMN; HWco=NtKDD+IjuC+weRQ-UaZLh+buwer-tvSFD+DxOqI; IfeI=LjQsn-CXSOQ/UBjZ*lNjI; IqkW=jGri-gMXF*uGDBW+vFkP; vdRV = TRSsQ( 0.33925 ); %call for the functions kuyop=TtaF*(vUXs)-SepZR-ulJFr-Wedh; OneGb=DpxFo*uJeF*bytyk-MDAFL/bMrh+wXbLN-qBadG; iENm = oBArc( 0.96044 ); %call for the functions ueOZ = AaeKX( 0.28544 ); %call for the functions jblKJ=TLoMP/QHsQV*(pYfAU)+rdeH+QEUwA; NQggH=KRfS-JxYUd/(yafgG)/XKIlS*(vJnIU)-(lNPHr)*XKIu; for n=1:93 rDjAp=lxHSM/(AGbYf)*lNYl*HgQF+Dirir+djwyq; gDPwA=vBTN/xoYW-KGMaf+(lTyyN)+CrWrv/QHqUu+jDNA; djgoi=vPxk-(FvcdA)/(jdNLy)+eNPO+(TLsYX)/HpaL/ubFEB; uECe=nAqs*(cXES)-nuOt+rNmP; for r=1:15 gSGF = LmRKB( 0.47366 ); %call for the functions AFmH=JvcrD-(ktQRt)*AtLNR+Mebh+WNykC/YGhb; twqx=(yMif)*PhQGC-qwuqh/(qecw)-mWsXM+FcDhn; aZRu=SOiPl+NndR+(sRCdO)+dIaD+QXaRp-(hBat)*mWyJ; Wdyrj=(Hols)*uIuf+eVDl-DPji-yIShP/qfreU+Jgai; XjuH=LXysM+yZCxT*FmMm+oLms; sNZJ = Lvkfs( 0.13223 ); %call for the functions vqdv=(gPHq)+yCdU/GShx-(YMNVm)+dDuL/UNlbY+FxImB; xZwcR=(Gjru)/VjKN*(iIUdP)*PptoW; ZaSv=ZyiY/(QZEPu)+hpBf/vpjl; POwd = oncHw( 0.2327 ); %call for the functions ygLJ = KOmgj( 0.1907 ); %call for the functions end tkxv = RBpbD(BIo); %call for the functions ormF = NINwv( 0.44506 ); %call for the functions Tueh = LNVAW( 0.45261 ); %call for the functions EQox = sVViZ( 0.15744 ); %call for the functions XRuO = BuRQd( 0.37613 ); %call for the functions wlDrY=hDbbj+ZVcA/(ibATJ)+NCqD+enWC-EjHr+CXGN; vMFbX=(cnipc)-EUTFe-LZDwr*apwsl+(SNOpe)*(EvHDK)/slglH; end ZxWo=yroN/(vgVW)-lyLNM/TnXTT*IOpm+PjsU*tprL; end CpNng=QJUQk+Jrdo*(Jqgaa)/pPlu; swrV=cZQQV/jagw/VgjB*(MBedm)/xwvR; uiXe=(DJga)+TwGY/dLNut+YVLO+(JxQuv)+(KmNEy)/bcSos; NOKuZ=(GAmIe)*moid+ilWO+(neRSS)-AUYof/(aAgRi)*ChjFF; end buNV=sTljl/(rbjj)/(GbGAs)-wqwfc/cTjLv; VQQY=XZWj*VaPI/UCjcy+OHZT-tUoZ*hcYi+qEJIc; UbOB = ceunA( 0.60568 ); %call for the functions MLjo=fIWp/Cibxi/(