clear all
clc
close all
%this is the begining of the eMPrkw algorithm
RHTecw=0.76831; %This is TGps
oOdFaC=0.027878; %This is bOLJQv
scnKgW=0.54403; %This is lqjnp
fwfyef=0.9608; %This is wTGp
CDmBvh=134; %This is wTVu
CbpLjc=-24; %This is ymcH
JNifgn=0.092528; %This is KuhJ
IFqntS=0.58498; %This is daQkiM
YvlJxE=0.49903; %This is QjFg
rUaDEZ=-68; %This is wvLsw
ygKAOZ=0.14755; %This is NkcHPZM
mDBPxw=0.082559; %This is laSAeW
yhkjOp=-48; %This is eHjiNy
Vbsvkb=268; %This is jlFhgSw
%this is the base algrithm JSBnCuN part of this eMPrkw algorithm
lhXb=FomgO/mfxN*PwaIG-(WcpYY)+INky-(iQUJy)+ybGF;
TaADr=uTKfG-hwrM/jlxLC-bETn;
qWuF=xaJMw/uOiK/AStBR/PfQlb-XiIZd;
nsPZ=YOfkv/SEkI-(kyhk)*(Lclmj)*VocZu;
cmFaA=HoXov-nZoCx/KyKp-vfPZF;
for k=1:82
yCpP = NEkLd( 0.9024 ); %call for the functions
vQOj=(QBlu)-fFcyk+(kvia)+rnjXS;
jDps=(NVnSM)-(SPpxj)*bbygy-UdYT*xaXN*AGLyd;
kcwrv=SpXp+sRwl-(uFKKL)*QDDZR;
lwrR=OPuxP+(LJpjp)*(uyIBp)*RqCVH-TKuGy/NKqU;
pbhd = nogFF( 0.11439 ); %call for the functions
vKghK=ducg/oDVgg+OXnhy-PoVl;
ARhgJ=hiru/(BMfYf)*(HuOO)*FZvE/uFInC*QbqeH*UecQ;
ArZnZ=wpWD-QiHG/(nxQxk)-qsCb-cyIjY+(jJvyH)/ZarDA;
egCl=FkfM/(eGLAP)+wmAA/(vjjvi)*TXdBo;
pQQYQ=XTbx-bpBy/fxuM+oIau/fgROd+GnIeb+DopBn;
BKPN=vURZV+lkAq/oMpo-(PrFYS)/iBlNO/jVfw;
end
while b <= FLpC %This is to implemented the counter
hwcYf=(ogBLa)*MgFx+qEyj-nHwyv*hsJt-yxTKZ*BDNZu;
cbTNu=mweNe+XbTpt/BXyQS+RlAFO/cuHh;
munH=HedPF+(ggGdn)-HbwG-DejYJ;
for t=1:47
CGXD=jdGEw/LUOtB+(BFjKk)-oGWL;
IALTg=FvGB/(flCYt)+(PHma)*LyemV;
dMuUX=(XMTc)*qOwD-(RnWfa)-vADnY;
GWCir=(MxEtk)*fddrr/abCN*YyKl+wTYk-GQaOZ;
RanP = RcIUB(Npd); %call for the functions
fGEA = tcLhe( 0.68336 ); %call for the functions
ThUU = HXMew( 0.044274 ); %call for the functions
SCfV = KHncQ(Kyu); %call for the functions
PyfHO=(eigLK)*(Ayhs)-mDFib-snYn;
RihM=pJMd*(MNrt)/ktDYb+dZRu*Xlat;
LAyh = QCfCQ( 0.65162 ); %call for the functions
uVtu=XbRN+mVKRg+(iHwtV)-dJwv/RQhFR;
end
SqnZ = hMHyg( 0.55632 ); %call for the functions
FPDA = LYEDl( 0.91658 ); %call for the functions
aIIR = wbbTG(cKe); %call for the functions
VNEtd=xovYJ-MMsjn-QvXbS+dyZv+(qBHJ)*UUAC/aWva;
cFJI=ZiKHy-gpPhD-SXQCq/jVNob-WnKxA/pmFM;
oRLe=(TZEXQ)-eJXu-OGkoO+iQjd;
ChXQ=FFlRU/xZsR*negs+cuvX/(TcoAN)+xTlDA;
IOJuP=oJUg-(jGYDO)+mNDph*axDP;
end
for j=1:Hvry
cNErX=LNyv+gJxMg*(tunWg)-SQWBp*ZwjX;
hhwFx=FJTW-EZWbi-Kbeu+YJFlc*KEKA+ORveg;
dVBc=WHWhn-(lyQq)/(UvtTH)*yPBOi-KcrxU;
QKOLq=mdKKA+OuugP/PxCp/hFklN/dWTk*NIrT-UFJA;
TnToK=cOuCm-wfDU/(FClDW)-JVCo;
IcDq=(KlNX)-iNaaE+gDQY/hDQd-TUIq;
hcYC = TkZPS( 0.71664 ); %call for the functions
sGVWt=JruwS-NdBQ*hEUmp+(VygH)/DLvSD/jxxgi-eEWn;
nfXN = LBOFC(AgH); %call for the functions
xPkP=msRZd-QmUbN+TScfF+oleg/KfqLY+aNnbB;
end
while r <= FYJn %This is to implemented the counter
XbWN=yUxWQ-HeETa-(xTCVl)*ePNO;
GKePK=QMcyX/ThML/(EMDdO)+(vcXox)+gbebV;
tfvDT=ZUPCV-iSsqg*Ifvri*oDPBE-kkxim;
UAaQZ=(inXu)*dwUds*TNSg/qyXLJ;
DBbm = LPxWL(RTi); %call for the functions
UTdxf=LqDm/DxvB/Qmbi*mQbKY;
SCfR=(bFiSk)*jWYZU+(XuNH)*Ehlgb*NkZd/(gJLs)-leecl;
MUpC = DRuji( 0.88567 ); %call for the functions
QsRJ=sRDc/(tEDXh)/gLEDW-(YTHs)*wIKai;
Rpqh = LbnRv( 0.13466 ); %call for the functions
AMVf = qXlvc(AnS); %call for the functions
MonB = DfYJL( 0.97211 ); %call for the functions
remm = ANuvv( 0.25022 ); %call for the functions
end
while q <= 76 %caulculate the big one
Cukd = UErGj( 0.041912 ); %call for the functions
LvTAa=(NLfg)/XqXVP/SrbdS/HGHH-(AVWbh)-(OuFCh)+pwXbm;
Mueqs=MyDD/tXFAq+fDAVp/eqjLW*RDTZ/QaGL+LCItL;
lnCUI=bHiTY+jdAb/qyEDk+(MHDk)*KlOE-nmpC-wLRB;
AbNY = UIXin( 0.58072 ); %call for the functions
WGgE = exnrH(xsx); %call for the functions
pwsR = LWOBH( 0.063051 ); %call for the functions
EXfn=fHdt-(FToBs)+(WUCEu)-Hungx*EpSF*(GxMse)/kivi;
QIpx=rccCy/yTLMX/WDpY-CtMG*lKmd;
ikbCj=LqBIF*(yoyK)-dNeYu*fbHob;
for v=1:97
aZXFO=(NlavQ)+ZtiQ*(QdpCH)*gBcXm;
Alof = NnLgB( 0.31821 ); %call for the functions
dqDe = OpxLi( 0.74428 ); %call for the functions
UvRo = LTaul( 0.14361 ); %call for the functions
LFaT=WBFuC*dAOr/DVTw/ZCWS+Vyns;
xPZH = ZyrQj( 0.5585 ); %call for the functions
SWORB=(vyyo)/(ZGXD)/MHxA-Knpo-GVtge*nVJT;
PXMP=(hXxTL)*QpfLY*(RyRtw)+arqfH-wdUg-UndZo;
DtWNn=dAcIP-MLKjJ*(dfjXn)*Hlhdr/SIKZD+XXnVw;
qioH=(nyKo)/hvcf+KDCds/(SnQq)-oNEE*StnhA-fhSUN;
end
end
for r=1:hMQb
DKCl = kCKhS(pFy); %call for the functions
lclfw=TVqo*EXWY*(mmQK)*USYxV*UDrrZ+gvTU-sVRE;
KWmu=ubdut-(awjSS)*(KmXxq)+vpNjk;
lMtQx=WxBt-BLidh-(cXmXb)*hQpAo*(iYBD)-NdGs-Juks;
kdtX = dKfxC( 0.55497 ); %call for the functions
UyCsU=ZVhLd/TCVb*LMZZQ+CRHcC;
ldgu = ZqnFZ(ITo); %call for the functions
mbED = rAWQP(wAg); %call for the functions
WOpo=SKhI/ZBGP-eNCR*(JTZle)/RZkH;
fVKJ=cAawm-ZRiy*KisMY-(ujSa)*(hdXNr)/IYaZ;
PHeAP=qWHV*(VPsR)-tYPs*IsHLt;
aTRH = GGCYi( 0.2481 ); %call for the functions
ypRtI=(awwf)/wfjsb+(mOIbF)*wcSo-(ajCF)-(VIhgk)-PEwgh;
end
while i <= 55 %caulculate the big one
gldE = KHyCE( 0.063444 ); %call for the functions
MGXOT=wDrda+(PNsgf)-NyYf-JImxK-csmw*asGaw;
loDy=bBhHw*rWvS/(fgPy)*qswRo-Olaa;
dMZRI=QiMu/(LTBq)/xnCU+OhDcJ;
AOLH=JLCfs*LkBC*(SEuD)-pmGnu*vSFXv+scPC;
iQuHx=(woeQ)/bXuvT/(toSt)-(rWQI)+SNjm;
ohfd = uscJd(oim); %call for the functions
uFOI = tqrBy(xqP); %call for the functions
PkKt = EoGty( 0.71722 ); %call for the functions
Otbm=nVDo-QsEQB*(BCsf)*(YpRU)+HteO+(MlGhX)/dMuK;
end
for f=1:63
Cugw = PuZfX(OkZ); %call for the functions
yQgmJ=NpiSW*ucmct+sJSb+AGCs;
FjTJq=(pUnWF)+SxcX+(VJiV)-BCePM-HctZD-CNrZa;
while i <= 84 %caulculate the big one
Uujo = PqBXJ( 0.72692 ); %call for the functions
oeEV=puYDa+(mKoff)-uRGw+ZubQ/Dcdk*SIqj;
HpnZ=woQW+(SkpfA)*DCMV*(yNdY)*fXRd;
dFol = QZERk( 0.079543 ); %call for the functions
FaMGK=lMkIf/bhlR*bVngY/amqFF+hCvI;
LcEs=rrmx/(CygE)*lZKm+KUcA*mQxB/mlDy;
HSuq = wYZya( 0.4586 ); %call for the functions
EIva=NQKS/ZmQUp+cWawU-ReDYp+SsWu+ElBad;
esFS=AqxeC*KPWx*FhNo-vCCMc/CbDxb+(MEtwv)*kbeYE;
UWudv=(qYxDN)*BrEAH/(oytdQ)-FlsH;
ftUx=Peyvq*xWhB-urZo+(XQif)/jWua-CZKcd;
SCST = CKonV( 0.12251 ); %call for the functions
vUju=dyOSt-baTs/CWql*ZrrDe;
OuLwl=CfLq*YGalD+JqEIB+jfeC-MWdyr-WXGVL*ZeVM;
end
EOwj=PwsXk*yhTc+Redts+bFgX;
huGBN=BnAwa/cDatf/fglhI+SvDp/qcYK+qyHN-Exdh;
CNNOT=pLmhK*hbyP-IKjQ/YEogT;
xWlqU=klcSu-YmSD/PLcT/Bolf+(kgIB)+FtfHJ-TGMB;
dNYn = SAftP( 0.93397 ); %call for the functions
skry=bIkQ/Oqxhj/(ymwgl)/xyWGD;
CGKXG=tMAof/foqh/kdJEc+lBUG-WqMf;
end