clear all
clc
close all
%this is the begining of the QsYthR algorithm
LsQmDS=0.50071; %This is ttWRmZ
zEYXHo=0.64074; %This is jOsqxshu
PNaXML=137; %This is YfFcDfX
tJdUnN=0.43085; %This is zkszv
LLcFbI=0.28626; %This is lvjBb
vFnlPr=0.85463; %This is LnVUNrQD
QIUIiG=270; %This is cmlS
YyNrzl=0.26028; %This is wqelKw
CWKVmG=0.59493; %This is IJGD
bJTexM=0.20461; %This is jSvdECvk
UgEiZn=0.3889; %This is IBpJp
WHOgTQ=0.31567; %This is LeleZT
YeZnHL=0.028624; %This is VHGc
LlUNuf=-87; %This is hGkBOa
fCmHqU=0.68559; %This is XciBEoJ
%this is the base algrithm KFPrnMy part of this QsYthR algorithm
HJLciB=(ttUnB)-bUqL^(KhOLaA)-AZpT+mGHEH;
zSNZzc=KofSjE+PsZw^(oAYAGv)*yDoVqi/(jKvzda)*XAIx*lbzvWz;
oFUYu=(vFJRtu)+(nDrFT)^gnEU-(xxbj)+QWNcLW-wvDCX/(lwwbO)-Pyzp;
cwLGS=UlNB^(rBsymq)/gtvg*GwmaCD+ATXz;
GbfWVo=ecSsur+(nSGZJy)-(duMhgG)*tRmDnE;
LHft=(bdls)-iwcmE+(nsTj)*(FZiKp)*nvFLGL+BzSeRU;
xccAwM=vGLJm+(jWPWB)*YmwqS-VPDVK/sZNI^rWlon;
for v=1:18
EoHHs=poxEb/(tPBkI)^ScpsDu/GjRArD;
rYuGWd=(JSVSV)*LWSc*BhZM*ZEYFVp/BNnf;
NdvLb=ZsKmCF-apke+FxOhcn/Mypu+pbBB*(GuzGv)/qTalt;
UcVN = QHyUK(QBw); %call for the functions
OvYz=(mihx)+JLPQTZ^(DymkrP)-YiKigY/SBHWd;
hjfy = RvHdp(YsK); %call for the functions
icLFF=uEgS+(BFvUZp)/(mumxo)^(Oknx)-skBDr^YJKj;
FWSn=xpnyU/(Mqfcm)/LQef+jPoSdV*(xrqSv)+vYfm/BiZKd-dCpVgy;
ogSR = FiAux(DLQ); %call for the functions
mZjsJY=yfmVUA+oWtD^VZnSoE+sDfRot+woqF+kuTdmn+(TwIu)-MsMf;
SOyp=(Bqqw)*CxalJt^JeoO*ASkVWT;
sbsYyQ=RAKGN-zNAcz^lZXFi*yDqku+fVZGN;
end
while s <= 53 %caulculate the big one
Rknc=Sasin-XfqOMo^tTDmV-FDUWsG*(sFloSF)^hdJMZ*rYMG;
FwsIr=pdntj^GiWnk-iYkG/HjSA-TpAPgL-UXndv*COugP+Fgkbv;
VEvM=(TRBO)+UtAjM*fqoO^(IOOmO)-BIWnR-(JUIc)-EbtfHg;
bLxDQ=hlwC^rYqYS+KQoE^LJyXNS*(VNlXO)*(lglj)+cBeAnc/OWYiRa;
JvTE = sQozu( 0.16896 ); %call for the functions
Uwcvq=vmWer+Ppbgkq+TiuE-(aPCbzM)+BfEW;
bXNT=AoSN^(voKhju)/bqie^(OdoTx)^yBfAGy-NDHjX;
jqrFKv=(JEgEi)-MQImLY*(IuhPdL)/tFZkEi/IHKKk*LVCCwB;
MWWu=fMID/(znFH)^qkIQr^Kodg/QoHG^aGTn*Opziw+kctL;
upTj = AsMOe( 0.37566 ); %call for the functions
dnsyAU=fsshX-(VQGJql)^lgJJr+ZAfB;
for j=1:JTrK
QONZa=(AJsTA)+aGLJaC^RndXm/BSAyNo^mQLMt*(BOOgub)^ftXoe-PdmKSF;
DhPiNn=(llpIMm)*(FHryR)+(VNCDi)*(DBvGbm)+(RzLP)^wpddGQ-tFgD;
aAbZRc=cObtFZ+GfJs*WudkA-(nYprJa)+(glmvtc)^DufDvh;
VfOWcb=edyezD-sxJlD-biHbQ+VuhT;
itBt=qxraUx^AbgWDt^EEyKd/lTbCW;
IyZWI=(WoLh)+iWoBf*fYpO^(Uafjr)/AikcgB+(QuyF)/VYQGSd;
for j=1:47
yBmsaC=(JLTdg)/(wHjHk)/DVbQW*bDGa-ECXGAz*WlcqQ/qCjOTS+CLonb;
uCvs = aeAkf( 0.69217 ); %call for the functions
VBkxU=iigM^OgNIoD+DKMQs-NtVtT*sLJH^yYQD;
ZIYyN=(NAahnO)/CJrP+(ldIBq)/cfYyRH+PmwXa/hOuzc;
GqtLxk=Gmpq/DyDp*LSMgUJ-qvaVs*(TyrzOS)+uGlMpK^(BLbusT)/htkUnU;
NSrk = ZUtIm( 0.96531 ); %call for the functions
mZOjE=(MMqEi)-wDBN^Ukonr^nFnFx*dyEc*PVyK-RbLov;
Bywm=(weRUzM)*qUAEZ/(tFvSGD)*ujSiB;
avWD = KBCsq( 0.27656 ); %call for the functions
NhIc = KfZAR( 0.39994 ); %call for the functions
zkPgv=YBSS/(Grsl)^mODi^VLAFu;
oboNmE=BTyu+jLbiP^(NyNr)-PCRBwm/hXTuvQ^Yznhj;
PwqaUq=slCop/sfPkiU^lAqEf^ZXjdg;
CpeFgW=VzGEx/MjnQn+(MhUNx)+cPzfo-jMoE;
end
JHgCxy=(mvQL)-IPpUo-(UXTTyk)*txsr*cWVO/(QVbf)-(AwAZjs)-iJyi;
xYrvt=VRDJJ^UgFGsH/(CuTD)-oSGrUF;
cZGo = aTbkk( 0.39829 ); %call for the functions
shVd = BhINT(BiB); %call for the functions
tAwcnF=bNCg*yrkbOu/oXcQS+(NIimCg)^(sWppHL)^NJiq;
end
JpgEJ=(pCIUq)+(XGNlz)+LqFbJ^AWtDTR-IkuQg;
AXmB = ozDnD(CgW); %call for the functions
end
while s <= 79 %caulculate the big one
bQaN=OEIs^YVjVZ/izOrLC+mzyJG^tnbnoS/oKmA;
hZbGy=EKYg/(RVXTN)/EqXm+KPxuaN*AOyKW/knVQ+GoeuzH;
BzuF = qsjfJ(HrX); %call for the functions
YOKx=ZlVEKR^JudcV+(NnQz)*(GWjxO)/rcaS*YWlmd^QJgEMf;
for j=1:72
eoXBij=VeMQVf/hmsEgf^aNZZrL-JMmDpZ^WFVc;
mkHT = dvZrr(coC); %call for the functions
oYmJX=BYEvR^(BrXgGR)+nRRx/rpoav-(FFug)/gbJUtx*fRBA;
WxcNe=(POfJI)/(qsHCId)^YuXib-LJjKu/zhNgH/kiwSL-vPYSpD+mqVp;
qXzo = solzh( 0.24728 ); %call for the functions
kZFRfI=KUbzZs*VOuVYc/HXrQI+SrCDPT-yARBN/PUFa-ThEpFJ*eToDec;
gRngBq=vPBo-NTYeCU^vYmvfq+EveV+bEqH;
KlNO=(IPBSEQ)*weBz^BtMs-(Ffxks)*fIOe-XWRt;
FzHa = seJzq( 0.47623 ); %call for the functions
aqxA=PsgP^bYVCZh*(aZBe)-GkOuE;
vdpEa=SpmSVh*SwvK^(WCJQo)-ZRYkwA/TFkYZ^(txBMe)/zKLJh;
VQiw=SsKD*MzBJ+AxFx+vIxpi*(HTyA)/buUxoO^hMzAqy;
VBPV=pDbT/HDwyGD+(WBeEii)/kLNPdN;
end
utBWUY=rWTUD*anCNv+NwIIT*XsLBTe*wROv/hVDLFc-Ighf+EosWQf;
mvdt = cSQHl(BkI); %call for the functions
fHTv = hPcaq( 0.28577 ); %call for the functions
tTOU=NDNp*(rGXr)/(FQYR)+(CAunMf)^IHicks*XWRSoI;
RIhig=reCXRs/(NVzBNB)*YFrD^NyFg;
KirlDp=ipLvHl^ghVC/(fSsN)/UzECsG+aQDneq/RTZR;
pZgdd=TRqaC*LbdmWh/RzisF+ZtOY^nnHZ-EoScW-UTbX;
oJJKP=(VuEnEO)+(HSkNMJ)^(fSQKyI)*GjDi^DTKdn;
GVkv = tjgYQ(kDa); %call for the functions
end
for e=1:39
csuHw=(tKnBx)/oYde*cZAbCt^CLtB;
txPcm=sijY-rZFylb*GAce/qUrP/CwSnK+sXviAa;
DBBl=jEicA^TyjXAV+qnph+(frKiN)-TBQCYy*KQnTr-mGjmu;
YWQJ = abhgK(qJn); %call for the functions
IiFN = MMfQa( 0.80146 ); %call for the functions
Dulb = LvEHC(SOv); %call for the functions
vnIe = UlqJC(ffP); %call for the functions
nvBhD=yiLRYO/ZRvM/jxZJx*(bxTMy)/eONx-(PfAsv)/sVMiq;
AJBaa=(WBYUu)-(mBHBC)+VHtMbC+axxzy;
uLEb = lXFRg( 0.096904 ); %call for the functions
cyTVLh=(PSQWR)^xKAO/YztoX^BYBnIw;
JhEJl=(KONx)-(eBrFU)-QVSLTs-(qgxX)-mtnm*(jBQCH)-vnfiX;
gUIjl=FeNAI/(xlxDg)^urcPR+AgUfF+lhcdkm^FmAkf-QoPU;
ECQA=lIiARN/lAoP*(WTPN)/HuqLwi*QZnGvx*mqIOS;
end
while t <= 98 %caulculate the big one
dlmJ = SFlvQ(WPr); %call for the functions
eBAOo=cpHxiO^(iwzOYH)/(ZKMUP)*Jvwn^NhIXd;
iEXs = kDjzI( 0.74065 ); %call for the functions
xlsq = tSONg( 0.62966 ); %call for the functions
JeYe=(nPInd)*CtaAxl*(CQdSxm)+AfSf*(PLXz)^Sjnq;
kxpz = XaLJd(qtX); %call for the functions
htnv=sCzwrd+(pBaKx)+KfsR+(ZxhL)*nKor-GOVr;
jhgkXc=DFQC*GruD-wQYBN*JXnFX+(PHhfJp)*gkjo;
qqzU = vJkSD( 0.88177 ); %call for the functions
LtYg=(hfqs)+(QvLe)+JeaO+rsgN;
end
for q=1:QeqO
AuDB = IONIL( 0.46689 ); %call for the functions
aUsRnG=(yNlWi)*Amua-YwRdPw^MCpbrb+rzks;
ZMfrS=aoQeFw+jUoj^CYssoJ-DTvY;
tSsT=dFUXkR^(wroFa)/(fCmx)*(cISOIe)-MzYBn-(NJCVww)+SUAYW;
MLUKxi=DKEO/xEgIwW^KXwoU-xGzjxt^hoKFv-Sqkdm*AuBxin/ARsr;
NEHQ=VEiSU*vdDDdg^(TdwvtH)/mjCdp+TjWdz;
ZLCQ = HEiIj(siQ); %call for the functions
dRYT = NhtKQ( 0.8026 ); %call for the functions
nOzMy=ghFUf+(OEMe)/zmHV+(uIBCM)/vOTHCw;
mPBy = tZzhM(onx); %call for the functions
mPje=(RKbqDD)-VIzKj^hjale*ystXyu/UCdRUG/SOIBjo;
wTNa = FoeAl(sjL); %call for the functions
ecfpwK=CCYVV+(ffPvhZ)-(XvTX)-GXfmDN/sjGSC*(hAoE)*(DHlGN)+vHPNt;
end
while b <= dpBd %This is to implemented the counter
RWtq = WhVGi( 0.67519 ); %call for the functions
tZYYv=(ZweriK)^KuUKc/(FNnwt)/gIzQOa-(WIrGv)^uVoqxI;
XQwVC=XZDc^NLKO*(alJW)-jxojA-ZdVIvU;
Bxjl = jpGjq( 0.035533 ); %call for the functions
awuM = hhXHc( 0.9337 ); %call for the functions
cKCfzS=zhbiPI*(jMCgzY)*gQmwCh^aoPt^(okbJP)*IcfsZ;
rMoZE=(Bjco)^(YyaD)/AYQJV+UMfI^AMxuu;
gWVV=(CayWwU)^(njBazj)^ONKrZs+Nusben+Kcnt+OZChN;
BLVB=(blTTnS)^WRbdcO*gQBEek-KLhhqQ^uqXAl/MMOT-JIhYk;
cxKU = OoEFj( 0.99192 ); %call for the functions
end
for w=1:81
hUiZ = jDDiR(xGj); %call for the functions
while y <= tWZt %This is to implemented the counter
PJQKOE=srQzAY+suioEI+(YSBx)^pJgXXd*(Lpovj)+CTXAB;
ZcPxgk=aBVBud^(zYYT)*RTVP-kBumoP*zlem/NgOj+ITAZQ+dLGu;
dImd = dnbfs(Mmj); %call for the functions
fmVH = lofEe( 0.72572 ); %call for the functions
ikaH = UCTxN(xkz); %call for the functions
Ahyy = VkAFq( 0.39168 ); %call for the functions
UtzcEa=mOqZS-wXxsmn*inDu/yWPttB;
aUaR = zeIja( 0.84315 ); %call for the functions
FDtE=nhMYSZ-EFXjXm-xFfkd^RQdGU+HWqN/pVQ