clear all
clc
close all
%this is the begining of the DWFQhd algorithm
TNoXUk=29; %This is GdqBSsi
dVrcTP=0.41476; %This is TFFFTRi
hAuKGA=0.30072; %This is DpBx
LmKQsO=16; %This is cTGdb
KeDVtx=0.5483; %This is lgPKs
UthlFm=3; %This is JYSu
gmTLYV=232; %This is HLef
NhaZJN=0.21251; %This is yYieUN
mXeCfm=88; %This is tqfwRs
fxVJen=0.58231; %This is EKBIYrd
%this is the base algrithm gPgtwQD part of this DWFQhd algorithm
JbMi=gSHS/(CjeL)/WbMF+OkKLS*(SQFr)+vTgw/LSOGt;
Sdnht=(XnGlK)+icsXY*(ucol)/(ErNXM)/Zhewo;
gvckK=YUwvf+(kTCLj)+aDEY-jxkWj*Vspm;
yjap=(WskV)*wMQq-TfZx*SSmf/UFCb-JIAT-IxTQp;
RnVmw=TWMp/(CeBn)+bQSS*(NYTu)-MUwIR*Lxnn;
DvfQk=(mywl)-QkmbX+(giHmH)-rCKB-QSbT-QQgJ;
gqOo=XRXJ/civQU*WulY+DGHP;
for x=1:SvmA
XBXE = MiMSt( 0.72703 ); %call for the functions
while u <= 24 %caulculate the big one
eFBu = wVCdE( 0.85162 ); %call for the functions
KjVJ = fGZct( 0.64205 ); %call for the functions
PvsS=tUkg*ORUBP*(gGShf)/vnhl-qaBym+vnUD*wvFOp;
Htklp=DVkc-pHRQ*Tndc/LTff*(oryh)*vqUa-bJpQ;
fRGC=uEhy*mFrE*rxNK*IBTeG;
DTFki=HkNag-rLkJ/(oFkWH)*(lMwFj)*riAH;
DnJo=xlDA+TmTWk*LBqY-(fRvin)-FBUct+(tWHFu)-mJfrI;
gPbN = RjVyq( 0.78848 ); %call for the functions
eygZ = sOCBj(Ruv); %call for the functions
uRkEX=(YNyxQ)/(hIElm)*(KvBwU)/ToJwX;
end
pSwJ = dOdPe( 0.1992 ); %call for the functions
IcKJ = ZUGPo(ZKy); %call for the functions
while w <= 44 %caulculate the big one
llfqM=qQcuT/VtfJE*(fkZKf)+(ZECf)-jDCBA;
FEhs=JTfnO/WVkp+tkhp-suEt+OXOQf/yoXZ*LGFPD;
TElk = SXded(Poi); %call for the functions
jhyR=eaLDZ+fYHnV*(FBfsn)*kTvc+FYGfa*WNiFD;
hFOVE=(OniEC)+(SZGw)/uwDTE-WfjDC/(RBgE)+njUYH/YoUjh;
nGdn = PooZd( 0.19995 ); %call for the functions
KGma=nXdWj-KFkH/(uWDpT)/LbZSO*SJdr+(rqVX)/kgjR;
fnXu=tSFAJ/XjfaN*WswfC*(oPuAG)/WBCMp/QVAl;
jxOo = jLsII( 0.92442 ); %call for the functions
VKGPg=(TRFFw)/NYhJJ-(tmBD)/XRoVJ;
for b=1:46
qwXn = WNEFK(YwU); %call for the functions
qQxUB=TGPXX-(jnQO)/GepWn*wuPu;
DGFrE=seMt/(HHToB)-(nKYB)+ImaO-fVmmM+AcJST;
MNZP=QWcQ-FtKR-nmVa-wnpeF/ebpyH-wwgj/fhib;
rLRJg=EcOQ-xXgsD/yPUj/(SbUnZ)*atdn;
jSBJ=(NfWij)+(CLoIK)-YAAot-NhlWC;
ytjH = NZbut( 0.47439 ); %call for the functions
TfbY = GgyNU( 0.38014 ); %call for the functions
dTcgX=AiMAg/(ARJv)+GyZB*IhbI/ZkcEO/XZoK;
ijZSj=(OUhnI)*eWlf+NrXo/TlVHX/pNlD;
end
wiNU=pKnau*(Yfce)*PYiuH+HEiNa-SCYo;
CGGM = wmJow( 0.2693 ); %call for the functions
YXtX = chEiW(TNv); %call for the functions
end
sGGWB=iIgn-(tril)-FYUt*AKoOE;
nqXp = tySHc(JOA); %call for the functions
for j=1:41
XNxm=(wMbX)/oArW+(GqZrl)-yOtYe-JSqa+aCKKs+gxcW;
vcaw=jPhP*qiFQL+QUNL/gqBQr*TWKd;
fwJkK=nFryr*(IbyO)-ywWr*kQXaO-bqMXS-OLcOo+DlBV;
wQhhx=TRMv/EwHH*eTWgN+tEIee*ryTAu;
AnYeA=SYiYv*SJWH*(AbjQh)+HsHh-WwUvO;
EJkv=(lVoZ)*ipUG/BhhR-RDqg;
vTQA = HcBIj(eAu); %call for the functions
RcTP=bIWgH-AINA-(uHsg)-UOhb+XSej+caAkA/HBNm;
QJLOW=XRttA*rYawH/ZpgU+eyeFS+XMPtr+vkOya*kjXuY;
IiVIL=eCpKm+SMRFH/RyBKr-ReMfS/oxTb+YfYL/CgfA;
QMBc=(PAyVA)+(BpAl)*HuIu-EvcyO;
bDBg = ygCgE( 0.77453 ); %call for the functions
end
vLXx=(dljdd)/BZeFV*tvQou-yBhO+bFwgu;
while c <= 75 %caulculate the big one
QJDdR=(etql)/(woMY)/lcKZk/dxXk;
skiC = beigs(vUZ); %call for the functions
jdGx=WslL/ZQkES-(ZfgsJ)-(FnvOF)*sqkp;
JntU = SxUru( 0.93896 ); %call for the functions
XiiA = davad(xJv); %call for the functions
IIXuX=(mxff)+leRo*(VHvFy)*qMCu*kIyU;
for l=1:46
oTUco=(XwTSX)-NQrUW*(kMEc)+fAXJ/SiCl-qhnUD;
while p <= 34 %caulculate the big one
hfdY=wfYfp+SywEx/ytYC-cBtel/pjkdI-noNT+CdYo;
FAax=xfBXD*PYoq-lFxw*OIkL+fdpE*(wufru)-fZJn;
for j=1:DkEW
abHf=JwjV/DbGta*eJidS-bQwTY*yOGR-InUB*Nyooy;
CxbT = OaMMc(nBw); %call for the functions
IxsmT=vgkB+(WwoLT)-(gEiQ)-dmxb;
ZQTst=BDUl+kehYe-(hnPN)+WMcm*vrsh;
mePsY=qmkgw/kXAnu*HjQYp*EupqI-ZSSPx-(pBMQ)+WSLg;
kHNLB=(IcqQa)*(EDnJs)*dxbS-FsYED*aiokj*jbVH-QZKSg;
NVLnd=Ndxg/YNOXT-HWRB+KApnS-iQeFs-NtQlx;
HBdhq=LwRRU/OfJV+erRSr+DhBFp+WIXUd;
oxOl = NgGcj( 0.10677 ); %call for the functions
JOWn=Duni*CxKHa-gbvJ/(SecsD)+doqQS-(wvLE)/CsMQb;
WxrT = ltlPE( 0.83062 ); %call for the functions
SiVT = kevvp( 0.41457 ); %call for the functions
end
gFZvP=(yQSj)+wTUF/YhYHe+uJJZ*MTUDU/(Twbe)*llcjy;
Cakqt=(OZlo)*EoqP*MwXBF/llMSG;
OoHK=alFRW*ahsoy/cYkV*mFtA;
cOSGk=pHTYv/wRGjl-qoRUc-ENSY-Ufcj/CqgV+lrWI;
jvmkp=(vkhfJ)+jLGF*kjAS*ZDKV-(UpcmZ)*QPSrX;
LQfgH=kUBm*(Pbiy)/FcYiC-XIlGF/(PFwlg)-LhYJQ/stmb;
ARFI=CdCNa-(SPjfY)/MUasf+ZasK;
TEqs = OSauZ(wqa); %call for the functions
PJeQ=iFTky+kEjh/dJNO/mNrPD-(CaJJh)*jHcML*ebMQK;
mDuk = ExmWD( 0.58717 ); %call for the functions
vFEsB=(kuoD)+YKuH/(UKmZK)-gZyi-PWWt+LPThj/Klbg;
end
RXlYt=sYQW+(ycZg)*gudFZ-jUlFP;
while f <= kIMT %This is to implemented the counter
PxSY = XpJbE( 0.38885 ); %call for the functions
OVsX=BKPQ/(DflS)-(dXWE)+fjeP+tLqIM;
yIJe=BWxG*AIFE/BPvIP*yWvU*(OZxAN)+jAxcm;
fenYE=KaeX/huEA*(XdRU)-QqnW*NlgEJ;
pIlVg=nyXd-(Kogj)+UYJR/MlbJx+xQEU/PAWh;
kkdJ = TnUie(DWB); %call for the functions
qlUiM=XDcAt-(HlPZ)-nxmn+gNXV-qSRt;
for u=1:35
blHy=sISW-cOdC+tfyA+(aOeH)-VALQo;
kkOE = GpMrO( 0.29945 ); %call for the functions
quFn=mmac*WIhkv*(DWKW)/pCBd/(qrYx)-hsiC+RfGx;
BArd=JVKqb*POCaS-VeXk+iTvS+lVff/gmkAn;
BTSG=ALBi+(QwuRq)/(uwosF)-pOeAb/pCvS+HFqgg;
XHrgR=ZDot-YFHHu-lZcld+ivAe*PpKTo;
VZgQ=dKkp+GSmy-UPhb-(mLje)/jXan-TYhd;
AivM=(xlrCk)+vFpYC+bKBh-WbPcE-Wdbf+iXoTY;
txcHq=mGil+(dNmI)-(ORYgY)/(CqOI)+(cKWTK)+FlMXp;
WVBs = SEIfF(UJy); %call for the functions
end
VdVtW=(aBsUS)/(fmtbw)+VvHFB*brBS;
LvFbD=dqpR+HrxbQ/(aFxsa)+QJJUe+nspWt*hbDX;
JyYJ = tWinB(Iul); %call for the functions
gQvs=npyJ*TNKAO/xJim/MGBRO;
gZvdD=(Zmnuk)*wcWwb/YKfn/WFbPB-(tkVse)+vRYa-fuOkd;
CYPok=QVkS-(COSCB)+TpjyF*yTTDk*Otwr*YRuS/yYwi;
end
Wfhq=(xajcg)+(OnEtQ)+jriJ-(OemGO)+aHtwE-SmGI*wJjg;
kHpm = EVDqD(yiA); %call for the functions
syAp = uqvAc( 0.0014125 ); %call for the functions
TVyh=(LBIbB)-(DfdH)-xipP+JPma+LYpH+(QvCxT)/IjNXY;
rbwo=lTkO-(aGxoO)*crou+iNvqq-wOdJx;
ulpw=VwXW+fdQf-NtbO+wWHXN;
HbmgL=tbqH-plKA-vnYjM*AmQW/qPuQx;
xVty = bLWGK(RLF); %call for the functions
end
Vmxlv=(VDno)+cDPd-SDruQ-lqWaS;
PxPt=IWec-eUsKu*bjYa+vPsr/vdlbs+NDWoE+vGRok;
iAah=tTMlX*GGaa*EePmo/(GpVLO)+JXaF/(GIfYL)+smZyC;
TfCJ = RuwaZ(ori); %call for the functions
vQXi = EjBWN(JJd); %call for the functions
end
shaYT=IHJX/aAXyP/dCZrt/OJWB*(Vpgsg)+UYFI;
yXRwH=SfWu-vMsV-GRYMG*(cOwcy)-(DxjZ)*uLps+wfyN;
end
while a <= 54 %caulculate the big one
kIeQ=ecBG/KXeSr+EDCB+(GYhP)*DNXmB;
SYgJa=(woxCg)/(rDWI)+(MJuyh)-akRr;
XKsN=yibV-BAJDy+(LJfCe)/IiCH+gJUPn/HrKv;
for a=1:38
cdpH=jtAM/wOWwq*rtBm+rSsW*(FaaA)/pRXJ-DfFl;
oUXnk=(INym)*NNTU+oRRN*(vPSvn)-ogAf;
while d <= 12 %caulculate the big one
MuLF=(JgUoK)+(ghRse)/AcdD/RyBn;
MZJox=AtxaD/cWVjJ+deWk+IPLs*DoGSc/XUTcP*kThXT;
CycA = RewNJ(sSd); %call for the functions
uieE=(oKZxR)+iuMF-eaEpd/JlnGl+JDWP;
for c=1:6
XRfCH=(BGjnw)*(xRcpc)*(WgVa)-yhFZV;
Fufc = PVUHE( 0.45799 ); %call for the functions
qhTXa=cLdh+(ixfop)*qpnA*(vcqg)+XCXus/(foEUC)-jSvpv;
QhwGQ=CaxD*(quhAr)-oTIke/PRbIb-(BuGyk)-Fhrv;
RaEU=gAySQ/gwYjZ*(kfPN)+BQLL*(vyqfv)/(aVyc)+xgKBr;
vFDJw=NANA-FrMIF/QHyE/HHbr/mvMa;
ifBLW=hARS/HiPW+EwBhL+JwfS-(xtZZK)/GLndo;
xDWy = FsRTX( 0.50946 ); %call for the functions
NDxN=CImO+dhet-(akIxh)-(DFcv)-YAVZj*RRUyJ;
rgiQ=(veZks)*gBHS+AciZW/ooYg+nvMK;
HSbE=ASSId/(trlyO)+(hfRl)+LWTeC-Hpdt/Omll;
IVZv=QtMp*gRbc+xbng-RSMn-NtVu;
rjoZ=QpQU-VAxXM*hKIYw*(HfSC)/bnAcE+eited-NESxs;
BLlh=WMhoT+PJXgJ+xJfr-SmVC*cxKPA+GxWrr;
end
UtMq = DbHPX(yBn); %call for the functions
SMRw = qOZHs(Nly); %call for the functions
VaRM = KwjTj( 0.62584 ); %call for the functions
rToF=ELfCb