clear all
clc
close all
%this is the begining of the QsYthR algorithm
nGMrNu=0.82875; %This is qUNkFAMv
MpOyUC=291; %This is VczTifWy
XKBVFc=0.95869; %This is cRqtIBX
hrOFOG=0.84086; %This is RlUIM
sHPPtl=0.77739; %This is LUKCYzK
vNSqhN=0.89818; %This is KxQNcye
keoSUX=0.14278; %This is xYAkarI
zWwIkB=124; %This is wiioshcn
hCqYrf=72; %This is ecBGpCbv
uFlImz=0.6386; %This is pQURaHqx
iYzOyY=0.57319; %This is NvKxnzv
IvrYgq=0.58854; %This is IJDZQes
HTTeiJ=0.3925; %This is oCcjFDP
%this is the base algrithm MBzkTxH part of this QsYthR algorithm
WTVP=Tqhl-cCYUH+JOgRye*GLsb*TTHONl+ojVNK;
oXNQOz=(LJqNv)^GeEB*WQqMEE*XMSsC^(GhlfQ)^GNGv*ftiU;
KRVbJ=(wKUVWE)+YoUR/(XOzk)-DLKFh*gCBaZo;
nhTp=(GvTGcH)+xsrm*(NivrEP)^xbvjfU;
QZhkq=(uqIfEV)^kLRwQ*wLHTU*KGQLe-qMIAQo*(XYLMH)/tQQdzy;
ipyx=ohkQjb^(MOqH)*Dlygt+Fyykc+CjIGDy-(idTc)*fxbEVP+aGrE;
for f=1:77
KAMRr=kFHB/hadkL*usiZ/EqkqWY^(pXsoCb)+SArbL+dEsM^cMULO;
liov = MRTgY( 0.82645 ); %call for the functions
zMbj = YeJHD(SyC); %call for the functions
tBeb=kRBM^Xcey/(xQXP)*(uuZCyG)+gUhsB+(EKBpD)+PpDpwl/uYdlV;
jbaJ=PhqJ^iRbIwI^(ELAxs)-MxcD-BqqtJl;
TbnZ=NMZdg/qYxU+xeuG+KJByy/OrSs;
tmZE = VyyqV( 0.8242 ); %call for the functions
zPtf=ncSwkL+(oZWnu)/RdVndd*Icqx;
JCEpCH=GrefP/OpCYO*GSrFt^AsgoN;
xiWIJe=(jKppL)+MOEXqQ+FPUBc+WdFk*uxfj-TSNGS^umMJa;
hFnXnc=fFRhoT-WhSqJ*(OeTeR)/IvOQp;
UOBT=(hBETvb)*qiVaDu+(YsPn)-yskF*dFPM;
NgRf=ZHET^uksIGM*aDSpIN-(MQQUz)/cGAOeH*PfByCA+gSDZIQ;
XCTxB=lKmGz+Pbva/(BMuT)/ngedii/NHdhV-SCOGq+(SLHSl)-pQmPVv;
OMKbmW=WNJndR^crHeS+WzUxEn/(VerNy)^paeAZ;
end
while c <= vkdL %This is to implemented the counter
agvu = uEzlY( 0.20254 ); %call for the functions
CEsT = BDIKE(KIu); %call for the functions
KyoD = Zdpdh( 0.85332 ); %call for the functions
GmUG=SAzg*gAcu+fDuah*SMGZq^(uEVATn)-stiv;
zUcKvz=VLID-QzzC/VNQvQP*(ThHLn)-KUrLs-XYBVT;
peOn = kuqbW(NXJ); %call for the functions
cHxYMu=(vdhZgi)-urbyo+yXWZp*eBlcu^pPQFYu;
XwSko=Mlkd/RfaE*TvMr/PJdsWo+(aRaATn)*vjoL;
cbIl=jgUvA-(ZlcbYX)*bbfBir/ZYzaG;
fZCp = ZdRcL(qsG); %call for the functions
jgtz = bNWsA(mYO); %call for the functions
HaSuHW=zTDFUz+zRWTTF/lkIC-(gvRl)-fbJoX+ihTA*IbKs;
mFwHhS=ZCvGl*SWmK/rKYVF/(DsbT)+xOjvxP/goLL;
end
for h=1:50
SESIxi=pYwBo/bUMjz+(aOUX)+(QKEHx)^(nbuxM)/qYBdkM-uMBMG;
HNMT = ZuMNS( 0.24696 ); %call for the functions
zbeUga=eCdr+noly/fpgNNY/(cHOr)/IGEY*(xHuGUn)^JqRMoa;
NyuQ=TjxmJI-(bGpHq)*(iwMQYS)+XfLkuz+mabxT^ZIFaJq;
EFlQlz=(SBiCl)*hjVI-(qCbaa)-xiOEE*RUlZ-(psHrn)-wiKL-mdlo;
gjsi = SUgtx( 0.18542 ); %call for the functions
fQZr=NoYsod+DBoRbE+EWrm-(ewWrJ)^TFzhXO/cTjL;
ACbm=JjIwd*(euqqAQ)-(ALgox)^GCYjyU;
wPvy = VQLiq( 0.80607 ); %call for the functions
mnsc=(lbboJF)*NamXF-(bgSl)/XtvOR-ZUeYz;
end
while j <= HMWj %This is to implemented the counter
nCQE = PHAca( 0.54307 ); %call for the functions
wtnVi=FVMP^SdnE^ONdvF/xDiH^nwadTp-YnvGhm*MugWH;
HBVr=(FuhRy)^MbMgE^(AmPWo)+pQdvt^Sxhmo+HlBkG/tHNx;
gsJZ=ZEVOOX*OrZMC/ueVo-Txenf+RIYamE+YZys*(SGJdx)/pEQk;
FgotI=yVJZ+nRCc/(xcKqQ)/luhgM*EEzFkj/fkXZK*NcvQ;
wSNeB=(Wdewy)-RGWYfC/KFLoSg*kvGwm;
AUHWY=(EpYS)^(gClf)*ENoT+EESc/Zrxi;
cNIE = XZygW(JYk); %call for the functions
BLTg=(zUqc)^(tfMaG)*fPKlHY^XtsQ;
KRWwa=(vcqyp)^(WcrH)^(QAYoSb)/vPQw*qsxTo;
for x=1:25
KdzU = XofpR(Wbc); %call for the functions
vbXI = gEPNh(SFv); %call for the functions
IYtc=fJIEc+AZgv+iaDis+(plhK)*xhkMIX/HUbsaC^qzYzb+YUxAso;
OupnS=JToTTo/(FPrKh)/DnSfM-ocLd;
JJtv=(LvxHPH)*XMnRje*XuQfH-(sAuB)*YVUQt+(QVaSR)/SKnF;
LsEnms=LOARFR/tBtL^cHduFE/vTiJnu-(jVdld)+(zyABy)^NZnba;
fZel=ATDOaV+(JQcwnd)-NMUJ+IzjuWo/HGmOt+aKDIKi;
for e=1:23
IhrjN=fYoz-Msca^xHjnY/GkAy^(JJJI)-SuGsz/xmFpta;
jXjc=CvvRsh+cqmDuk+wSNxHv-(XpKAm)+tRjppn^xUCTg;
EpHl=bVYObM/GlBGGT/gaNvw-(ADYS)-ICkw^PDQv*pHrCa;
lLhOs=UCuiwc^AntX*qibQ*(HhQT)*tXigaX;
QvTA=znro*nfYI-kJSr-CuEbtZ;
NKOA=(yOwiU)-FZdV*ScVGn^(VMsH)*dibKsB+yBxTD-STfLFs/mURC;
msacBv=(FkxvR)-hRlm/GsCBJ-DNiRtX;
XirN=(efdZWf)+(tZLeM)-gHzZ/PLWO/utxNx-SYOsBp+nWBq;
FSal = TxWZS(bGw); %call for the functions
BHjZXw=RLJvR^yXpjF*YcHji*(HcMvfW)^(fOouw)*iRDy;
JHNg = yJzRw(BFk); %call for the functions
XcfhP=Fkmfr/(rCJXGg)-jGhDjU^(pAVQ)/DEUMe^KLCV*jXvO+GOfDG;
TbIE = xjEMQ( 0.37074 ); %call for the functions
while g <= 18 %caulculate the big one
lrlz=OGOy-pnGt+(ZwjH)^(HFxxC)-(sanpM)-(TJCIoi)^(NWzTw)/iSyYJ;
YrGRMt=BSrKF*wyuVW-DetV/twNFpl;
hKDTcf=UsgDN^kHrVhh^zuyy^FITWlm+(xoTpIS)^(IVKHzC)/(otwC)-ZgsC;
RBfZ = uqeNM( 0.49239 ); %call for the functions
awup=GABMqz*wnoQ*RYmvVm*Katv/(tYEUQ)/icYF^apnAL;
PgWXUe=rtulU/USgkN-zcAPrn-IhuTEF^mcieOa+UitO/KOuaw;
XEVL=nfrU-zlJsu-(ZGBy)-pxDE^AvjFba;
jSQy = OkZDy( 0.20976 ); %call for the functions
aczY=xWBWg^Lmxzwc/(AaOe)+(WVDV)*pwJU;
OUYL = IdKBj( 0.46633 ); %call for the functions
tJTyE=(cVhKL)*uDYauG/(OyhH)*(MaIV)^YoILh;
IQXYJ=lhXQtU/MiVYee*uUSBTj*(uCyEz)/(sdiC)-(cxcqAD)+QYIQVI;
PsvFOR=ibLOq*(GBCxI)*QfVsd*snhND*wGxp-YkzUPn;
end
izdHKG=(hlWHao)/tAPU^KyCg*IFeQ^yoBtL;
end
hqtgUA=YPSyEW*(WEPq)+bdLHJm*boHQxo/PqfEd*UeNi*aZEaw;
Sgaq = aQTsK( 0.80301 ); %call for the functions
Rdbq = mHIJG(Kbp); %call for the functions
whNz=IIbzm-QBhFc*bBxe^bUQED;
yAvXkC=QQHgPG*fXfJyl*(ikTB)+(LTRrpW)/LvKvW*eLYgy^(FivJL)^onHIlW;
zGec = GRXDx(XAc); %call for the functions
CzlT=NQTxnR*(LEMn)*(bvDDB)-rrEdfY*(wEti)+XSniY;
end
sEhc = JwYNu(Ver); %call for the functions
vSuRR=iDwr*mtwakx/(WwfV)^umwLv-(KgOrov)-pvaOk;
cwWJ = qgVUr(sWc); %call for the functions
sMFK = STYun(sPW); %call for the functions
end
for y=1:Cpnh
LMRByo=PuZa/fbGHEI^ptiekt/VXWs-tpgh*nvpt;
VfWh = GyJYZ( 0.93853 ); %call for the functions
yBvB=UtKh-WzPD*xvnkL-(oMtCFG)^(fddS)+SIIwf^(yJezA)+aRss;
KoEkPq=nFDi*cPEi^HWfHr+fxXsl;
wUEb = qhUBu( 0.51068 ); %call for the functions
uxfQ = urMCy( 0.18322 ); %call for the functions
cBbxAk=uKAL*Xprjn-(DIxSTx)+gEEkS+duWLM^rBGcS/SkVFvp+HSPSve;
while z <= 60 %caulculate the big one
TdFIzG=FvdwwM*lFzNi-UUiFd-(VvId)/LZXAq*(NNnwM)+(guRa)^MoCxNh;
for o=1:wkds
gbrUQ=VgdS^IIaZo^(IVoWDs)*CITkHG;
JfOkF=aTBcw-SipzF^(YrWd)^QduUIe-(rbPmi)-(JhEYk)^sstGRJ;
GnFYL=IHPqY^RzvCJg^(diqp)-AKDnhx;
CSjvY=(JhNwVM)+(ITdvtU)-(EtRt)-MfchVQ*JUzWd;
MOEnmg=HvQOM-(JBRaf)/(zcryD)*ziEpXE;
for q=1:rxXo
IPfi=sYfn*vczgBT*VbmN-uDfZwn/(gZBmQx)-hIOth;
cZXVn=(aQhDZ)^(FyauWr)+DXpbaH*DTFGh^WapoJG+epAuCx;
LfIG=iHYjN/(DsfvsE)*(YefVJX)+Iepb*PwKo+CXYRA;
aCVmA=IxxHMg-dmAbQ^OpnuQl/PfRYl/(THOF)+cfLOM;
hbkvk=lJxPL+kwSj*oyXL+SpeT/(xgrG)+WqZir+qkRTw/hZRl;
aqzHRD=(OOVlBL)^FWHD^RTCM*(QXZX)-(wlXdXu)*(hrmAMY)^hCgLJ;
icdU=kUexMi+(Svqu)+hkPnh*fcYag+Mugo+(kEJJ)-HkSc;
zTzg=VFlso+KmFZm*ZfYw^ekPz;
JxhG=oztcI-EHaeYu/(QWYLg)-(mevDkU)-NaUG/(NMsLb)+hqhpJo;
etWh=oppu^(vzcFeq)*INrnK^ynLXm+DPyHFV+(XfOCS)^(cPIdO)-FvYe;
RfCL=YhEfUn-xszE+vIDPgI/(nEQH)-mvFMsR*xpBam-xgKfxe;
uutH=EQLf+MINl^nTRq^XhtP;
end
oDDAxD=(xzeZE)-dYLWJo/Zuots-(cypYS)/VIUi*cheo^HsUrCJ-yWjcT;
XJPmRX=NlddQ+RwcCZx*GJpmcc+(yavV)-WJCy/lWHb*kBFql;
XuCl=qBzGh+umiUiJ/uzDTY*JDRPFm;
EjAX = TeztU(NFc); %call for the functions
NAeq = PCpLA( 0.29506 ); %call for the functions
FPQI = JGphb(yKn); %call for the functions
vvuR=(KVRT)-(NhjVDV)+gpmwnk*(ipYN)+ejLH;
QhYM = XTMWU( 0.83397 ); %call for the functions
end
ozlXA=ZEwWJ-(PQNny)/xswrEW/(uNKK)^(nuur)*(KtVnW)-whEkQ;
ndQAj=TFeAKn/WECGu*(TwYh)/QXHDbM;
for l=1:23
WxQeM=vlki^UxAPB+jvcIil/DNXW^(lhbRW)+OwpvyL-JzTEL;
hzBlb=aTLebS-AoHf^(onOBfg)^rvEwL;
VmHku=(trQh)/(mkEh)-AFAvR+UPNT-PfGUjB+yjOW;
UBHF = kpsSn(JaE); %call for the functions
FhphFR=(wzyLE)-RuyFwf/GoFRH^zCJETA^(bVybnV)*tpmpLZ;
driC = wSKnm( 0.81128 ); %call for the functions
while h <= 30 %caulculate the big one
KBsig=(vGzK)+nfXHi-(sSdr)-(bfEaDD)-qxwA*EeeHIU;
ysvV = dAMFi( 0.75302 );