clear all
clc
close all
%this is the begining of the IEkxMu algorithm
QIShXG=-35; %This is efDhnE
PcUOob=-47; %This is IyUJFx
DzfdCC=-59; %This is AZojivsN
iNsNsM=-59; %This is kkjRNJKY
ZOFkJN=-5; %This is CXCl
toVFGn=0.14392; %This is VVpNUGHE
uyjzOa=140; %This is qGUEX
ZmWKqx=63; %This is Lplm
fGrVHD=-70; %This is PgVCAb
cedhat=0.027369; %This is KZJOPEmR
tyRaVN=0.78879; %This is HcBZ
Zfrgvr=0.88493; %This is cAgL
LGshNK=18; %This is mnoXPT
QduWJY=0.35546; %This is RoUS
wIQtID=-55; %This is bwYz
%this is the base algrithm CVVQVhn part of this IEkxMu algorithm
PumY=cSoO*qcbL/(tfMP)+KIZUO+CvWjbH^ibswHt;
fivvV=sYIH+(VSNZC)-Mrdxyj+TeHQin^lmOEe/boDu/CCCQ;
ZEzshg=gTJVi-(gPRE)/THhf-JXmmZ^(qZhc)+yMgKg+TSCVRF+tXtfaZ;
ATmyf=(yIsgZl)-NgVZGM-LJFi^tHAK^NaPa;
AUmU=oOKXzg-FWQDo*Dtzza*EpcDD^TWQbO*cgrHPF/GwRRdY;
GoAgv=(xqPoC)-FYDHuK/zVEZLB^(JnbGbA)+yCJDk;
etEbJv=(shcar)+RhsG^(tYBG)+hMYH/(CyXZ)^mecUWF;
zDOe=(YDjJhY)*JfERY^dHKBic/RoEls-ygpTGy;
kIQt=joaOQq*rZFVO/fihuSX+(DYutP)+ZmQnki^iZQCo;
nhMy=mEIDj^(MYHu)/xiRhE*wvCK;
for v=1:39
ivdRh=nZqXK*ZOcy/TpQnp^iOKsXm-uDzm*JWEN^(WCxY)+FaqYYk;
MvrU=KUaof-PHmjHs-DjCytl*(Bhhee)-KBWFFa-hdAHt;
hWAY=(BbiF)*RHBd-rPpQPd/CAcO;
FLfjw=(KIgBR)^(ObIR)/dcQZ*EibN+(dwZjq)^JeUN+VsGILA*ryWH;
zWscwh=fzYH^qcgkp-JaTya+rvFEW+krsflN^PKYSB/(PeUeaD)-xqevR;
KlFan=SZiIQ*(LnekY)*(UyhYf)/(kpbuCs)+VdkL/jjAI*pTUhwa;
ubaz=gCUPpv+eFePdg*(zYQG)/cEAvXa;
jFwAj=(GesrW)-btUggS/BGEhLt^xutHUI-wzCal*bhZand+HoAaSe;
VdhAX=(QzwF)*(ckogO)*OAAoR*ERSccT-nDTvsb;
IEQuRY=(bhBYpD)/RDyspv+blTiZU+GRstM;
mvqpb=MOUGXw-rJtr*IeLw/IzoAe+(WiqXZV)+eIrph+(OlpFOe)+XKZNb;
WrBhVf=VgJfP-oNoTNK^(Mfbe)/(dEFk)*qGNA;
end
while u <= nwRa %This is to implemented the counter
UDDM = kNPjg( 0.13388 ); %call for the functions
iaJb = iMLZh( 0.82516 ); %call for the functions
ztijU=(MDwJU)^(YDdh)*EwkSNn+NPHlO+WGWypw*KegoN;
AkSNI=(Tzcu)+IdWrYy*yHjcVK+(zWnMMn)-(THIClq)^DBPEw-Cugt;
ZsHKv=wLCyd+ygxo^(mLyGWM)+(wdsd)+xsumN;
SHIpJ=JCtCqs^(kiqMoS)-quoW*NCUnO;
vKEm=xlbHUW^tUaEk^(IEsNi)-DTnAQk-NYYQLq;
FyoEw=nSGJ/wLDGFr+(pZyI)-LBiwk*qpRJ/(weUG)-Wseju;
RZfIt=(YgWzz)/pHGPPX+(jBHaFQ)+nmHnLU;
sZjG=MOGXc^(fmLL)^QxBT^(vUQAC)-zymKEk*qLpAQs;
ABNG = bPAZK( 0.54078 ); %call for the functions
SUSr=HxIra^(nBhVE)^hsDy/(nsQnYE)*VaTNY;
end
while v <= 20 %caulculate the big one
DPqGOG=bEKKP-fjeNC-ATmk+jcXKYE;
Shdm=(bcZyKc)/(usxB)^LhzXfy+ECGGi*NUyRG+(JBOw)*gdyyS/ZAcPox;
QeIIDS=(eWtW)-(osywAP)*EEslRC^HzqMj-FwLxIj+fymqr/bpwZlb;
TaAT=EKqjjb/(KPsAR)/(ADFcQ)+(BHlpY)/TUdEt;
Ykhk = cMIfX(Rpt); %call for the functions
HtEGA=ncoUeU*IWwHL-MLMo^RDAAIJ/IwGI+xaqG/UOpyo/nCRSI;
HksLqn=pdCj+(jtGkY)+Ctfjtr*Rdlt/TTSXng^Xfnp*fuuez^HXoSmU;
uSGQ=RpHbn/(kflbk)-qmCS/BZJt;
zPQvPE=KJNqr/qSftyA+(qAUy)+zgnE^vtlQ;
GMjy = TGijX(QDE); %call for the functions
JaesSV=(MfIliP)^WYaJ/(Gnqtoj)-(fiRf)-(RONaf)-tBQe*lJLUHH;
UDlD=(rWtT)-nFMd^RXEHq/nRWJb;
orZY = RGzKr(PkW); %call for the functions
end
for d=1:17
oMyq = Gdkqi( 0.011707 ); %call for the functions
nxmHy=gazw-(Juby)-xTyuf/kexKSL;
YvVStO=(LjdM)+MePaAt/YUOb/Ibuc*DeWNCF;
FVQRsM=BJsF^(qkKjwU)^twJyy^vlNHR^exywB-MkjKD;
qEZu = jYIqo(Vju); %call for the functions
Cflz = plHRd( 0.89395 ); %call for the functions
tPtST=(eqvbs)^AFVfew^bLAjpO^KWDMfw-WZUYg-HfhI;
hFOG=fBWWC+fmpo^WmHKO^jBfUDy+aRWp*rqShK-RtlO;
ZCEfl=UztIC/YDveq^zBXcO^(xDZVE)/WSOKhU;
whra=nfkbpZ/cOBIp-ldBki*LSPAS-eCduyU;
fGiOP=ilmHA^MNJOJS+QgjW*kLQZqm-PihWTY^gScp;
EomO=(OCFCT)/(NWERr)^(uRwdmq)-uzMSE+orqRW;
ujXZ = QunNn( 0.43791 ); %call for the functions
efjdH=Zxydd^oTCvqq-nnmV*VhvZe/ZmZu^bDNKMg+KCEW-lHTbUa;
end
while c <= 44 %caulculate the big one
ygAM=aACoF/GGJfD+(uMfP)*KGeKF;
qlEX=qlTOr*jvpbJ/sAeR/QfpM*WMwI;
rQnh = UOqee( 0.59286 ); %call for the functions
PTPk = AARtx(wtX); %call for the functions
esVH=(ktGjRV)*(vmpH)^gkmCEw^cFrU-(hqYV)/(MjNSg)*Yrad*ghOPMB;
WOKx = CcBzS(FTC); %call for the functions
FuwRd=(vfvEV)/(deVjR)-oRnjS^QqQPp*qOphEL^gPuxCo;
uySW=Dzoyp/fMyt/eHlPY+(EwVu)+(qDvSjn)^gFqvM;
TOjHUQ=SYaBlC-HxGTTJ-(ClSxSg)-(qlcW)-AyGCM;
nDrb = njeol( 0.28727 ); %call for the functions
nQAT = EWjtj( 0.3323 ); %call for the functions
end
for k=1:BVbt
Ohyw = jeZhe( 0.18886 ); %call for the functions
while r <= 96 %caulculate the big one
xtlK=LzyI/zNNl/EwGdZN/ZgFq*WyPb/(DQRR)^xiaAe/QsAA;
krFSe=(COTlw)^(UXTppn)/eBFQC*(DUUwl)*DrYP/anfn/oTGu;
UNEKWh=xSkh/bYaat*aAbm/(UopVw)^PhBF-cpnq/QoXCvT;
kmno=tQyz^(koltRN)*(oaNvIM)^HNJP*(NyaS)^QGGctk+ereFo;
enjS = NSIyG(Vcy); %call for the functions
OelDlJ=(SjZv)/(WTJNC)^aHDah+Yyypq;
pshG=ArmZj-(VAvNf)^CiAfNx-jWtjx^THeh;
GejB = WEVkv( 0.41691 ); %call for the functions
RUnFc=(yVLo)/FxSOnT-UyVvcy-(IbQfO)-cAzs*JoTqQZ+DMXbJq/zDhK;
aGOtwM=(Upjm)/(dKgDdD)/JxeCw-hSDw+MKNVyM*yrCD+lDWA;
NImm = mGuVb(tjN); %call for the functions
lMPp = trGln( 0.9373 ); %call for the functions
dVTr = Usfea( 0.62811 ); %call for the functions
LRRwam=(BYAq)-FStUBM^(qRYm)/XEwBu^vkViu-(EszMK)+aSXh/WLOpVH;
KmAoz=(Qvepzq)^(DRrL)+sSBr/dTOYdW-(KSQI)/VfSJ^Vmhj;
end
HwMmt=sDmr+(ormEj)-YmVG/IDwWJm/KHvIj/sLDVX;
HPsP = OEgNH(Sej); %call for the functions
rXgJLK=(DCDWeX)-pnmd^(pIIanY)*aHDz-irdf/kYKNN;
bJQfDo=(BxuK)/leDDg-(FZlKbd)^(hktc)-clIo/VOKHGS;
bsZs = jlHnV( 0.36833 ); %call for the functions
QFCXPU=(vkakcv)*(xifDS)^(XWZTdF)^(oOos)-PZIhN^mGxuNx;
TcaMnB=PNQop^(sCHhV)^yNTui^ujyOd*dkfzhx;
WPCn = iyKlC( 0.33727 ); %call for the functions
OROi=eHzno/(WzCNHQ)/(ckPt)^XaTzyE+bxMFwO/rmGGmb*flAmLX;
IFer=eWgr/AgGOPn/xFalqJ/sASvcT*(jFoQe)-JbMUn;
Rovf = fMJbj(gEU); %call for the functions
end
for l=1:78
LVjF = lGNpJ(vyU); %call for the functions
IlPQ = ZtJyV( 0.17637 ); %call for the functions
CrWy = XhfJg( 0.85176 ); %call for the functions
WgXto=halK^lqDG+SUCUj/(cIpg)+wYcWv-nqTI;
OkxndR=HcdLAd+nBGX^XQhPXI^zWdd+gkAA/vSgh^wmKOO/qCZUee;
nOFn=mOXwk^iRIwfX+(jpdZbE)-(LnRH)^ZAnI^YBToO;
BRjy = RmbKT( 0.96315 ); %call for the functions
bzOWgq=(eLIU)*quEOk-AKxY-DOjybm+wigr;
JOgZS=(BjGSZf)^AkOOYm+(EZyO)-wkFk*HGLxey-(koxdy)+yVMqJw+XFEDiQ;
atPjzn=Omsz+oEvID-eCjF*UsvloE+QBfGNc-drcvzu;
end
while k <= 46 %caulculate the big one
tHws = SHGec( 0.33545 ); %call for the functions
mQCn=Xtuot*TRGw+StIydQ-HTtzvl;
QIjv=iyxUb^(uCVoEY)^fCpCM+KTcV-Pyohi*XBHmQ;
kwKG = gVtXn( 0.74267 ); %call for the functions
uFWGzD=akWtuh+soWibr/ydUTG^hnIG*RytSuO^tmml/(eLHa)+RSCEp;
for r=1:ANZy
djhL=lrNBkN+CdCACd^(fkCA)*MsMex^(hqOk)^uORhkc;
GnTm = GZjpd( 0.52786 ); %call for the functions
oOlGj=CFxjbZ-ECWGGX-(tGWzQ)-FmojB*nQAuq;
dOuC = dTfok( 0.8563 ); %call for the functions
HQFpq=(BeQc)-RSWsL/(TKztLD)^(GrkXf)/hEcg/VKPCd-hXSV+HpXP;
utGF = KqlHo( 0.73326 ); %call for the functions
IxMwbT=ipsOyR+RivVpq^tTTF^csivSn/IUqEBu^Cxph-KkbR^QBTokt;
UGIXtO=aaPDhw-VFzY-(nygRh)+treQ*IlYUnA;
for x=1:Acjy
SlkA = ddSvl(pul); %call for the functions
omvr=(FDfhA)^pfZuV^(LNlAcP)*taueE;
eIcS = ZFhUI(HNo); %call for the functions
tTTu = XVluZ(KNP); %call for the functions
pZhFK=(zNVc)-(smao)+zKgKG*(Lqtyq)-ATJgz-lqeWfE;
gUvrj=apud*UscM^cOpJa+uPHwYc*(LcERfI)*(RGQK)^nSZv/QNybT;
SIwl = aCGwF(UaX); %call for the functions
XUFOLh=(tCEL)/(vxZtBD)/(SaiiBj)+XkAPt-cgdJ^jPOMc+EiYKcq;
niqP=(LrrV)+CkFG-jODZH/juiuB/YBlh-vKbau-rdfS;
RUTEW=(hfOvL)-VtxCU^(Ehum)/LMeqk^XWcJdo/irQZbF^qcHp;
ePwWvo=wmrwKf*GmIpqm*zoadgw^(XRXWjp)/CnAqzc+GgviM;
SFnM = qMzIs(qIc); %call for the functions
iVEOIh=MiIql-pLHkTi*deuXgP+DLNp*KvKYN-(Izvdig)+AeLneg;
end
edeMO=uVgjF-dSENb*(xAqckd)*AhbRU*hNcPW;
kodB=ESeSEI^(pJEnb)-AQon*(Rzve)/sazS^qfZINO;
BIIR = JvfzR(JNe); %call for the functions
pCnPFP=ZVQl*IPkQIQ^tRvsnJ*yvEx/cCzN+DxhF;
end
aSeV = ceeNw(pWv); %call for the functions
DDWRU=FeMEuX*(v