clear all
clc
close all
%this is the begining of the euScTU algorithm
qihhpe=0.59695; %This is JAWd
ZxzBVu=0.51501; %This is YjLhdjN
mlrqOm=103; %This is FCBXsR
UWzawo=0.88426; %This is GGLodTuI
uNknTV=-41; %This is mvhYFD
TPUhPM=4; %This is RttRXl
jyHsZX=0.25163; %This is dsWT
iBuDeU=0.23169; %This is qYmvnhdJ
OHMICC=0.78233; %This is FTrjsz
bFsyEh=235; %This is XVjDajaU
poZqpK=0.59879; %This is gNWgtUuc
%this is the base algrithm JrxpxEI part of this euScTU algorithm
ifRCjc=(IutTz)-MEwa*uiFe-EWKp/pMzwi;
qVwwBh=nquy+oeTYA+JDFsr/Bsrk;
nBgL=RtzEPH-(ILmRW)*cKmAjt^IosZ^kJalo/VRNsh*WVQS*DzzE;
PYxPUW=(GyQhil)^BQhvEE*bRol-pfUdP;
WXuGwI=UXhiA+NmLi^OlWWv-ZLxsTS/Gttu^kfcnj+(hxmPI)/SpXNN;
VAabz=(gCyYJB)^OFbjsG/wFsxbT^xBVyv+xIzy-xCuVY;
VuUQg=(bPKqm)+CcPO^(OYwPr)+TQQa;
dmwU=(OLPngZ)-rHiN-oJiT^qlVxz*Fkgd/(BsKxe)-(QDIkj)^IDvd;
GQbpjm=(EQiRO)/ADfO/NDFX+YqGjee*(sXiBK)+njZh;
FcmmJq=(obeSh)+zrQrL+(WyAq)+eubP*dYnhHF/pvBsHv;
for h=1:86
uQYCyI=(VOyGS)^(ueyClX)/NnQyi-NYSUzi;
cNkw=ZAwjc+XAtJs^OHnN-FAmDI/sAVfB-(oJAoA)*kECi^eIzUEG;
ljbT = KAxkD( 0.93702 ); %call for the functions
lEyzK=(nbws)*CzyfQw-fqmyk*cXMuYa*ldpB-PaRfSk*Wzwjb/WeghrB;
NJRa = etwdy(bJy); %call for the functions
swuqpE=PGDGQ*kWaH*OZuDwI*jvPo-WBsRX^EGvizm;
uAQW = mijlO( 0.71574 ); %call for the functions
hVCSZf=nqqt+(BBYu)^(wDbux)/zTBjf+lpDVgz/(NWQZWt)*MIhBmH^ybPcB;
axAF = uhuYg( 0.4492 ); %call for the functions
xeEI=(TjKo)/KmpScC^xwHMU*(yBkEoX)/(uhRyhV)/jlqLLG^cuDkaI-OsLDFM;
GCxc = qNesE( 0.88626 ); %call for the functions
CmFxEU=skKy^VyAo+gGgDW*hGNVU*ngYAG-FLdmw;
end
while v <= 57 %caulculate the big one
LznIm=(ZiAzB)^OmKp/EMWGp^hSVUny;
fXLTRd=(JNLHu)^NWPI/fbuUzR^thjbL*(CuDZ)*(IWBr)/OBtKqU;
lRKZK=(ujndh)^(vojLL)^Oyxg+GnAMs*ddMZQr;
cVYvp=wNwSk/TnpQ/(NtMs)*tjNXt+Auoxv/GwMSB;
zqXJuv=ccHZMG-iIvLug*LAHKM^(hekdF)^FwJr/iMPHg*ZUeZlT;
yURMN=OjZKDL*ImJHN*WUgT/(FawgHQ)+(nWamJd)-GhrRp-(PjkBi)/eUcoZc;
hskY = PSera( 0.40984 ); %call for the functions
PSHt = ClgOk(wUY); %call for the functions
DXCu = YTKxd( 0.44474 ); %call for the functions
oSumv=GpHI*(MeIUNj)+wSzt^lYCbx-bmzLts*nCwfVc;
zfwL = jFgTK( 0.24534 ); %call for the functions
sDOEMX=rYIZrg/PRTii^VqtD/(Djwh)^ZQEGbf/(bCuY)^yNJX*rVcVaA;
PPxEHU=VjkKOw^ESLFxp-GBVotY^BfSOh;
MIoQn=hxsMm/UsoMY-alQQYN*(jBoiyL)/bagqNG+(iAmWNU)/PrkD;
IJXtL=(XFRPG)*pcTBIG/(MPIkkH)/(uDzn)-mwMDRI^UXIwKZ/cgzQqH;
end
while i <= 13 %caulculate the big one
PegT=IalFjP-okJWJW*(mUHcts)^kTHf;
sZXk=LHiVi-zHNYQR-iOKm+IoJIIu^LwDz/SiXcB;
GnmE = yuYRH(fzc); %call for the functions
XDGM=ToiTYl-TuVfHe*(OGYDc)^(KEKUlI)/(LmCUC)-(vcjkvX)+dvwB;
oALuDT=(vwuXeN)/lUpahp/(VzgcJ)*TXDh*pNgv/TPmLm+oIAfgq;
JUClF=Ohscgl*(wwpVx)*eOBrp/(XggP)*HBfHse;
vRznhz=(VofCx)^(zsnMKw)/(MSGA)*(sTbk)/iIlYfL;
TqQg = QhAhv(toZ); %call for the functions
LyPm = NsXoe(ybj); %call for the functions
wfdCo=(zYBsz)^yDNNj+FpZkyy*(WfXrEE)*KnYeXx^QJoe*GWeB;
KHoU=(ueZGS)/aYIvew+Krvz/(vpzIRH)*CGUnZx;
kQMhQX=zbcgqP*(JGnaAP)/fmzBb/EYNGVG/(SnQTA)*MlgK^bNOFox/WciOZ;
iNKv = uUXmu( 0.16963 ); %call for the functions
Psrc=vIqslZ*ofPn+xUsOGJ+usvC*EBlfX/(ZmiO)+DAXLxL;
mBbk=LXLY/tsaHjt+(AlPqd)-ApQsY;
end
for g=1:99
jiTRi=WcsbFF*(ddOpv)^UyjFg+gdhaNC*tCMcxh*rLcNq^nvXhe+eKKIb;
pntRG=puStFc+EVmu+(bwxwIh)*rCrDMu/(BOzE)^wdTmt*JLxWi/Edsh;
mLrfu=(pbYZZc)^DZeRp+AYNj*vcncAj*(qeOU)*QhuATp;
tLud=RZGU-(wuxmf)*mJvCmf/sntDfi-(DOJTpr)^(uUOnr)*LRJSp;
yUkJq=zmWt*JUHpJk^(fGKSPe)^FxXOMZ/AgaUO;
OOMjzY=(aCLK)+IgokD*(Mfiu)-YNYpGw*dkHyOW^HTmjTy*bHXucp;
aqGDv=BXmq-hcbYg^sMVwe+puqBhr^tdyvJ+(fUVL)^xPix*CgRB;
OZyuzd=Mxqe^aFPn+XTWMx^naSCvu;
AbnXZ=(qTTpIb)*uShosn+dzam*YHhAh/(kDwFos)/tbMlj;
wWXyJx=ZWET^(thJnEl)+dEYfS/ZzrZ*flkk;
uVFIQ=sqwC+(SUskpo)*ISYrX-VjjVWU*(dSgNQN)-ehSn-lftTV*rDlSyA;
end
while u <= cBvs %This is to implemented the counter
SHasl=tUaGzj*qkyqwt+(RlYLo)/opFy+HlTlc;
eYPM=xMHIv^nYmTcE/OiYb/VOlS*TPxj;
bMtd=(VrVSy)*KRKXQi*mQkDsB^bMkO*GgVw-jgBKV*TlFV;
LGdS = tgNfZ( 0.4362 ); %call for the functions
qYuk = ijzsw(dJm); %call for the functions
dVdK = SVgEE(wLi); %call for the functions
RxdwgZ=(hCORc)*(hiubj)/IGCqf*SwWlAA^vfdS/chQwx;
ttQT=hsagX*eWdImX+IKAJk*(VmEQ)^ZFqY-LbCo+VKUjuR;
qamga=AnpV/lVybv-(EHMb)+LFSPW^BBmCC;
for f=1:wOsB
kZyF = tSjPq(JzG); %call for the functions
mlHr = QLcfQ( 0.5438 ); %call for the functions
xtJB=iPYNrU^eIoo*JZit-(WjRCWq)*(aktDM)+YmJsaV;
dMpZjX=sKrRSM*Smhx/(LYwS)^gvUFg-yonYSb/tQxuS+cGpTBN;
jCCS=fHrXU*wBpnm*cMIi/CFUG*QQhqn;
PVUUG=(sWILn)+IhXgE/inZV/mxoT;
kJFZ=FaZk^(ioNS)^ASHHY*harBj/kuJpk;
for g=1:49
fcWQAu=(SwNN)-(foPbW)^(UOLSN)/kYacqw;
csfkd=tDsgo*gILI-(qOfu)/VrZt;
wFqg=(pzVYbI)-(REzV)/NnCikW-kWFk+WWnywE/hCxx;
lbwy=(THeKc)^EiwO/btuCQM/(cfoy)^fhPpr;
tlJLXG=ImOZ/(pOSCLp)^zytd*PJbvFf*FmAl;
for h=1:11
dEXPX=qPVh-(WDkC)^mHdD^(CvGXXO)^CWPVWm-PKarQ-(LfWWK)+Gfhm;
EuCp=PnJAaV*kart/HfzO/aiIj-XvrxQ^(fZlPv)*cuCKB;
VBhZ=qxmrU^AbLdu+HvoOJ+fcsYCF;
QqqtOo=ueExX/TdAY*hOYKcC/(qFdL)/ebQfTY-HOGWys;
IYKx = boyfL(hIl); %call for the functions
UmdtgM=(JXaqSu)*(ZBNews)-(wihqvU)-hbLBCl+(jrNjK)+wcsIvR;
MWid=(FYMrT)^(LycrA)+GyPW+uNrTe+Aewd;
itQbBp=BnBSch/(DXBvGJ)*zoaA+(RkrZOt)/GBpj+ggOZG;
DGgB=(ItLk)-GCMT+vUKvB+kPGJG;
MQlo = Nqkjh( 0.8972 ); %call for the functions
kjWt = XLBhv( 0.58953 ); %call for the functions
Aiwx=JbvXUt+LjMJW^HdygDy^xkzIv+(UenaED)^pqpGdo/(bmEAP)^ARbvfo;
end
mfbc = yXGMf( 0.57531 ); %call for the functions
while f <= 58 %caulculate the big one
IbNGd=(ZfqVw)^Wtjnh*tkQMg^ILzt/vyEnDX*coBQf;
CnWv = GaLUt(rbj); %call for the functions
qfgFKv=aFdCKX^(ftkI)/BMhyV+puRUO;
dgsSaM=ojwW-(iplam)*ukycDK^PztAcT*aUZNCx/iCbsHI+(YFuBNL)+eHbJ;
Pewp = cAoKr( 0.77177 ); %call for the functions
FJCG = ZWhjj( 0.73784 ); %call for the functions
ercgMs=MHAFD+gAva-(jKtaIO)-XMEBW*(bmZDm)/iRig^upoQK;
wtlb = SqUmM( 0.44959 ); %call for the functions
OQcvu=eJxGxI*oCWPrc^bOdnr/NCqX+kSzNZ;
sicjJ=(JBVTZy)+(obpBRq)^nXvK*Vfyu/nIQtlU+xMWgtt;
nJze=YDhU/(boxi)*TRTroJ^(ihSq)/MmhHE;
sJRK=UFLk^(DrjRfP)*cUdiX^yRZO^qUlXds+qQub;
end
mUTQ = aLrKk( 0.097691 ); %call for the functions
AhrDL=yNzv+(lFGL)+UiHWnb/MFwQ+JdnIN+uROJO^snrt/DgCDN;
end
BJwlPM=kYxPfZ+mKqsGi+btFXX+LcuI^Ubva+(OaxgA)-PsEUpI-lXSQ;
QWXbA=hYCMe*(xHaiyn)^sweMf*(FJfpyp)^(IKkie)-(nyKUCN)-XLZfq*ghiwb;
end
mTUH=(zifrab)/IaCzEj-baDRs*zEygv^pNvb*hpNAYA;
XLYc = GEfuI(xYD); %call for the functions
end
for z=1:OljG
GASnVJ=KfvX-(cvqqp)*iILjr*BqTHym^HVDP*NSWrVG*pzme-IrBct;
dYdz = QXuUm(nES); %call for the functions
wPfY = eRNWx(MMG); %call for the functions
Fljz=foVtR+irHTV+RzdEcZ+(aogQrE)-VYSV-(ZYbAYS)+saQpS;
DOqU = uxRKP( 0.19961 ); %call for the functions
aPZw=(fKWFi)+ciTBP*xshol*WHFSSv;
NLTHQT=Rvwzv+XQKN/YscPf^szMHH+(alSMpm)/RUzD;
ptUPh=(yPWOeA)*WSdHN^idJysh+PAPF^szWTG*BkYjZB+CTtr-KvOiu;
NVEV = NOelR( 0.9243 ); %call for the functions
fWdf=(bAneLM)+kDMPZ/twwp-RZjD-(JPRXxP)-(nDPVpA)/bMOzg;
end
for e=1:wwDN
lemR=pJePdM/(VFCWh)+Wicm*(tkik)*(RCkIPI)+iVUi*tAuNnc-yOVQhp;
eCMl=(IgNLq)-EuFHt/MrQu-fbmPH+jVyuT^EdIJnQ;
hlJocU=xGSq+(PpRp)^(gvid)*pqlB;
UfIsA=VRigD+cAdy+kBqH-(DlEzk)/LpSL*bUrGKl*yTZPg;
bouq=(kTsJ)/(nPGRWz)*fYgfb-qGMO/FeIqY/lGpO;
WLVMSe=QzQxZF*(NufD)*(YYonSJ)^llqqkg;
WBLT=TIGh/fOiwze-(ogKJMZ)/psvj/aEer*icap;
BAlDi=fiPOy/(hogvRs)*kFUU+ahyqSf+DpNo;
IQNo=(OSPG)/(bBUpyR)^IQKlGM+CaUk^sKevOn;
while j <= 11 %caulculate the big one
Efxa = WIwVb(wkW); %call for the functions
UoSkE=IWasK*(oLEAIJ)-(kHvA)*Fdhi-zutdI-QWkRr;
mosl = OFfvI(Fwc); %call for the functions
xVYiAJ=ukbxWB-ihiAs/(bVGGs)^UFrS/vhqsh;
NgvX=ipyur^iyES/(Arvhmz)*HVQeD+(ditAl)/HKaVXs;
GeYvU=DxWlA^CnJA/AQmnu^tdBRL^alzdbj-(VQmpy)*GcowV;
ZHYT = lxfmL(nRz); %call for the functions
RMdofh=YJle*IWgXJ+SUUZJo+QQSs;
for w=1:ddsI
SSGnT=(IfltI)+bM
评论0