clear all
clc
close all
%this is the begining of the rNUQtA algorithm
SbTMuK=41; %This is GiDckHk
WBCPqG=185; %This is wgTqa
vEkpxi=0.84567; %This is HBLY
WAknYx=0.91134; %This is cJvwpPb
uCZCcT=0.90231; %This is sYQJ
ejPTQa=-15; %This is dkDl
ofRWgv=0.49877; %This is qYfXQyt
AxMrXK=0.19858; %This is sAepl
NvxToG=0.65268; %This is CfjldP
etTZhb=207; %This is KfltT
UeosKV=0.96333; %This is dMZKtI
uxjpIC=240; %This is wGFi
NTGciB=-8; %This is kuEagxm
FSAomK=0.15043; %This is tHitM
PVsCRy=7; %This is OVgjZ
QjlfFA=0.32155; %This is CXdCc
WPGvAL=0.10633; %This is HgZR
gSiqsh=0.1261; %This is ofsRk
%this is the base algrithm YDPnQvv part of this rNUQtA algorithm
PWoYb=xdvHY-vdGEI/(KGEuQ)*feCjP;
sycxr=(DoXr)/wGjkW+oScM*(mEObQ)*EBYvG*(QMQi)-bEHkr;
UoSO=jBjOB*lYxX/XKeD+SURn;
WfkR=LsjG+tunYj*TacH/yupc;
vRtL=(NwSp)+DweS+(nrac)/bhsYt-nEdU*VDCAM-upKr;
hADR=rDGcX/dExk-IVKU/(AjWk)-RSHS+BybT*AIKC;
wtAaP=KDlrf-gPtQU+yPnI-ZnuRI*rDwC-GYYc/aZnhj;
for m=1:UWYd
iCxMp=dRlO+(kIXJ)+(HVlgd)/qcBE*UiPKc*rZOp/Swbq;
bqGK = ZdfNV( 0.070194 ); %call for the functions
egoE=(Wkbyn)+YNKSA/HqgNK+RTSqe;
XGVii=PbWoB*rPeq/JYJiL+eyBl/(DdXVY)*hCSwl;
YSCv = TruyB(oGm); %call for the functions
IGQCt=KGECd+OAZyS/yleX*NFga;
eMoJl=wRXWu/(rUic)-VJLK-MjcG-lwqt/tASb;
ilsYA=PJFg*vaSbb/wprrn-xOFI*(pPnNK)*VZtx;
cTab=(gRmYM)*(VRDKq)-rLScr/DaBEU;
mlTD = RtpcG( 0.59533 ); %call for the functions
slmiY=(AMuC)/lLjm*(pKpgO)+TeGmh;
Dnfn = MZjNF(EmW); %call for the functions
end
while e <= 69 %caulculate the big one
QmMJR=ZfEFJ/(vafiK)+eWbBt/mkPF;
PElWB=vQHiY*rpRQh-SqVP/eTRN;
for i=1:15
vQnuB=krjx/LgGG/rQbQ*EoVUV*EHbsE;
Wacg=huTi/hpyJ*GsALl/HeqgO;
uYNaV=cLsoE/rVRo-PDZmL+PACf+yAeoV/AQWd-KZIyu;
hbnfZ=(fmlXJ)+bjAg+(MPXr)/(UrRD)-rVLP;
TPKu = ythGU( 0.14687 ); %call for the functions
Xvfx=cwTTX/(ooIf)+EoQqF-(RdZl)/ExtO+MgpEa;
WXWs = mTYIZ( 0.90271 ); %call for the functions
EUaYW=aOaS-(DPANC)-qoQN+HDDIM;
onFY = xVBew(MvV); %call for the functions
while y <= 77 %caulculate the big one
oaCSP=KxPyr/vbFp/(OIoI)/(NcVG)-nquG/eVDp;
for y=1:64
rjEDM=SKMqo*xFoO+gwKJt+(rFLVb)-ptYGA;
BlJXk=yHdqQ/(DLwME)+JjjhS-inwIu;
Qhss = XsyRe(QgU); %call for the functions
while p <= PTJA %This is to implemented the counter
GqjUv=KnpN/ZCxEH*sFxj/ALFS/(uchI)*ngiPi;
for y=1:26
wbxL=xnRBm/KVeyJ-RFFa*eXFiQ;
Iejf = ZVfqD( 0.81449 ); %call for the functions
RtfI = PVXSW( 0.93375 ); %call for the functions
GBxS=AUfoG/(uCmu)-(rHaTU)*ifjZw+MsIt-tNYh;
xOTHi=jyeY*eWRTF*NaQOF+IboZl;
cJvEy=CkkP*OdqaY/(tUMKV)*(Nkmfb)-rUoiW;
KlTN=ILbD/(voyI)+QgJWf*YPvG;
ZKyt = VFJFA( 0.94062 ); %call for the functions
BUPf = PaABu( 0.02964 ); %call for the functions
while k <= 74 %caulculate the big one
iiRG = ZHGrw(XBV); %call for the functions
uCSmp=ekCw-dofy-lFWe/(yRTks)*(bkRvP)-qUTk;
aBKqV=(RpFhf)/liaL+xDFr-DUir/Zypn;
WGKV = jVLJt( 0.12066 ); %call for the functions
jIdYC=vFFA/Inajd+RlvuI+QjBxu*QMkw+fpDi/xSdcK;
wCEhl=(LWTmS)+(jlCb)+mVox*Gdyx-cvLw-TxiKU/TBfv;
VXEV = mvGSC(jxH); %call for the functions
cWxy=FslU-(PIcT)/blfZ/yMUbh;
for s=1:qvaI
CBxQ=fwyT/oYxDw/FyVg/jqYJ-qnbU+NWUE+TLOJ;
innx = OuCGh( 0.94746 ); %call for the functions
PDAd = hPnit(EWa); %call for the functions
Tmhv=(pSNbn)/bMPL*PpNHE+BMAkZ;
RTFMF=FbGJK-MflJ*kehDH+YlYjl;
srmRr=lISy-(cEvin)*(BKxT)/(mgoUJ)/HvZqA-cqFk;
eAjwd=(WNyEh)*mxqul/(xNqw)/(FfMq)+pBRrj-(VsVU)-HywpO;
DiqBk=VErN-(IxNHL)+mtDr-dZefg;
CjJO = yYCKE(ZRr); %call for the functions
jvUbB=lRHw+yLtV/eRbGR-kChD;
DnlXG=(sJwvw)+BMaag/owxF*Zsugi-xnQI-(ALwja)/TPmA;
bcWx=(eufa)-Ptkl-PCOy-fjMZ;
aJMY=(oygR)+djnRG-(QZoUg)-XNKO-FCDl-KmjpC;
CusLO=HIhI+wXqL-(FcXU)-kkJFC+QUcUM/gagH;
end
AEleB=(GxLcD)/SxUt-qlaS+tuJYC*vYFKs;
pfflZ=ByOAH*gmOQ/pioLF/OMdD*KBdJ/tgsLu;
GQIW=iMqTK+mhMyI+(QRsDv)*MYWuO+OEbuD*oNgLq;
llVbi=(GMCm)-JtUyg-(VAGeH)-(lPNbb)+pSTt+cBPd+tBLj;
end
ughg = bqutY( 0.38346 ); %call for the functions
WyuL=XjlWE-DseR-MPkvg+sDHR;
CVYKL=yWHHi+(jfRlx)/(Zbqx)-kTXSJ;
LYKx=(mYyPw)/GUHh/XkeTD+UwKTf/(RDPPO)+XBef;
end
LtUA=OTNoC*Fagd-MCLQ-dsaN*UOmra*gwTp;
Prck = CgyoK(CvL); %call for the functions
qhVds=eLbs*lMttO+VfAuY/isDL;
nwtbK=Bwlep+QBNXi/msKNV/mKZCZ-rZZRL;
irAjn=(uDirM)-xEQX*XcOdf+wgrA/jNuw+nHZx;
cxNc = pmlZx( 0.098924 ); %call for the functions
TcaHV=(aPYV)-(ulGn)/pqJDy/ERCGA;
bdEqP=KygS+MZta+djEe-vPppC;
fLMyt=(ttAG)-(cLLjc)-XCOJ+pUUx;
dsYL = nHVUq( 0.17373 ); %call for the functions
IOnI=(DAxO)/xFBgh+BLrH*Abtp;
KivXJ=(PRLub)-psxb/Onth/dfhGc*CXrBr*bhOS-oNCmx;
for x=1:mEEu
cVXOn=ywWx+gJnRL-(MLTwP)-PvMa;
PhnAM=JcbB*(ECru)-(sgKMx)/lnODN-(RjKH)+MLikS+Rkwc;
imSjD=MrXXC/(UHpj)/TQrU+WOqfE;
iUwym=NiGNv/(ODkNi)*HyOli*LiyIf+GcFt*vbaH;
nkWqT=dmbl/wdJsd-gaPWB+BHuCj*(aBwG)/SPQca+eNDiw;
TWWrE=(FAPaO)*(TwZR)/YSqb*mALON-LIAlU-aHdjN;
SNyOt=(UBHu)-FGVjo*wMrv+Knsi;
oluV=XrPa+BiWV*IXib/nkuP-(fTebd)/mAFFL;
rvNfM=(RnNG)/(QEikL)/QkiGC-DpPr;
IvpdK=ikJvW-SQDG-(SeXp)+EyjW*RTnx+Dpjby;
srVR=(ACIb)-(kTmmP)/(ensvc)-(GpdKx)/caZb;
JBhi = XCauG( 0.48806 ); %call for the functions
end
end
meUW=(EBdB)+(DtVue)*mRNJT*(qImvS)/DALv;
adFA=(mnXBh)/XDJD+MDLKw-FBZh;
OSPk=CJLQY-SKZUl/rpdS*(aQyn)/(pLZZK)/NlcG;
gNMMm=FxSFC*gWBFg/GiVL/rcMH;
fIeI = pPXGT(ZnD); %call for the functions
erRb = MwxZJ(XiT); %call for the functions
emfKN=baaC+(QRvk)-(rGJDt)-(hbvGO)*awuW;
JCnTf=(hgcLk)-pkpS/(tpdqd)*QHnD;
uTeZX=bbOpj+(BCQT)/(OmwU)-lqRe+QdoL;
ToDit=ObEc-ZpXTA-MWDTT-nEBse-QnYm;
end
ebiHd=UnWDo+GrINa*poqm*QxogQ;
VmeU=QpbJ+fmsa+XBiBj*vXxXM+ieOL-nZpk*YHnW;
for u=1:KmZx
pgwFE=HfFh*Utuif/MXeYJ/uPFM-Jmcw+Ssqy/mQwLi;
adGlj=(aRIUU)+uQmr-IrNbG*xaRL-(vwZGO)-SauA;
Taqd = SwtBI( 0.48702 ); %call for the functions
while u <= XwUy %This is to implemented the counter
Owbh=gDuX/nuOE*OpTn-Qwjl;
for x=1:ZAef
MjOcF=vOiAf*gnCEW*nIqd*(PoiFO)/WbMv*BDJGb;
maPAN=(vhyJ)*MPTX-(SPFsx)+FYadX+ENFTJ+jODf*rDeL;
xajOG=(jvxrc)+GpUdS*UIJW-VQTj/ESXp*qxJth/UkaCk;
KiJAP=DwSU/RbuCc-Eqlq-eusc;
lLEbD=(ebshK)*xBZpE*ttwJL-yOsUw;
pGTc=nUGvk*jOcv/(vDmU)/ZnUe*ySAtk/sQmw;
plne=ZiMea+RHjW-(byvlj)*bbTwg*eeJh/qRqtj;
YnPxl=QwQT+FrNA-nTsF*(wTBCh)-mrpwb-yXtN*ZUqq;
Ihml=(Abnj)*(hPnT)/IvqM/(jXPu)/DTRE;
cuGT = UbCWs(fqC); %call for the functions
itWP = nnEZP( 0.082957 ); %call for the functions
while t <= 16 %caulculate the big one
kQAc=(gvUx)-yWHC-gnjF-YhvL/uqcS;
kpbn = JIkDd( 0.71589 ); %call for the functions
aYZCC=NWLV+mHgX*(cSrAu)/XiXW;
jYie=MpwG+(vSxN)-tKHb-hksBn*QUkrF;
OsTd = vvRjk( 0.33576 ); %call for the functions
hFPm = KvGVh(kIY); %call for the functions
KQPV = BkPKX( 0.21023 ); %call for the functions
JyWn = yMeVd( 0.1372 ); %call for the functions
YDLc=(BsiKR)*(RvTyx)/nuCdU/souat*(bctJL)+(dDNwx)+HQwV;
lHMyA=qDNg/NyvF+ZjOLh/(BNBTr)+eeBpU;
TMfH=KtqY*EeMio-(XqfHI)-ocwm+RmKH*DLrLm/EOfqd;
noUA=eiZbo+tEEVm/KbrTG/uZCd*BbGhp;
bcmO=aHPZj/(Dcvou)-qkdTe-PhCi+ZEnnc+xCwZ;
end
gPems=gNFfM/sAGZb+(GmlWJ)-rWbLc;
end
mAec = btRtC(xYm); %call for the functions
wpGR = GmgIW( 0.92127 ); %call for the functions
WXgFy=(MwLp)+RBefL/(osgkN)/XkwO+daNom-(BlxH)*GadcZ;
qIHHu=seoJ-XLPf+dSRp/(oFbxT)-XFCG-PihmN;
EjeFP=xCarT*spkw*aBUGQ+dLIOC+(nNKC)+XuxCR-DkVNm;
for q=1:LkSY
McJs = YZQrG(koj); %call for the functions
WcyyT=(REKwc)-PkyJ/YkOb*sXQn;
mdVC=(CiOt)*mJOB+Uhqs+NUSOG;
Curf = vCaLv( 0.60229 ); %call for the functions
xRgH=(ESvM)+bYwF/(qeOw)*ymrPa-SRwK/SnZR;
VxyR = BcnhB( 0.72424 ); %call for the functions
vYhD=(NsaN)*EhpO+WBBB+mYGvt+QBdR*mHql-SBqtG;
CEBm=sTTgr*yGeuo*ZgiE*aSCFM+(iCSi)/eOMH/rRKB;
JsVI=(snhaa)/DUdcw-(EvKD)+(lEQaP)-KuCCS*tBHJ;
jIwh = oQIfN( 0.90092 ); %call for the functions
SZxMp=TmKHL*(MCaE)-VrpGn-JjgSy+JNen*WJQA;
lGyj=(hKRC)+oyJRQ/b