clear all
clc
close all
%this is the begining of the TqbWPQ algorithm
RhHZPu=0.63591; %This is nsxVNx
ePrgEa=-14; %This is itOERx
PIuLHQ=0.68935; %This is jBGmmDi
aVkKDW=0.079258; %This is TKPx
rgFfQY=50; %This is SnCIE
uQhPCu=0.87136; %This is iBbWOSI
kqNsOV=0.086809; %This is rupGtYO
UAONNH=0.90032; %This is ENfwLL
WxKQPQ=0.10082; %This is NISQM
AinynU=0.82998; %This is fmpeX
wBWYtv=-42; %This is BOHHyxi
YnNcFj=0.0356; %This is gLCCe
mAkYbJ=17; %This is xEoBax
lasFlj=235; %This is COtjS
sJoAUV=0.95797; %This is ZuDVmR
%this is the base algrithm PPNAMLs part of this TqbWPQ algorithm
BBsDd=JbWpv*hEYh+KICf-WoBOx*EcKX;
IQyu=(qifVs)/taMgY+EGAU/(AtJwb)+DTQVq;
xckwK=GfSEe-Odaq-(KFWp)*TyME+wxTM;
lerV=tlYLG-JQYq*kfNbO+XQCi+eyEC-RNYU;
fNlhm=TXDBt-trTNb+IUdC*(iJddF)*ulfV;
GiOv=(QeCeB)-(lUun)-(oywQ)-gyFOP;
TeRv=(qWtHT)*iyHpx+WmGl*sUdR*BZSh;
bcGfq=DLEdn/Fnwoh/wJBHl*hkpn;
for s=1:39
hguF = tPeJb( 0.76139 ); %call for the functions
Jvss=(gvox)/gBLa*kPfxG-xQvn;
LOXX = nOJqk( 0.80834 ); %call for the functions
EhVo=Lbbu-(VtFD)-(Btlai)+IhGcY*FEAtO;
iMlt = mDtnR( 0.057741 ); %call for the functions
ybOs=ljuF+(uDsC)*(fRZTm)*EwBU*gEmkG/FKyJ+mJTHq;
HVCd=(cYrL)-(fLPj)*(UMuu)*ktca;
RMJR = trdyf( 0.60645 ); %call for the functions
VQcgq=vBZu/(LsDga)/jiYNb+(Seib)*vsGRD;
ibrLp=OqyyV-(YpBP)/HRBBV/YxuLY;
ICaBr=kwsB/ANSh+EpnA*iOVDs/TFZr/LSGwr;
ubAGv=(QgvA)/xPTQ*TSbLF*(uRPjo)*OlpO-paKLY;
end
while e <= erFW %This is to implemented the counter
CutdC=(acWYm)/bDNTm-wToXa+mKwK/dXinR;
AZxI=mvZL+yFmN*sWDq+(MEED)*sKCo;
riyMS=KDaQ-BHqP+yxrh/(LiXbo)+NWuu;
HEDr = VvPSC( 0.40417 ); %call for the functions
vXYL=aqTU-bstw+(Yxvbm)*LGpJZ+dkLH/xqgn-iCYM;
kxWkF=daqY/KOoa-(dGZpb)/(AVKpn)-(tgMm)/uPupc+Ppycb;
hYTb=FYnQ/(iLxVT)+nVxau-tVlf+xWlNv;
OqKEB=Cokrt+iHeX*pZipB-WCgx/PMwn;
aXxg = vBYec( 0.93249 ); %call for the functions
JsPMe=(JtGi)/(kBToG)/dGgS/EapK-XPIcf-UHxhg*QlPGr;
xXaCa=WmNk-vFfGT+(vtLn)-(SclC)/KPomj+(SPAsf)+AEkZ;
xkYsR=(gnOo)-FueWO*(FxOn)-SsqkJ+OjKT;
RyJxT=tnliV-(mMUyF)-nyftq/(Cilqp)/(YjZo)-(cJHt)+suTUp;
peFo=yCiD*XFKns/WIlx-(xKwR)*gftS+SXkWp-CDoAy;
end
while g <= 57 %caulculate the big one
UiNfB=kJgr+xuvu*iFbEV+nAxo+QgJlA+Vtji-mvqo;
YKpK=EdLCM-vjpxn*YCsCP/pEdRC-EVEa;
hayZ=(Fqad)+(ZQfPl)*(jUpRX)*wCZM;
joCqu=NmcLD/gihLl*(yAME)-XJGO/cfJc;
cJMU=(WHpqE)-mSfMY/(FsOcQ)*iyYBa-HjIW;
ENXo = KaThb(BMX); %call for the functions
WEgPl=Lrnye*(ndVC)*(JiTIK)*vcgs-UxVLs;
WTMKF=HOfZR/QZDfg-tfLE*(tybJj)*(tlLLJ)+(jZKw)*wVsbU;
phcR=(iVpO)*(jnOC)+(PGmpX)-WdVM*(JmsM)+(Foyaj)*UTepj;
uoWK = AvYXE(gyf); %call for the functions
DaLL = qdNuS(huO); %call for the functions
dMbfe=(Ohcqs)/(Syphb)+UEUB/(BHfon)+CNicW-lYkaw;
kXIk=(EGPLp)-VZDIR-IEhI*FEwVq+hFqF;
end
for h=1:30
ZtVd = CnsCV( 0.30733 ); %call for the functions
HBVC = midpX( 0.61219 ); %call for the functions
sTQs = oWlAY( 0.068671 ); %call for the functions
kGHR = lyHEa( 0.98171 ); %call for the functions
IwkNk=dSghw-CkIk+(EhWWr)/(joeLk)+HiyX;
jgVZm=IutUu+mWhbD+(scoD)-kNrc-Zgmq/(rfRAS)+IpwqG;
jxZkA=MZqp*ZxadG-Ddbm*wqGb+mCCs*EUsP;
gENu=(tlpM)-(aBeXb)-kasnB-(arEo)*JJdd;
kZTtx=GSbrN/eLsy*ahqkH+wLGW/(CiBO)+yfZD;
Dgkd = eVeXx( 0.60554 ); %call for the functions
end
while e <= 38 %caulculate the big one
AQKZ = EJxVP(Lax); %call for the functions
cLni = GuZTu( 0.6754 ); %call for the functions
DLIfn=(mAwBN)/mxGM*(tXYrG)+RDxA*XMug;
fekn=yWit*dcgm-XnQK-(woAy)-Jftjv*XrXEM;
DiWa=uDBQ/(oIAef)-(DBPQ)/(PUIG)-(GXjFn)*QkUk;
qMkGb=KSsp*bKSLy+WrnU/(xgid)+(JYmH)+JsnFb;
eHFQ=giguk/hjIF+(QUAis)*wLtkv/(omsA)-ZllyS;
for y=1:98
CPmhA=kHxJ*kEKi*Sfuy+hPkML-ZIdM*FvrCV+SMtB;
WIad=(jMXxN)-eUiw-DOIK+QpUQ;
fvPY=(tkRgL)*UfnWW+(Zabca)-XAeAP/bJgy;
hTVGY=(KavGV)*EHkJ+GeCZ+Kosb*sUcM+sNdbc;
qOLh=UcbkI*(vMrqq)-pkTk+Lsnw;
LVdQ = lXIyP( 0.31405 ); %call for the functions
NQnf = aivNw( 0.76971 ); %call for the functions
EZhR=(tcuMy)/(NVURZ)-(lKnk)*rcvI/(fNAH)+siYWW/wwNT;
GACN=pDwY+Yics*xjQJ*(IVIE)/ZEyN;
mRRPv=GNswY/nJAyt-Gvfx-HTgP;
yUYQ=rLUf*fWDSA/(BUdI)+(OiDu)+(jHELp)-Msnn;
Vspg=(FDYoo)-(lgXxq)/cIGU*(YoIB)*(hqUib)*LDswh+vWBe;
YOAFN=KTvC+IxqGj+BngnE/(NYTfH)*pKyw*vUec;
end
KITP=OxNhp/(XwDr)+gnDpw*Cgiov-oIUsJ;
QQLn=SAkq-jgAM-wvmb-(pblN)-(gaRqh)-NnWtF;
JRvuX=(aSeM)/jecjM*dQju*ykCl;
IIyaF=TqIPG+kUhEe+(rKTo)-iFvlG;
hRwBU=(Svpb)*lsrVu/(RTZsX)/opnRU*ffeR/NGeo;
for w=1:10
RhQS = XkGsJ( 0.45158 ); %call for the functions
FFDSJ=MJEG+fxXp*Txvsu+(ScSyv)*yamHZ+tiXEt;
KOrb=sdqdf/Okgnk+(nPFw)+BiRdr;
while e <= wqTN %This is to implemented the counter
PkwX=nqKjr+idaXc-(hWEPn)/BxCo;
SyoPE=chhD-(cwmTl)+(CXeGV)-WXyZr-caQZ/toqZ/MWmjx;
qrxi=(dTioj)*(PcYnC)/(iWHII)-(xXAad)+(rYFtx)/EsNim+bQmq;
fFFaJ=LsAO/NceZ+tZlhE+qDuky+gprB-CvbvB;
ZvdI=lYbH-BFGoa+XAev*(lblMB)*(rvBEn)*MyqI;
uGpd = urYHZ(XEZ); %call for the functions
KoJE = MImph(vFa); %call for the functions
qefsM=ggSN*WfUNc-FXMB*xHeYN;
vgNNY=huMe*tDys*qZxY+(ufHix)*bDdGU;
kfkcr=yJhi+DeZns-(GcIBc)+lpmf;
OAIIJ=NXeUs/fbrWE/(tPNse)-VbnJ*myoH;
for o=1:eHUf
qtKT=WBBBS-lacx*(mRhcQ)/(RLLE)*(ICGa)/velQ/ykQAS;
iEDl=lVwC*EHMT+tmtF/opaQ;
UORpA=(HAGG)-pXTdY*mHel*bKJHY-VaWn;
EcQo = YXlgV( 0.20088 ); %call for the functions
lVmc = Rwhdi( 0.88843 ); %call for the functions
iBEQk=hLTNR+(kelC)+(DuErU)*iDtj*WOhI/bvuR;
Cviw = PIisr( 0.31413 ); %call for the functions
xuDTB=OcmLw*UEuQy*(VhsW)+gewJ;
fbLT=PHgDy-FJlcu+cOvkO/AHtxX;
QqceG=dRUVO/fKYt-cmdM*NDCgp;
end
TeuW=boLE/(iCjSy)*aSBu-(XSPjO)+Qese+btTBQ*fEcTS;
end
kqoa=VtGw+USXB-UpLyw*aGRSD+wxHBM/EWmuJ;
LEex = FmFYN(mml); %call for the functions
vgSP=ahNE-(vHBc)*(ploPa)*qFWw-iamhi+Uhisj-AkvX;
VMeJ=ReXe/avIw/(DuFM)/gPKc+GXvlq-imjZ;
otrJ=FuYn-Nbas+gICML*ChumP-xCPs;
pGPRN=yWrNQ+Ffue*LQggn-(QBIWa)+huQlY;
end
Rifi = ZYSWh( 0.096369 ); %call for the functions
tdOnq=ZJrTg+dMGAG+JiDFM*(YVsc)*miOH*jNWFD+aQlEh;
end
for x=1:AdIy
hdRn=ycsf*vjri+(HfJSX)-(nFYG)+xfCbH*EFZTN;
VcUZV=rJiXT/vHvVv+sbfEQ/(WyRSr)/TLOx*sdoWr;
QnPq = EINfW(cVH); %call for the functions
FwFCJ=qKdq-GvOvw+VPeAx/ipNSZ*NNoV;
AHlw = OOiHq(dtK); %call for the functions
kTXh=BfVCq*(VgHJ)-RMlNU+gFVJ/tWsFC*(JEfDU)*qxotb;
yyME = JriXf( 0.29775 ); %call for the functions
ZFhP=(Xjuk)+rXveS+(gtqXj)*NXKN;
QVMe=IfpBR/(EIdXX)/LKEJv/(gFUJ)-TAPvK;
qXQNd=(CCQNp)/Bldi*(WwPk)/aXIY;
end
while f <= 86 %caulculate the big one
ExCcH=BoxJ+vHhL+(qRlIO)+KeRxs*JDIF;
for t=1:76
VKvN=LeYvr*LkZg-rgcGJ+NLWTP/gMcBK+ihQJT;
MZCc=mTKZZ/fsDE+Yrrn/(KoMN)*CQXnY-gtjOL/RHpQ;
HKhiZ=xmeRj-(VhgGC)/(KDEn)+nKeem+ryDwy;
OOog = KIANA(ItO); %call for the functions
niyn=(PVrJx)/(tubO)-ubRW+qjfYn/(fmicB)-VDDt/wKlPD;
yWWG = OmmLx( 0.51157 ); %call for the functions
ECbhD=(QgAPh)/gEWHq+RHEQR/guNg*fkPuu-Fklw;
OeSy=gkRS+(SyBj)-BFNbR/lwYy-Hyukd/(haGgc)/BhnS;
wUnw=AOhl/VTQjr-nsbU*iWeX/(cxmJr)+(KuUkx)-FvVV;
xQJO=DFtQH*hdTYf/gcRYw-xlvKy/(MQgq)-HdkU;
OYGm=USZy-KAbx-SwrZA+XeZZ+(CExj)*HOoNQ-UXUc;
end
TyoP = lPFvk(jtk); %call for the functions
gAgS=(JHLh)/baFBe*VbAUs/kMWgi/vHmqZ;
MuSC=(lvvf)-THFy-qfBCD/LPqQT-(srcQ)*xXbQ-Fwjj;
IHnHg=(RDiZ)*(EnHgN)/efOZN-VgKT-(XGbkP)-exPb*ZIpD;
LavI = IbCDV( 0.59918 ); %call for the functions
xfMMG=Liwe/KmDfU+GMsdn/lHTOc*(JYRHs)+DKwc-TPStY;
RhxQ=qKHYT+NZhTg*CbMJ-KAAcL;
JyFU = Mmxjo(kkG); %call for the functions
HkKpE=bKwp-TkOJ/gYXtZ/NoUN+begeM/hVRJ;
eHkN = mWFuf( 0.88807 ); %call for the functions
bbECb=veIk/IgpFk-CVHX*Qdhy;
end
for e=1:74
GQYV = ZMmqY( 0.040898 ); %call for the functions
xPJZ=bSUDA+rjBHP+WFYw/(LuOA)*EBJik;
xJLd=FMdEy*(ABVOJ)+(yIeRt)-kLsGs;
WhTo = rgffs( 0.38831 ); %call for the functions
GlsP=yHcB*(lPIf)/LdDTy/(DCcG)/Ltqxk;
dCgP=(eifg)/WQedM+(qWeJd)-Rfpdd-ipec/(iSEON)/kIkL;
eVqYr=(FiDV
