public DGGSVD(LSAME lsame, DLAMCH dlamch, DLANGE dlange, DCOPY dcopy, DGGSVP dggsvp, DTGSJA dtgsja, XERBLA xerbla)
{
#region Set Dependencies
this._lsame = lsame; this._dlamch = dlamch; this._dlange = dlange; this._dcopy = dcopy; this._dggsvp = dggsvp;
this._dtgsja = dtgsja; this._xerbla = xerbla;
#endregion
}
public DGGSVD()
{
#region Dependencies (Initialization)
LSAME lsame = new LSAME();
DLAMC3 dlamc3 = new DLAMC3();
DLASSQ dlassq = new DLASSQ();
DCOPY dcopy = new DCOPY();
XERBLA xerbla = new XERBLA();
DLAPY2 dlapy2 = new DLAPY2();
DNRM2 dnrm2 = new DNRM2();
DSCAL dscal = new DSCAL();
DSWAP dswap = new DSWAP();
IDAMAX idamax = new IDAMAX();
DLAPMT dlapmt = new DLAPMT();
DDOT ddot = new DDOT();
DAXPY daxpy = new DAXPY();
DLAS2 dlas2 = new DLAS2();
DROT drot = new DROT();
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);
DLANGE dlange = new DLANGE(dlassq, lsame);
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);
DGEQR2 dgeqr2 = new DGEQR2(dlarf, dlarfg, xerbla);
DORM2R dorm2r = new DORM2R(lsame, dlarf, xerbla);
DGEQPF dgeqpf = new DGEQPF(dgeqr2, dlarf, dlarfg, dorm2r, dswap, xerbla, idamax, dlamch, dnrm2);
DGERQ2 dgerq2 = new DGERQ2(dlarf, dlarfg, xerbla);
DLACPY dlacpy = new DLACPY(lsame);
DLASET dlaset = new DLASET(lsame);
DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla);
DORMR2 dormr2 = new DORMR2(lsame, dlarf, xerbla);
DGGSVP dggsvp = new DGGSVP(lsame, dgeqpf, dgeqr2, dgerq2, dlacpy, dlapmt, dlaset, dorg2r, dorm2r, dormr2
, xerbla);
DLARTG dlartg = new DLARTG(dlamch);
DLASV2 dlasv2 = new DLASV2(dlamch);
DLAGS2 dlags2 = new DLAGS2(dlartg, dlasv2);
DLAPLL dlapll = new DLAPLL(ddot, daxpy, dlarfg, dlas2);
DTGSJA dtgsja = new DTGSJA(lsame, dcopy, dlags2, dlapll, dlartg, dlaset, drot, dscal, xerbla);
#endregion
#region Set Dependencies
this._lsame = lsame; this._dlamch = dlamch; this._dlange = dlange; this._dcopy = dcopy; this._dggsvp = dggsvp;
this._dtgsja = dtgsja; this._xerbla = xerbla;
#endregion
}
public DGGSVD()
{
#region Dependencies (Initialization)
LSAME lsame = new LSAME();
DLAMC3 dlamc3 = new DLAMC3();
DLASSQ dlassq = new DLASSQ();
DCOPY dcopy = new DCOPY();
XERBLA xerbla = new XERBLA();
DLAPY2 dlapy2 = new DLAPY2();
DNRM2 dnrm2 = new DNRM2();
DSCAL dscal = new DSCAL();
DSWAP dswap = new DSWAP();
IDAMAX idamax = new IDAMAX();
DLAPMT dlapmt = new DLAPMT();
DDOT ddot = new DDOT();
DAXPY daxpy = new DAXPY();
DLAS2 dlas2 = new DLAS2();
DROT drot = new DROT();
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);
DLANGE dlange = new DLANGE(dlassq, lsame);
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);
DGEQR2 dgeqr2 = new DGEQR2(dlarf, dlarfg, xerbla);
DORM2R dorm2r = new DORM2R(lsame, dlarf, xerbla);
DGEQPF dgeqpf = new DGEQPF(dgeqr2, dlarf, dlarfg, dorm2r, dswap, xerbla, idamax, dlamch, dnrm2);
DGERQ2 dgerq2 = new DGERQ2(dlarf, dlarfg, xerbla);
DLACPY dlacpy = new DLACPY(lsame);
DLASET dlaset = new DLASET(lsame);
DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla);
DORMR2 dormr2 = new DORMR2(lsame, dlarf, xerbla);
DGGSVP dggsvp = new DGGSVP(lsame, dgeqpf, dgeqr2, dgerq2, dlacpy, dlapmt, dlaset, dorg2r, dorm2r, dormr2
, xerbla);
DLARTG dlartg = new DLARTG(dlamch);
DLASV2 dlasv2 = new DLASV2(dlamch);
DLAGS2 dlags2 = new DLAGS2(dlartg, dlasv2);
DLAPLL dlapll = new DLAPLL(ddot, daxpy, dlarfg, dlas2);
DTGSJA dtgsja = new DTGSJA(lsame, dcopy, dlags2, dlapll, dlartg, dlaset, drot, dscal, xerbla);
#endregion
#region Set Dependencies
this._lsame = lsame; this._dlamch = dlamch; this._dlange = dlange; this._dcopy = dcopy; this._dggsvp = dggsvp;
this._dtgsja = dtgsja;this._xerbla = xerbla;
#endregion
}
public DGGSVD(LSAME lsame, DLAMCH dlamch, DLANGE dlange, DCOPY dcopy, DGGSVP dggsvp, DTGSJA dtgsja, XERBLA xerbla)
{
#region Set Dependencies
this._lsame = lsame; this._dlamch = dlamch; this._dlange = dlange; this._dcopy = dcopy; this._dggsvp = dggsvp;
this._dtgsja = dtgsja;this._xerbla = xerbla;
#endregion
}