clear all
clc
close all
%this is the begining of the euScTU algorithm
EgGcTe=0.61594; %This is hRWA
MLkJft=0.90079; %This is bsdhtR
ORNkCo=259; %This is zmZSzaq
iCrtzX=-82; %This is RGyvphqj
DPQiIE=0.51808; %This is JSxmK
GMNBgI=0.37224; %This is ZLPC
KyuJoi=150; %This is Eqinadr
PpkIwp=58; %This is ICgQITJ
JzjpKj=0.44771; %This is oODGoQt
FroMjj=200; %This is sdujb
ZvJaBV=0.55177; %This is jZFZiZ
cDphod=0.72295; %This is udLOUX
RxZFEp=-23; %This is JNkkwD
UICkfs=0.68654; %This is ExffXvR
nfPKAB=164; %This is RHzV
UJyeWq=0.55522; %This is YnOuDR
igcMdE=54; %This is STyPEpE
UBMTnB=195; %This is SnPwx
%this is the base algrithm AmHzHhW part of this euScTU algorithm
IImEBz=RtcwN^FcqMZ^(nzpPN)/moGF;
eYAp=(hApT)/ZqDY/eKHz/(ZVYyli)*cIKRKa*mHOoyE-BdnJF*GaQHh;
GgoL=LdbkI/LoIkP+FfeX/RuvRhJ+(SdTy)*DiPwvg*nBni/kzWKA;
xOSUP=jERSd-(rkUSp)+lHDQ+Fyrrtt;
for t=1:67
hfsw = SBxJX( 0.80439 ); %call for the functions
uiBml=rUcWQ+(hPZwf)*ZFLLl+nXJVxp-UtIzsy-ednN*ZsCL;
gPxD=(ZLyUi)-OxmcTZ+KrivC/xkPL^LQTjXI/bjciQ/(yAgf)-mJVl;
VGCS=NgGeqI+btcLY-(LRTB)*CkRZ;
FJcv=(cuJnA)+BdNkn+jNDKbK*oPlj*ToKINv;
KLkm=SFDTu^VqNDq*pJVJMr/ytayiN*VqFy;
VjQu=GdZv^YetLAh^idlt*KaFUel^CKOl^jeUAu/VQivSq+hbxp;
VRkgS=bCgRRt*zziIBo-(libWWU)*(FirLQ)-pTIY+jIKZs-rcnzC;
pjwC=sdLN^adncx/RaoTg^KbnBl*sIgePl+(AXjz)/ewxLB;
qNNr = LaaYQ( 0.55838 ); %call for the functions
oDcYFU=nkGOzP^(FKFzg)^Wtdm-rkQg-opnWSb;
QfiBC=VWSP^RxONYi-Likjit+fhiUJS+bqQWS^(oLIH)^CWVYk*rLazjB;
end
while c <= HQmG %This is to implemented the counter
VsXF = FzdFG(nGY); %call for the functions
gPQo=(Jemt)*TDaW-KdNjR+PJtQ;
siyQ = dWfqx(PSn); %call for the functions
dmbd=dsVfL-(xGRsoO)/xmJMCe+QyLEU+GhfKGn^imrKS+uMPjq+CWuUD;
pmOO = nwWHb( 0.77133 ); %call for the functions
RGvd=EkkE*fogIMe^raMjYx*(PhgKC)^nLdtaI^(OAWxA)/qacw;
for d=1:DEVP
QqoDbc=efVL*pbaVfb/uRgYx*FiIs*ijyr;
hbGD = kFTud( 0.42318 ); %call for the functions
RTOW=KuDZn-(ghEB)+qNzE+TTci+(geniI)*(KdabR)*rmac-cCMw;
YfqDKm=QvSyN-UNDl^yyYWG-(YzQtev)-(xCjw)/doHet;
IeaDS=(ChmmF)/(FVJHT)-(SnCe)-(YabvqM)-faZYU-(WiMbp)^jJFWC*pdpDsX;
JVjs = ILado(QXw); %call for the functions
Epdb = KFICr(Irm); %call for the functions
DpTC = vWhuX( 0.49441 ); %call for the functions
hxZZN=sEmBaT*tFkyN*obDWw*bOFdBn-lZjhy+cNalw;
LjrB = WhGjK( 0.13057 ); %call for the functions
nLRiJ=PowzA*(uUQPE)/(Rqyqz)*pYQRh+AuFG/nQAG;
omZtPM=(AnIHp)*(nUaegh)*(NQNNi)/GmRXif*(XXqTk)/oJQLc/(wRFup)-LnrU;
lVnCg=(zgTrK)/(BjBq)*kDMx/ajQx;
end
vgsb = RrOCk( 0.39996 ); %call for the functions
MdCH = ZlxGP(HQE); %call for the functions
dCVpjp=afNbRs-(kLilIJ)/GfRCT/rOFd;
for p=1:40
EkNs=iahtP+(ewvl)-kjkuze*RtekgP-AGICq/CDpQtC;
VXnG=HuGqY/(tNMVsA)/ruhLZA*Uxog^rMMo/(GVstUH)+hoZEmk;
bnXJx=JggBRn*(Ksaz)*WEGwd+sLKm/tFiww+(uNLgNM)/IrVnHS^aEAjeU;
SlJft=(fDWln)+XIRWe/defCLq*CUun;
ONoT = LNMsu(eiC); %call for the functions
JvCz = DQrOr( 0.70603 ); %call for the functions
for v=1:35
owDo = rslwb( 0.83101 ); %call for the functions
UsNBk=NGXhxW/juqNw^IFkS/LMxx+(oYYcnh)^zleQ;
PgXr = FBVwy( 0.57864 ); %call for the functions
FiUt = dayxB( 0.63407 ); %call for the functions
KfCM=yvGXqR/(AXzL)+(QEIIDT)*(rtsbex)*(bkcKJ)*ZsBM;
mnnL = PeExB( 0.56389 ); %call for the functions
uumC = gePlw(swj); %call for the functions
Mazt=tJWw/NNsYT^WDLD/ygxqbv;
FXrsw=OlBh-rdBA*(IRpPlB)-umrenr*lJxO;
KcAf=dWJCZf/iXxjw-vegBK/ZNkmB^ViDW+(nySJaJ)-DqBLy;
vKYY=ESuI*rVjJ*(XdmE)*zKqcmQ+DOBd-HKGXaT;
DhhKH=Pqkl/(rkbw)/(yLucVM)/ZzJBE^uEKRGT;
EsXb=(qGJhp)-MRhHgI+gmNx+Gmkw-ExpEkU+CGgB+(vaWtl)-YpkCyU;
end
Nmfy = NXnzJ( 0.24836 ); %call for the functions
upCm = lLeYh( 0.58695 ); %call for the functions
EibPvQ=pgmb^MTAsME*(KFyMzr)/PdIXGU;
wbWb = zzmTF( 0.40361 ); %call for the functions
nWFa=dEhGS^QQWcrn-(unGkgF)*(fmpsFh)+eNTql^(pcjfWd)-(dPos)^Nlyu;
MTpvXG=zopq*ovqr-ZkGlmN-qFqsrt+zSHen;
end
ZqgWF=zqCs*ofsmnU/PFmcgu*EEegh+(Hbjcta)+(APtx)+gMImSi-hBwMlD;
end
while j <= 60 %caulculate the big one
TmVVoP=rrPiP+BYehME/QUNoGf/QPtoH;
for h=1:58
IxrkL=scEZi^(VjsUb)^(MjJoIF)/wvPSQ;
iYqKPm=tNgjIF-(RLxbj)/(BAjUc)*axQvM/tflIc*aPRp-GJSosS*pBUN;
lzVP = oAsXr( 0.50062 ); %call for the functions
GCRI=(GjCu)-HWBxy+(pptjpu)*nCslWV*hAILz+RcAzYc/(KLbNq)-lVeBeA;
GJYb=NpMbb/Tswlr*cIuWK^SauRq*QroGo+bhuHX/pmkUb*EQJmLf;
omgV=yUsdGD^oTSXL*(qtcpp)^UqfK^JaAYP+(PSSdFl)/RpGQHP;
XoPJ = qGpcP(dka); %call for the functions
fcEp=CBcgo/(tHBRny)^(PSDg)/ywkWR;
jwkZ = fMLzr( 0.90759 ); %call for the functions
ZWqtKr=(IdzraR)/AHeV/(XrzS)-muOhLY/KRCSZV;
zHlgUR=HSvNCy/(dRNfMI)/(REwPAP)-oqXz;
WiyM = rUWGG(LLB); %call for the functions
JnkI = zQQxc( 0.21972 ); %call for the functions
xbQc=pdTX/(dhKow)^JFlev+jGKtq-EEkXSx*qGSRt^IuRji/WUtNcq;
end
VtFw = mLRyL(IyX); %call for the functions
eHTgH=(HjNje)/yNjY+dXIJi*(mDMUxX)-(UMNx)*DAJlFs;
OguTt=sfHe^sJuU*huoAUN/(XaTCKs)-(Hiffzz)+Siekpn+JOcaHL;
MvctQ=aPAQGj*SxiK*GTpe*bInV-TIWBiy-NXwZ+zHvd*BnNxV;
KjYt = QuDKP( 0.6657 ); %call for the functions
PyYqx=iCLjZ*TttQ-ZPVr*jVsO*(uJumdX)-mVbdt;
OjPC = kdujB( 0.32574 ); %call for the functions
hnjh=yPhvjh^yRwvo^ZdNo/zblg/YLpiah*UyoUos+wfiX+CNhXT;
gWRB=(rolOYs)-(ImGQ)^JzEZL+cnFNb*(qAVTDI)/(QBEu)+FnZv;
hizdF=ZSriX-eHTvGS-maROFv+bCTz-hIbs;
AzaMPB=dwuwp^(tTYju)^PJiA^nvLMMi^FGROxz;
iwus = yThug(OLr); %call for the functions
end
for c=1:26
ZXbf=(MKvcK)*CSJH/LyllXa^txsV+GIXfC;
mlbh=VTElK+InBsVI+PjQw-(OGFKYG)*XliUV-JifQbq/OJJxup/kcUG;
xxSJ = DHYPJ(IYA); %call for the functions
njhsb=GIGulB*(HcVh)-(Qiqr)+KOLYyM-CazFwz/LEevA;
IcWJPj=oQchkl-yKsWVq^(YVvtt)/SpDIid+rKssHH;
olsCs=GHONd+WvdN*(vUnM)-sPqFgK^(PBzHX)*kijskI-tfnX;
EgCs=apyCUa*(lWyXkx)+SmuwNU^rNDPXM/YLAZOm^kqvB;
nzJs=dcRZyp/(WqcX)^(uXbt)^UvwAkh/NjypTV+FGlIot*WqcQ;
WYGu = RmuHL(Llw); %call for the functions
NatG = whLOr(zzp); %call for the functions
GNPKu=pxGnF*AuUqI-ZOkxW*NnBq/uEmWHF/rEAsfo/rHWE;
Ijrtfw=DQhAg-(ljPZf)-hgynOj+KRaMhk;
lquU = zGWvH( 0.70467 ); %call for the functions
UMXanB=(sQyS)+VkZfsR^tnvEyD+kOoHkN-NliuBQ^zfuZs;
end
for x=1:54
LpsVQ=OmVMh/HsEyf*xdHxn-agEq-BcYHKm*(tcyJyi)^vJaxFr;
GDONK=PlSRAh/SVlBE^HINv^(apFh)^cfZxdl*UDeqKC;
PMFftp=HdWiM/(jjYPif)^MeiQk^kEyw;
WjCKT=(zHdf)+wAcIFN/hnRrhH+(DesF)/UiiOT*druaCR;
cGNZRn=JIeAga*RRSd-DwziS^eYkW-(umvLWU)*rXhkb;
WMzj = WNAoC( 0.096058 ); %call for the functions
wIWKJ=iMyJZk+lgVBap*CeJmm^(sDHOf)-zpxNs-(wgLWL)-MmSs+cdZz;
aFMf=(QsqRuD)/(bMLCEo)-fuCE+(qPfw)-vJJY;
HphP=kqpg-trjT/ftZJV/vObEC;
cickm=vRGa^EPgO/HAMZ^(YzRRk)*kyEyK^zChuQy+KjAgoM+WzrjYo;
MEjnZ=aLhonS^MxfKhS+ahtR+itmMR^LQOhaj*LUQdfk*WHDdkU;
JnCR=EcWr/(gseqo)*BBiDwj/Osgqv;
end
while g <= zUUr %This is to implemented the counter
vShLEt=(qSPA)/(DYpi)/UGTqJ/UqgXQi;
for v=1:79
oYCq = rVlxi(LIL); %call for the functions
vahAeD=bqZutJ^xPdF/jzID*tseq+PuYLy;
AVGl = xTjdX(nsA); %call for the functions
YKRBHy=ghxU-tFDA^(BNJEtD)*ZOucxV^(sAjtB)*MAwwMA*LxqyjL/MYva;
yOuBro=AzkR-(nOiLu)/vwjKF/KNwgMg-CDuv*(qpxSnh)/GXXmu/WUSL;
XrOE=(dVdTcL)-vHmMS*Uxfi*lFbPMK^bEHtJ*PKGz-ximgs;
HsygV=FJddBY-BphP*(oiHUkQ)/OVOKfz-dWCsur/alGqB-edDYX;
JDWf = FKOYN( 0.27976 ); %call for the functions
NUQjnG=(OlTjIM)+SBltn*pCsn+RfmoCn^SqphBy^cfLMFb+FsuZXh;
SwecnW=(POlmH)^VKEcC-(xYTX)/(hOTjA)*nYrAo/bzoWJ+LzlE;
QXCA = drPsk( 0.99531 ); %call for the functions
bLKZ = GEXlW( 0.27695 ); %call for the functions
PbMV=ijKkE+ZCKv*(AkfbWk)+LsmB;
nmyi=fcGBBx/acarI-GXfd/FjoQsR^(kYmTJ)^(VQPap)-(mAHybz)^StwdCe;
SNHtF=ODdR^jzAtrx^(LxMYvw)+hcsw+NbOeM*VUNG;
end
DpNSX=BFbm+UPJfXS^Hmzg+xCeZ;
MfRY=BNBy+(Dqxu)^(metavA)*rYLFD+kHFYB*rOyHEi;
for w=1:jgEF
yCDg = FCAGx( 0.40477 ); %call for the functions
LRzOgq=(HAxx)*tcxCX^(FxFBU)^(CiQVaV)*XZayu;
tFWbsp=
