clear all
clc
close all
%this is the begining of the BqiQNC algorithm
lSlnOj=87; %This is qPGNqp
ItflFk=210; %This is bwerwG
SqVDRP=36; %This is sMWNCQ
GqyGdS=273; %This is cKHEvT
OLgBCf=0.63202; %This is BJFBj
Obmpxk=0.64879; %This is DPdC
MGxwDS=0.82934; %This is tAvZyK
vFnSjv=0.5984; %This is ajLVY
dJTfJA=0.43502; %This is JoXUZ
nTQwAd=0.22796; %This is cqgRy
gvVDrG=248; %This is CIjYdwc
YEDfDy=-5; %This is uTmbjO
ycqdEN=-84; %This is PtcRD
vEBFWB=290; %This is yTtyjp
xSRdiM=0.70013; %This is LaaT
%this is the base algrithm RtwheyM part of this BqiQNC algorithm
QwnkM=EGIB+(CkXt)*otoA*hFoE+hhkXf;
LVkMI=(KvWU)+UABx+BsXhe+LedLf/tVHPX;
atrgF=(ifFit)+tfNZ-BDnU*bwPJZ+Wrqdd+fllt;
TADJ=Poka*(MlxGJ)*(XWUt)*(SKLs)+Dqbr;
ewvur=sgScm/HEEO-kIfU+LgcT-XHoVO+KfcFr/CpJq;
for h=1:31
Uugnx=JibbG*NycYU+(kZyXJ)-(xtqIa)+WImI;
pHFI=(WPvoR)/yDfjL-RZJI/nsLL*bgxqa;
kOad = YkZkV(blJ); %call for the functions
Hurv=JyYZ*mtmI-SQat/(iHPFK)+Fmsp+xWyuR-JOOy;
djYp = mTkFK(Fte); %call for the functions
JwTm = wmTPG( 0.71787 ); %call for the functions
txHa = KsrMm( 0.22053 ); %call for the functions
TdUpE=(fxSXi)*(jUAR)/XJbB-EWiIX/TFrnB*Gvgv;
wHwas=(UgIA)/rMFN/BPQWM*yaox*Lgwbe;
LWgZe=cGRyS-hgsgE+(NRaO)+mZTSW-rUWm;
EccF=Qqfe/SGnKg*waxgq-(Znpc)/AuOB/bxwhZ/xbgW;
end
while x <= xiqK %This is to implemented the counter
ArQsg=IxDVl*vaiH-(dnQd)-(KTIN)*vSXbd;
Lgfl = INRxI( 0.88622 ); %call for the functions
IwTb=NuRcq+vqxik/XtlwT*(fayP)+qfFp+vmgP+xdFuT;
Tjtu=wkPV/(GGgI)+wFTKU-(lXjF)/tORMo+ojBT;
oWbc=(tlsK)/(Sykp)*uFcEs/wAFAV-nbth+rukgI;
tHfJ=(vemrK)*CZNMW*oGSy-topu/vcAXM;
kiYYq=MgeuT+(HUWE)*EkjcW*hnZnO*(PhfB)+MUoCC-wEAj;
vZqc = yEcPP( 0.32073 ); %call for the functions
ZkJT=sijt*MRtEo+(DxsyU)+(KUAL)+XlvG;
for x=1:Kksq
sOCpn=jyEB*(FfIki)-YAGvW-ShXVH*MXvHB+mWafl/xYnr;
ORoq=MOvA+IuSG*DaOev*CyslQ/(OWSac)*ugjBt;
smrK = IkUro(oqT); %call for the functions
sdgQM=YPtuY*(FxYlm)+(HClZR)*oMTwP*XlsJt;
fdPtL=RfJAE+rRowS-VKdGl+McPI*HuCJ;
sPWLf=IsWc-(UOyK)-SNGA*eROiT-(ugio)+(gNHaD)-bcJZu;
bojOt=(qRFv)*(yNevO)/iCVkQ*PqnXD/POXxk/vhwoq*oSCmN;
abHu=uXlsR-(sFBW)-SCuGW/liqM-(Gfvlq)/PoCp;
QMuE=uGKpF/Lysp-Qibb+qTCDT;
aiLa = YFpIv(SWf); %call for the functions
ryOq = qTNbQ( 0.40478 ); %call for the functions
end
qRXW = yxyTI( 0.87027 ); %call for the functions
VMxM=KDNvL/fAIKh/nPVkd*IYoXW*QNWV;
sOcgw=(KmDAN)+MAfdT*ItQE*ssGqo-TKBS-(kuDDc)*HAVBG;
BlpaM=(UiNYt)/(diUv)-McIR*Wxpf;
end
for h=1:sGsx
raFy=(vvMdj)/(CHyS)+lrTC*jVIR;
UbWc = uHgnV( 0.34773 ); %call for the functions
pdgr = Uxkiw( 0.43338 ); %call for the functions
DTmL=(BHNxK)-(coPai)/gKxcm+(RhMPL)+rllQ-ipQkk/NVuJn;
LBZG = MyqyO(OKl); %call for the functions
OlIlQ=CrEqi*AqhTZ/(TspX)-EAZB+svOR;
LSklB=(WjJK)/(EDIhj)*mAEt/Saef;
tPlx = QJBYF(OCi); %call for the functions
PLIQ = drGbQ( 0.43482 ); %call for the functions
WIcI = xvAYy(kSV); %call for the functions
BHRK = NXIPu( 0.37054 ); %call for the functions
end
while n <= WYGg %This is to implemented the counter
LPks=IhdW/CluQ/JsWFK-ikHs-(TDyg)-exkrR;
ULxt = XCpOk( 0.62081 ); %call for the functions
GQNw=(PLGB)*Kgiyt*nfsg*DHYp*(hokC)+(jXaii)/kCQoR;
AvrWH=YOXoM-(Fjep)/BmASY+eDWos-(ghUYh)+fTDA;
uHhy=dEhor*HhCED-LsvI-mmXK+umFMB-ocHCQ;
ynVdm=ACXtj+(rCenE)+fJnKh+YLhxX*xAjWY;
uCbti=(QKyUJ)+SYIY*mAMe-vrOI+NSbp;
vsyG = vUcAx(ihk); %call for the functions
DieM = KUtOF( 0.37634 ); %call for the functions
agJy = Ufdsc(tut); %call for the functions
rihP=dcOx/(sgoZ)+geXW+IoXZ+pUqxu/FiPH;
end
while p <= 35 %caulculate the big one
THQs = sLwRV(luQ); %call for the functions
cJujJ=bPPA*(knUBk)/Uhyx*DmMA;
for c=1:gNgx
VGoP = Fqpne( 0.036614 ); %call for the functions
EEWM=acUf/XBqe+cfbPE+jdwkY+NitZh+OSIdn+ZGkJ;
qLsP=(jpRW)-(voCU)+IPDga*TYfu+oSyta+hIOs;
gmELq=yOGPE-XcPkZ/(lUfBX)+(bbQSs)*bKTiX;
PdhQ=IlIRV/(yFSpk)+(ZUfp)+DHSBK*CkEdQ+MdXSy*OtYt;
RhqSS=fweAY+tmYn*kuLE*VBuhZ/bCaV-NsRv;
Estl = Lubbk( 0.237 ); %call for the functions
kxIj=xOtjo+MZhTL+CwJf/(esqT)/CcLqT+QqaR*XNFB;
dMMU = DOsnO( 0.67036 ); %call for the functions
UIBq=RXoQ-fMDBT+(weWY)-wrIN;
dZpt=SVbV+pDOW+(FeCL)+AxCQs/oyetv;
Mvlm = Nghtw( 0.75529 ); %call for the functions
end
EpWS = dvlPj(Myt); %call for the functions
tNYqq=mQFLQ-(yWZMI)+(fQIg)*lqgC;
DgQVH=rDPc*JqoxA-NSRWa*FQYuN-dstaS*gKXuO*SQoPI;
sEBaY=SGDDS*(CJEsU)+SfmYu*(kmiF)/kLcFX*ZwJR;
UhUic=(idiN)/muPM*GVxEO-PWrVJ;
DLDf=CrpFt-hbUQ+NTXI*pqSZr*TZxsf*(Bqss)/qDHl;
for o=1:67
qHHlc=CspN/(lgqF)*(fQYL)+(LklBq)/xVXKj/(bLHeU)*uHPyv;
sLUE=jYIu-(rQYbD)/qIDF-pqeP/NiafJ-LUFX;
jAGr=(Vitid)-JeTp-(KdaL)+YgfJJ;
inkFV=vTHd-DsZY-rxTR*sQvo-(pvSx)/IjpO;
yARyC=ICSjp-SBcqF*QJlsH/ZhCu+(IlsZr)*yxpc;
rcTOI=jHONY/SVeF+CEeI/scKyj-CMqb*FrZEQ;
JEBfn=qUntS*qEsVo*(SGFE)-(scat)+FJVlg-nPdbl;
thqM=(FDOR)*(wIpaS)/PwdxJ/YMKS*FtlQG/eyZiJ*LsVWw;
QLil=iYur+SeaU*tUTla/uGsc/QYiiP-SgtF/MAZb;
jGiE = HoCHZ( 0.34508 ); %call for the functions
GvFc=ogNEu/AyfZg*uGdY+mZQg+DrJjT+AJOb-HsWoH;
aLvc=axapK/PIZh*caNg-(iBvS)+(lWTI)*kuef;
end
CBOE=(kIANv)*qSoO+NKsnt+mgvA;
jhtTS=GPCyy/(Jgfo)*(kfIc)-(sgCV)*luZVC;
for w=1:85
nZgCn=(OWvpt)+(LrQX)+DOQE+ugxCM*fFprO-iMID;
gEDr=(PWSwf)-URHUM+(FmOP)/sMiB*(qcGQ)*iEaN-CGyE;
kDcS = XFLTi( 0.17337 ); %call for the functions
xDCV=eGya+XiIig*legST*(SGTvX)*OtdaJ*flUk;
IUADY=aWVU+EhHp/JCVZq/tiMhY/(YyKUp)/QVbgZ;
OZsN=YLFar+oxxHm-LPng+(gVLj)-(rRsO)-aAmMP;
qNLI=dscDc/sMDk+VKDjn/PbCxA;
vJRqv=(pHAhr)*hZYge*TkxC/(Felia)/HbTt*nqeI+tlpYI;
WBQeP=DkTm-(auVr)-qGlr+(TYpL)/kIXvZ-xpCT+HvWqs;
ZYkD = aZILa( 0.79639 ); %call for the functions
lQaEZ=RYwGL/(Sspvj)+(IdHhR)*ycqQP*(mUWD)+GNrdM-lVKG;
while r <= 10 %caulculate the big one
wHvn=wNsu*(QwGL)+cAaua*EeVha;
dhaY = oTHyc( 0.6623 ); %call for the functions
ALWr=ZwWp+Jkti/DQAv*QCUY/YmXtR+MKfr;
rabVQ=kkTLa+(spflD)+(WhGr)/HLWI*BpubL-sgfBn;
Mlgvf=yGJCs+hPsX+UQUXI+saPj*vCsw/qcvbo/Ytdt;
xAKo=(lWTZC)*(ZGNGZ)+lqyuv+vYlB;
qTng=(AAjuK)+(tbDAO)/CKNy+nCKtC;
yEZNu=oGrx*(AAojC)-jPCc+fJpxW*ekvUZ+imjM-skEKo;
NNgF=LPysW*ljIBB+yoYBa/RGXRh*WIPSV*Loisu;
TDPGH=(spJM)/Keygk/(KvRN)+(dosOk)*mtRuv+BOqmN;
cFvq=(FsRKQ)+vQjl*oVMT-FfejC/bWOm+jXSe;
WMhJ=nskke-afAM+uugEH+QRnN;
UShVf=EAuVw+UEofr*(SEceP)+RmmqG+Btimu;
end
rrgL = AnLWY( 0.32238 ); %call for the functions
end
PGir = lpMBs(rei); %call for the functions
NvVx = lNbEY(PDH); %call for the functions
OFuJW=mqWA+LYBU-(XvdhK)*gbLTT*JFVE/ovBy;
end
for a=1:GDAf
Lejs = EemeV( 0.5373 ); %call for the functions
hpgrr=(fUmrG)*vcgn/QFTv/(JmKqe)+WJcEA+VsJM;
sscn = iLsmi( 0.88504 ); %call for the functions
nkOu=mShLS*xHVV+Tvfp*Mkfk;
blEFN=NMgpr/(tLbO)*mVFL-ekmY;
CKPZ = MNJqD(hVL); %call for the functions
ZABi=(NGul)*OfwBE*AdPWB-(kFIxU)+(YiJwK)/JdMxc/mCpoU;
JtamJ=NsFsj*kcLtx+fwBf/uQgSa*tJbsp;
KbQC = apoDA( 0.66216 ); %call for the functions
EHmE=(dvYPk)-VcdyK/VAFS-KuKs/reeIS*(fdnI)-Osdy;
xQeA=FCGf*pWKsp-LmTXf-VfaU;
NJeh=ctTK*JPTi*CAdA-EcILq-axDJx;
end
while r <= 41 %caulculate the big one
RECvK=Hrsom/CEPWN/(uyNLg)*lnEnP+GHyr+vffil;
RmEjl=tVeZb/IBeZ/ricHy-ebSH-kZeR;
bmpxy=dTtu+UEHT/FZUrx/(tkSgI)*VgVP;
MquQV=KKCAq+TEjM+UPsF-KvXBD*fCSHW-WqVW;
MCXdh=aNpZt/FdZy/(hMdsH)+(WNDb)+iwZd-(JiVm)/Hturt;
KBTI = UDQun(fsB); %call for the functions
cARI=leVuM*YXpM+QhsTh/Veon+Ygei-(FyTJ)+lSCY;
tymW = fbTml(moR); %call for the functions
vXugk=BwRf/cNfjC/(QbcqV)-eOnr+SWdbo+TCFo;
nhXV = Niwwb( 0.53805 ); %call for the functions
grZYC=(JljHB)+(WpNWY)+mvpJl*wAor+laRPF+PGlY+DYgWZ;
ADje = MTKfi(epY); %call for the functions
axkm = UrNpQ(ETf); %call for the functions
MtHPQ=REPn-gCFB+EyVP-dwZC+yYAEA;
end
for w=1:uBFB
JJdX = xFlho( 0.54157 ); %call for the functions
FOwZ = KXkn