public DGELSD(DGEBRD dgebrd, DGELQF dgelqf, DGEQRF dgeqrf, DLABAD dlabad, DLACPY dlacpy, DLALSD dlalsd, DLASCL dlascl, DLASET dlaset, DORMBR dormbr, DORMLQ dormlq
, DORMQR dormqr, XERBLA xerbla, ILAENV ilaenv, DLAMCH dlamch, DLANGE dlange)
{
#region Set Dependencies
this._dgebrd = dgebrd; this._dgelqf = dgelqf; this._dgeqrf = dgeqrf; this._dlabad = dlabad; this._dlacpy = dlacpy;
this._dlalsd = dlalsd; this._dlascl = dlascl; this._dlaset = dlaset; this._dormbr = dormbr; this._dormlq = dormlq;
this._dormqr = dormqr; this._xerbla = xerbla; this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlange = dlange;
#endregion
}
public DGESDD(DBDSDC dbdsdc, DGEBRD dgebrd, DGELQF dgelqf, DGEMM dgemm, DGEQRF dgeqrf, DLACPY dlacpy, DLASCL dlascl, DLASET dlaset, DORGBR dorgbr, DORGLQ dorglq
, DORGQR dorgqr, DORMBR dormbr, XERBLA xerbla, DLAMCH dlamch, DLANGE dlange, ILAENV ilaenv, LSAME lsame)
{
#region Set Dependencies
this._dbdsdc = dbdsdc; this._dgebrd = dgebrd; this._dgelqf = dgelqf; this._dgemm = dgemm; this._dgeqrf = dgeqrf;
this._dlacpy = dlacpy;this._dlascl = dlascl; this._dlaset = dlaset; this._dorgbr = dorgbr; this._dorglq = dorglq;
this._dorgqr = dorgqr;this._dormbr = dormbr; this._xerbla = xerbla; this._dlamch = dlamch; this._dlange = dlange;
this._ilaenv = ilaenv;this._lsame = lsame;
#endregion
}
public DGESDD()
{
#region Dependencies (Initialization)
LSAME lsame = new LSAME();
IEEECK ieeeck = new IEEECK();
IPARMQ iparmq = new IPARMQ();
DLAMC3 dlamc3 = new DLAMC3();
DLASSQ dlassq = new DLASSQ();
DCOPY dcopy = new DCOPY();
XERBLA xerbla = new XERBLA();
DLAMRG dlamrg = new DLAMRG();
DLAPY2 dlapy2 = new DLAPY2();
DROT drot = new DROT();
DNRM2 dnrm2 = new DNRM2();
DLASD5 dlasd5 = new DLASD5();
DLAS2 dlas2 = new DLAS2();
DLASQ5 dlasq5 = new DLASQ5();
DLAZQ4 dlazq4 = new DLAZQ4();
DSCAL dscal = new DSCAL();
DSWAP dswap = new DSWAP();
DLASDT dlasdt = new DLASDT();
DDOT ddot = new DDOT();
ILAENV ilaenv = new ILAENV(ieeeck, iparmq);
DLAMC1 dlamc1 = new DLAMC1(dlamc3);
DLAMC4 dlamc4 = new DLAMC4(dlamc3);
DLAMC5 dlamc5 = new DLAMC5(dlamc3);
DLAMC2 dlamc2 = new DLAMC2(dlamc3, dlamc1, dlamc4, dlamc5);
DLAMCH dlamch = new DLAMCH(lsame, dlamc2);
DLANST dlanst = new DLANST(lsame, dlassq);
DLARTG dlartg = new DLARTG(dlamch);
DLASCL dlascl = new DLASCL(lsame, dlamch, xerbla);
DLACPY dlacpy = new DLACPY(lsame);
DLASET dlaset = new DLASET(lsame);
DLASD2 dlasd2 = new DLASD2(dlamch, dlapy2, dcopy, dlacpy, dlamrg, dlaset, drot, xerbla);
DGEMM dgemm = new DGEMM(lsame, xerbla);
DLAED6 dlaed6 = new DLAED6(dlamch);
DLASD4 dlasd4 = new DLASD4(dlaed6, dlasd5, dlamch);
DLASD3 dlasd3 = new DLASD3(dlamc3, dnrm2, dcopy, dgemm, dlacpy, dlascl, dlasd4, xerbla);
DLASD1 dlasd1 = new DLASD1(dlamrg, dlascl, dlasd2, dlasd3, xerbla);
DLASQ6 dlasq6 = new DLASQ6(dlamch);
DLAZQ3 dlazq3 = new DLAZQ3(dlasq5, dlasq6, dlazq4, dlamch);
DLASRT dlasrt = new DLASRT(lsame, xerbla);
DLASQ2 dlasq2 = new DLASQ2(dlazq3, dlasrt, xerbla, dlamch, ilaenv);
DLASQ1 dlasq1 = new DLASQ1(dcopy, dlas2, dlascl, dlasq2, dlasrt, xerbla, dlamch);
DLASR dlasr = new DLASR(lsame, xerbla);
DLASV2 dlasv2 = new DLASV2(dlamch);
DBDSQR dbdsqr = new DBDSQR(lsame, dlamch, dlartg, dlas2, dlasq1, dlasr, dlasv2, drot, dscal, dswap
, xerbla);
DLASDQ dlasdq = new DLASDQ(dbdsqr, dlartg, dlasr, dswap, xerbla, lsame);
DLASD0 dlasd0 = new DLASD0(dlasd1, dlasdq, dlasdt, xerbla);
DLASD7 dlasd7 = new DLASD7(dcopy, dlamrg, drot, xerbla, dlamch, dlapy2);
DLASD8 dlasd8 = new DLASD8(dcopy, dlascl, dlasd4, dlaset, xerbla, ddot, dlamc3, dnrm2);
DLASD6 dlasd6 = new DLASD6(dcopy, dlamrg, dlascl, dlasd7, dlasd8, xerbla);
DLASDA dlasda = new DLASDA(dcopy, dlasd6, dlasdq, dlasdt, dlaset, xerbla);
DBDSDC dbdsdc = new DBDSDC(lsame, ilaenv, dlamch, dlanst, dcopy, dlartg, dlascl, dlasd0, dlasda, dlasdq
, dlaset, dlasr, dswap, xerbla);
DGEMV dgemv = new DGEMV(lsame, xerbla);
DGER dger = new DGER(xerbla);
DLARF dlarf = new DLARF(dgemv, dger, lsame);
DLARFG dlarfg = new DLARFG(dlamch, dlapy2, dnrm2, dscal);
DGEBD2 dgebd2 = new DGEBD2(dlarf, dlarfg, xerbla);
DLABRD dlabrd = new DLABRD(dgemv, dlarfg, dscal);
DGEBRD dgebrd = new DGEBRD(dgebd2, dgemm, dlabrd, xerbla, ilaenv);
DGELQ2 dgelq2 = new DGELQ2(dlarf, dlarfg, xerbla);
DTRMM dtrmm = new DTRMM(lsame, xerbla);
DLARFB dlarfb = new DLARFB(lsame, dcopy, dgemm, dtrmm);
DTRMV dtrmv = new DTRMV(lsame, xerbla);
DLARFT dlarft = new DLARFT(dgemv, dtrmv, lsame);
DGELQF dgelqf = new DGELQF(dgelq2, dlarfb, dlarft, xerbla, ilaenv);
DGEQR2 dgeqr2 = new DGEQR2(dlarf, dlarfg, xerbla);
DGEQRF dgeqrf = new DGEQRF(dgeqr2, dlarfb, dlarft, xerbla, ilaenv);
DORGL2 dorgl2 = new DORGL2(dlarf, dscal, xerbla);
DORGLQ dorglq = new DORGLQ(dlarfb, dlarft, dorgl2, xerbla, ilaenv);
DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla);
DORGQR dorgqr = new DORGQR(dlarfb, dlarft, dorg2r, xerbla, ilaenv);
DORGBR dorgbr = new DORGBR(lsame, ilaenv, dorglq, dorgqr, xerbla);
DORML2 dorml2 = new DORML2(lsame, dlarf, xerbla);
DORMLQ dormlq = new DORMLQ(lsame, ilaenv, dlarfb, dlarft, dorml2, xerbla);
DORM2R dorm2r = new DORM2R(lsame, dlarf, xerbla);
DORMQR dormqr = new DORMQR(lsame, ilaenv, dlarfb, dlarft, dorm2r, xerbla);
DORMBR dormbr = new DORMBR(lsame, ilaenv, dormlq, dormqr, xerbla);
DLANGE dlange = new DLANGE(dlassq, lsame);
#endregion
#region Set Dependencies
this._dbdsdc = dbdsdc; this._dgebrd = dgebrd; this._dgelqf = dgelqf; this._dgemm = dgemm; this._dgeqrf = dgeqrf;
this._dlacpy = dlacpy;this._dlascl = dlascl; this._dlaset = dlaset; this._dorgbr = dorgbr; this._dorglq = dorglq;
this._dorgqr = dorgqr;this._dormbr = dormbr; this._xerbla = xerbla; this._dlamch = dlamch; this._dlange = dlange;
this._ilaenv = ilaenv;this._lsame = lsame;
#endregion
}
public DGELSD(DGEBRD dgebrd, DGELQF dgelqf, DGEQRF dgeqrf, DLABAD dlabad, DLACPY dlacpy, DLALSD dlalsd, DLASCL dlascl, DLASET dlaset, DORMBR dormbr, DORMLQ dormlq
, DORMQR dormqr, XERBLA xerbla, ILAENV ilaenv, DLAMCH dlamch, DLANGE dlange)
{
#region Set Dependencies
this._dgebrd = dgebrd; this._dgelqf = dgelqf; this._dgeqrf = dgeqrf; this._dlabad = dlabad; this._dlacpy = dlacpy;
this._dlalsd = dlalsd;this._dlascl = dlascl; this._dlaset = dlaset; this._dormbr = dormbr; this._dormlq = dormlq;
this._dormqr = dormqr;this._xerbla = xerbla; this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlange = dlange;
#endregion
}
public DGELSD()
{
#region Dependencies (Initialization)
LSAME lsame = new LSAME();
XERBLA xerbla = new XERBLA();
DLAMC3 dlamc3 = new DLAMC3();
DLAPY2 dlapy2 = new DLAPY2();
DNRM2 dnrm2 = new DNRM2();
DSCAL dscal = new DSCAL();
IEEECK ieeeck = new IEEECK();
IPARMQ iparmq = new IPARMQ();
DCOPY dcopy = new DCOPY();
DLABAD dlabad = new DLABAD();
IDAMAX idamax = new IDAMAX();
DLASSQ dlassq = new DLASSQ();
DROT drot = new DROT();
DLASDT dlasdt = new DLASDT();
DLAMRG dlamrg = new DLAMRG();
DLASD5 dlasd5 = new DLASD5();
DDOT ddot = new DDOT();
DLAS2 dlas2 = new DLAS2();
DLASQ5 dlasq5 = new DLASQ5();
DLAZQ4 dlazq4 = new DLAZQ4();
DSWAP dswap = new DSWAP();
DGEMV dgemv = new DGEMV(lsame, xerbla);
DGER dger = new DGER(xerbla);
DLARF dlarf = new DLARF(dgemv, dger, lsame);
DLAMC1 dlamc1 = new DLAMC1(dlamc3);
DLAMC4 dlamc4 = new DLAMC4(dlamc3);
DLAMC5 dlamc5 = new DLAMC5(dlamc3);
DLAMC2 dlamc2 = new DLAMC2(dlamc3, dlamc1, dlamc4, dlamc5);
DLAMCH dlamch = new DLAMCH(lsame, dlamc2);
DLARFG dlarfg = new DLARFG(dlamch, dlapy2, dnrm2, dscal);
DGEBD2 dgebd2 = new DGEBD2(dlarf, dlarfg, xerbla);
DGEMM dgemm = new DGEMM(lsame, xerbla);
DLABRD dlabrd = new DLABRD(dgemv, dlarfg, dscal);
ILAENV ilaenv = new ILAENV(ieeeck, iparmq);
DGEBRD dgebrd = new DGEBRD(dgebd2, dgemm, dlabrd, xerbla, ilaenv);
DGELQ2 dgelq2 = new DGELQ2(dlarf, dlarfg, xerbla);
DTRMM dtrmm = new DTRMM(lsame, xerbla);
DLARFB dlarfb = new DLARFB(lsame, dcopy, dgemm, dtrmm);
DTRMV dtrmv = new DTRMV(lsame, xerbla);
DLARFT dlarft = new DLARFT(dgemv, dtrmv, lsame);
DGELQF dgelqf = new DGELQF(dgelq2, dlarfb, dlarft, xerbla, ilaenv);
DGEQR2 dgeqr2 = new DGEQR2(dlarf, dlarfg, xerbla);
DGEQRF dgeqrf = new DGEQRF(dgeqr2, dlarfb, dlarft, xerbla, ilaenv);
DLACPY dlacpy = new DLACPY(lsame);
DLANST dlanst = new DLANST(lsame, dlassq);
DLASCL dlascl = new DLASCL(lsame, dlamch, xerbla);
DLALS0 dlals0 = new DLALS0(dcopy, dgemv, dlacpy, dlascl, drot, dscal, xerbla, dlamc3, dnrm2);
DLALSA dlalsa = new DLALSA(dcopy, dgemm, dlals0, dlasdt, xerbla);
DLARTG dlartg = new DLARTG(dlamch);
DLASD7 dlasd7 = new DLASD7(dcopy, dlamrg, drot, xerbla, dlamch, dlapy2);
DLAED6 dlaed6 = new DLAED6(dlamch);
DLASD4 dlasd4 = new DLASD4(dlaed6, dlasd5, dlamch);
DLASET dlaset = new DLASET(lsame);
DLASD8 dlasd8 = new DLASD8(dcopy, dlascl, dlasd4, dlaset, xerbla, ddot, dlamc3, dnrm2);
DLASD6 dlasd6 = new DLASD6(dcopy, dlamrg, dlascl, dlasd7, dlasd8, xerbla);
DLASQ6 dlasq6 = new DLASQ6(dlamch);
DLAZQ3 dlazq3 = new DLAZQ3(dlasq5, dlasq6, dlazq4, dlamch);
DLASRT dlasrt = new DLASRT(lsame, xerbla);
DLASQ2 dlasq2 = new DLASQ2(dlazq3, dlasrt, xerbla, dlamch, ilaenv);
DLASQ1 dlasq1 = new DLASQ1(dcopy, dlas2, dlascl, dlasq2, dlasrt, xerbla, dlamch);
DLASR dlasr = new DLASR(lsame, xerbla);
DLASV2 dlasv2 = new DLASV2(dlamch);
DBDSQR dbdsqr = new DBDSQR(lsame, dlamch, dlartg, dlas2, dlasq1, dlasr, dlasv2, drot, dscal, dswap
, xerbla);
DLASDQ dlasdq = new DLASDQ(dbdsqr, dlartg, dlasr, dswap, xerbla, lsame);
DLASDA dlasda = new DLASDA(dcopy, dlasd6, dlasdq, dlasdt, dlaset, xerbla);
DLALSD dlalsd = new DLALSD(idamax, dlamch, dlanst, dcopy, dgemm, dlacpy, dlalsa, dlartg, dlascl, dlasda
, dlasdq, dlaset, dlasrt, drot, xerbla);
DORML2 dorml2 = new DORML2(lsame, dlarf, xerbla);
DORMLQ dormlq = new DORMLQ(lsame, ilaenv, dlarfb, dlarft, dorml2, xerbla);
DORM2R dorm2r = new DORM2R(lsame, dlarf, xerbla);
DORMQR dormqr = new DORMQR(lsame, ilaenv, dlarfb, dlarft, dorm2r, xerbla);
DORMBR dormbr = new DORMBR(lsame, ilaenv, dormlq, dormqr, xerbla);
DLANGE dlange = new DLANGE(dlassq, lsame);
#endregion
#region Set Dependencies
this._dgebrd = dgebrd; this._dgelqf = dgelqf; this._dgeqrf = dgeqrf; this._dlabad = dlabad; this._dlacpy = dlacpy;
this._dlalsd = dlalsd; this._dlascl = dlascl; this._dlaset = dlaset; this._dormbr = dormbr; this._dormlq = dormlq;
this._dormqr = dormqr; this._xerbla = xerbla; this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlange = dlange;
#endregion
}