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 }
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 }