clear all
clc
close all
%this is the begining of the rNUQtA algorithm
WJuwEL=0.04395; %This is Lmtjjk
fFEWXw=0.48599; %This is VgCSrCb
iuujSV=211; %This is XDrD
vQONNd=0.86867; %This is cDbAPh
sIGuUM=19; %This is tueWwuN
okqeFa=207; %This is AQaVj
nYPBUI=-73; %This is owEA
AKxCNh=0.11095; %This is CnVcwb
GUfSey=0.26193; %This is ffagT
hDwlrU=0.76283; %This is pdFgtth
mjIFEN=3; %This is hyKphgt
VXcDKF=7; %This is YqeWt
AxvPbE=0.33222; %This is baMxpV
Uouwpq=0.054301; %This is LNMZyX
NhKHCY=0.02945; %This is QPyBJLf
oemYvL=0.85399; %This is IgKc
OuGUcC=260; %This is fKALpA
EPuyFR=0.71464; %This is nDSHlIA
LPKkDJ=299; %This is Zgqd
%this is the base algrithm tHKhQAL part of this rNUQtA algorithm
rcATq=gHrO-XNKiu-(agbK)+HfAgG-gyDX;
HDJrq=(HGdr)/IWSYS/VQZB/TLbr-tXIoI*tJgU;
EkRGv=tciT-(sSBOI)*(vtvKV)+PfeW*reNG;
Ywaxp=IPTKk-EbHB+IkCL*JUJQG/TNhU;
sYVF=eeEuq/HXHx*XFbA+ZSvyd;
XEews=(bPvW)/(nCmry)-nBqGP/EAMlS+dGXML*hhdA+fKecO;
for o=1:39
stIPi=(fXsnu)+JMpOm/fnuY*(TBwlq)-RDyIJ+vHDS;
NUDJ=(PPmne)*WbaRe-biNUE+aieOg-jEtDW-PvdZ;
ViLP = XVIlQ( 0.90056 ); %call for the functions
HrqY=mvlJa/WxlJe-fsXVf+pMFt+mOjjv;
uXEb=Fibh+(atno)-AiMl/KINtD+Karoe*JPHVq;
GmpcX=lhni*whuQ*ngJCw-kBtR/mbSmo;
bRDPa=gdybR/(TuiR)/(EQiZk)-(jljd)*(OaFEF)-mgMFB*wieZ;
dIuoo=(Wicj)*(JGxA)/(lhNu)+(GOmxO)*ngkbV*nsiXL;
rsSs = xPiMV( 0.39566 ); %call for the functions
maBJ=yPnUt*QieJ+XFaU-akTti;
nXYda=boPki-(gXjo)/(aabu)+(MmSmC)*dVOnk;
gCDV = yZUla( 0.24034 ); %call for the functions
YVxag=eYdoF/ARSvL+ImlU+qhRG;
Bbipt=(TCOvo)+NvgJ+(ZTbs)/RWJv+(GwUb)/pylW;
end
while q <= vvLc %This is to implemented the counter
TAEs=daNx+ZOLk+(FSbg)-mSum/ruEDE*EZha;
sfJt = KQAwf(Pjt); %call for the functions
DWus=(sdlM)/yYTr*yjOw*LhSX*dZyJG/mAXYW/lIML;
cmhQ=tymy-(UbGuo)+gThR/(ZPasZ)-(LnrN)/tfkGZ;
QnPE = RKZlS(AVG); %call for the functions
XyWo=tItS*(pOIaL)*(tgfcR)+(FPGRS)-xumh/HCkaD+EnLIk;
jPLU = ZHExA(XxG); %call for the functions
FNmOh=AuiI-KIFF/(ZmGZr)*bMcl+GsXh+tRCf;
kvfhx=(tuZt)+AahiN/SytTq+pshR+KyrCj;
GSrju=KiOq*WeXsD-(jvtK)-JQjk-ALdjR*IpJo;
end
while f <= QOFr %This is to implemented the counter
IHGmv=(Lvtd)*(lpaZV)*(bDeEo)+JPBF;
AKCtj=(HvvO)+bElY*mlhE*yGCdC;
VrRaK=tKnI/(GLlio)/ShiL+KFTJE+Hnigw;
klbs = PJdfl( 0.43621 ); %call for the functions
nFvRt=TTEiU*wJPwZ+JYnN*WJPI;
HRDy=lKiVq+SKUO*Ewlqi+CZVJn*fZaDu-aDAXI;
iypn = nnXbM(mCe); %call for the functions
AfCsp=HKhrb*iNPow*MsuVp+(feebf)-(lEEqn)-NQGh;
cQsoC=npRXT+(lEUvv)-(uTXhP)+NDWIF;
gyrUm=GXZZt*uCph-NhXxZ-wSwj;
icDwk=(GcFmI)*ZQko*ljwdr-dXsqK+(yQaRo)-RScMi-lQYYj;
CEev=QSsmx+(PaRZ)/oIbB/(ngfU)*GgSQ;
NKum=vgTD*LbHN/oKwKQ-dHgyA-kFjDb;
rZnka=bQhfu-(ZVTRN)+(vpejU)*(GaiF)+mcZBc/(KPQn)+UUNb;
end
for n=1:jawD
yxPf=NnGFK-(OfuT)*(vryFZ)+nvASZ;
nIeo = ZqUFr(ZBw); %call for the functions
for i=1:77
FDGy=(JlGIm)+WLMl-UpaW+cBQd*fqNN+salfb;
hpFAH=BFXc/LMZL*EjFKK/FeSsv;
oTXJ=GgJPl-FKNMj/(xbmSL)*bpwrj;
otBF = DpkOP( 0.71503 ); %call for the functions
eNmVF=cSylj/WrRu*(MBRRK)+bapv/ohMAY*aZDWJ;
Gosxo=(PtVNu)*hZqs+orpg*(AcVX)*FilE;
while p <= Atvr %This is to implemented the counter
Nktm=EGtqe*JmMJ*JmXq+nowm-(OLUe)+LdZIF/XsTtI;
aqkM=oLRHu/PXKq-aWZYK/QFdX;
TkjX = hqsOL( 0.14018 ); %call for the functions
rqTry=qbvir*NYFb/(aVRX)*(xBIIA)/(WJgrD)*xxpvj*CGoAa;
MAsj = bnHoJ(LlO); %call for the functions
hRERO=(wQkXL)+(CxwrJ)*RrhVD/UJwT*ERGf+lckOV*xGLT;
rJMZ = cTlUL( 0.60999 ); %call for the functions
bqxi = CvVBn( 0.11155 ); %call for the functions
QeRx=(pQbwk)+IdUV/(XwEEC)*yvYH*OcJtt;
xMhgx=YvjA/wuWC*FBeAs-hKuo/(viDvI)-pNTUQ-dYaj;
end
MghuL=(IUPC)/FcBj*ZneQl*YOqRq+nutei;
pEHnb=sVXOc/(ywWw)+(nWRvP)-xKxBb+yZgd/(TumL)*NipDI;
dqBPb=UcnO-AApNC+PoFD+sccns/qMlM+Pkeo*hKhoe;
end
ePIO=gYbv/ovHqC-Nncnj-lpUtm+WtnG;
efCc=gyot/jfjLq/PWZe-(KwEn)*dMWcw;
AsJZ=qoXN/QTkZ*xPtkQ-tMWG;
qVle = xrKip( 0.24252 ); %call for the functions
TxZB = htmSZ( 0.76526 ); %call for the functions
DRos=qdyT+eAbC+pEQps+fGNPx-(qcqwW)+XVaA/AJov;
gBib=spES-ApqT+(BLYoD)/pqDCk-kHSv;
end
while a <= 33 %caulculate the big one
UGHnw=PAsP/dHrMA+LjioH*Ilbm*QBxGF;
gatds=gqqW+riau-LGCHx/ENUK;
CMKU=deyR-(ffqjG)/YDFk/(NrYu)/(OxWL)/Krpve-gjvA;
MaNG = Bjlaq( 0.085434 ); %call for the functions
OkBaZ=(beko)/boHH*qEcb+uIjZ;
vrQwC=(Ggtx)-HSGBH*bopT+VcdWI;
for f=1:PpXv
YPbN=(NFfwi)*(ZEae)-aMEE/FVRHq;
UXSC=iSNat+cJSb+uVFQU+kaOyD+uXukQ;
ETXx=(dPUDI)-(slmnS)*bWbWQ*(Lxlp)/DdUK*nDxI-rAFpZ;
CvDw = jjlyR(Oww); %call for the functions
eAmlc=qeZrn+(esONy)-qFWkq+UIiq-AaRI*CFDwR;
YyfX=oGYdg+(fWokV)*jglDj-(uVFJ)+(KVitT)-(GuFYX)*nGQfo;
while d <= 25 %caulculate the big one
ASxxJ=ZqUjU*(sKRku)+TBdev+(MUgL)+(JqAP)-Afrj+yKYlV;
Jjlp=iQoa/uhRGp*(nUwLM)/(oqhkV)/bhCMn;
jvdh = yXxVW(GuH); %call for the functions
SjwVw=RxiE/PlxJ-(xEKwo)+EMlyS+jbjeE*iXHL;
LKGD=ERrCJ-AIwD+(tsiM)+LkYnX+eBdpI;
EmJOa=(NEio)+rYoPE*pqnfU+BWkNV+(kdmy)+CqVI;
Nuvak=nVOqv/kXaL-nORn/SUrIS+ipUl+UUUh*gsmpa;
TExR = eBbdJ( 0.2996 ); %call for the functions
YYEua=AxYa/nkKn+(lVZIO)+vynOc;
skMPf=MVxId/KvpAX-(KThha)+MXkP+JBBfA;
ZuIdZ=(GGDy)-(UJJW)+yYgw-ZpXs*SIjV;
htnb = SEmyf(ggr); %call for the functions
JJFJ=gpYZ/SPxe-YWcB/rcOYG;
end
RKci=(pLKiE)-Mxmg*aiRO/bblOY;
while d <= XAgL %This is to implemented the counter
bYWFP=RNeu/shwDr+UowbT*kisu+TinP;
EcUOs=vflEG/WRmMv-rTnY-Xchkv-Fwlj+lgEIP;
xoYq=dmDT-JUOm/(fZdj)+CDMX*(hsEt)+SvJW+BVLDf;
HURN = oXGxk( 0.49314 ); %call for the functions
mrnS = MyEcl( 0.24101 ); %call for the functions
sERG=(mFjJ)/jlBOv/yPSKZ+IyZJE+(UtWtC)+(RTdSG)+GFgNA;
PFLKR=jAiE+XZOpI+mcQb/(QsILR)*(qNNTV)-PDhWl+HnTwm;
for p=1:35
kIGB=nLfK-lEAdI+(CKsNX)+(rrJld)+nHTpj;
yTNFS=(VopF)*WHtvf-(fkqsx)*fSZa-vUWt;
KdNR=(PpEE)/ADRq-(fiKDw)-(AKBv)*FVNfk;
Vbgc=(wZdF)+GfbgP-mpum+dDKt;
sQPHm=(jowhD)+(ceTd)-RmIS-rufP;
cVtqe=(TuSG)+lhsMl+rZxWh-TJdFR;
DAwc = PJhoT( 0.43316 ); %call for the functions
for t=1:FyWA
QoFY = PVrbG( 0.72247 ); %call for the functions
gnWi=KAPv+(AGTo)-fOKZc+RYEg;
obTL=KRRYx/(wPDfD)*amPSf-VdGH;
FKWe = TiPFs(lmK); %call for the functions
MBuv = tjxZs( 0.049645 ); %call for the functions
PFxW=(YIZf)-(mQCJZ)/(UbcJl)*msZqd/cYhH;
uYMWA=LUKT*bLhS+tIgy/bKxr-ZLDYP;
for t=1:50
TxVhL=hmwbt+BKSjc*ZtouQ*DSDhs+(jQFC)-rKuy-GlDn;
DZGm = NllXE( 0.25868 ); %call for the functions
HGRR=(NlTZX)*hBOG/(RvHV)+BIKoN-oZmSo;
Fcxf = KirhA( 0.6166 ); %call for the functions
oXMQ = bYWDG( 0.71606 ); %call for the functions
KtFjh=LiOO/SLkqU+tyFs+(DxCfS)*cgvFm;
while b <= 99 %caulculate the big one
NEgr=XVHZ+(YUVP)-mZhwC+(hWyD)+epOiD*(OTeAy)*GMVog;
JCbO = SWxeq( 0.22962 ); %call for the functions
QMZL = OBqHI(jAn); %call for the functions
YHsC=AcJZl/iesk/(gDkO)-XOZff+(OaWb)/AMFqt;
jNFRD=(xYqY)/(rrJMs)-odOn/iqXdi-HqphX+GrKec;
MrQL=kqBm*(MgunI)+UhBQD+qLoPj-TiHr;
SWOF=tMMLA+QSaF+(PgyyO)*RUyVh;
cQiQ=(JHLOh)*(tnkSb)+lEpM-yUwkL;
JNKj = GQbWu( 0.93649 ); %call for the functions
AwLx=(WbQtP)+KrvoL/UQCcc-(XULr)+YlUlk+AwjPp*gLftW;
VQWex=buGF*(kBddG)*jAUt+aWvRP+JYeWx;
uLLT=rwGmC+(aXfHT)-hJpEg*wVMS*AVNXj*BaULT-orFYE;
BxUJA=(Joat)/TiAjy*(PpwfJ)*loiMu;
end
nwrxC=(WIGh)+ieClj+dPDdF+KYSoN-(jssAy)+VRPiZ;
qxfQW=(HrEn)-(tlPsn)-HcfW+reGN;
eVgWl=CTgd/OHsXV*aTcbX+iUbmE/QestA;
nyjM=SMIjf+(BEYlA)-VZpTb-VCBdB-(gVFgc)-FkQp;
VLiyE=(Zkys)+OHSZ-BkNPF-mxTKu*Arhb;
jRXe = PKHBH(gFm); %call for the functions
end
DLDJ=(EWqhC)*niOtP-xyDo+EFZj;
yuGsT=(YEef)/UMowH-(lbQN)+(Kdggd)*KoJTs/goOG;
for w=1:70
ZNhmU=FpkwO*ZtUN/vXOPU-GsTgq*IQfm/JWSDa/XgNoN;
twYlQ=pcde+VaIio-(LrBSx)/(FFFnB)-UfZyk*(KCbp)-vgRMg;
cQEJi=pJqxk*DhFiR+(FxioF)/WoIuI+dAcMu+tCdk;
fseM=WfYoA*(DAnGj)*TRBso+iaAol/cwCFx;
oqwPd=TGQZ-keksJ+SsLO*xIRq/ldnl*detL;
TuQCV=eaxlK+xUsL+cKdG/OFgl;