public DGELSY(ILAENV ilaenv, DLAMCH dlamch, DLANGE dlange, DCOPY dcopy, DGEQP3 dgeqp3, DLABAD dlabad, DLAIC1 dlaic1, DLASCL dlascl, DLASET dlaset, DORMQR dormqr , DORMRZ dormrz, DTRSM dtrsm, DTZRZF dtzrzf, XERBLA xerbla) { #region Set Dependencies this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlange = dlange; this._dcopy = dcopy; this._dgeqp3 = dgeqp3; this._dlabad = dlabad; this._dlaic1 = dlaic1; this._dlascl = dlascl; this._dlaset = dlaset; this._dormqr = dormqr; this._dormrz = dormrz; this._dtrsm = dtrsm; this._dtzrzf = dtzrzf; this._xerbla = xerbla; #endregion }
public DGELSY(ILAENV ilaenv, DLAMCH dlamch, DLANGE dlange, DCOPY dcopy, DGEQP3 dgeqp3, DLABAD dlabad, DLAIC1 dlaic1, DLASCL dlascl, DLASET dlaset, DORMQR dormqr , DORMRZ dormrz, DTRSM dtrsm, DTZRZF dtzrzf, XERBLA xerbla) { #region Set Dependencies this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlange = dlange; this._dcopy = dcopy; this._dgeqp3 = dgeqp3; this._dlabad = dlabad;this._dlaic1 = dlaic1; this._dlascl = dlascl; this._dlaset = dlaset; this._dormqr = dormqr; this._dormrz = dormrz;this._dtrsm = dtrsm; this._dtzrzf = dtzrzf; this._xerbla = xerbla; #endregion }
public DGELSY() { #region Dependencies (Initialization) IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); 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(); DLABAD dlabad = new DLABAD(); DDOT ddot = new DDOT(); DAXPY daxpy = new DAXPY(); 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); 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); DGEMM dgemm = new DGEMM(lsame, 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); DGEQRF dgeqrf = new DGEQRF(dgeqr2, dlarfb, dlarft, xerbla, ilaenv); DLAQP2 dlaqp2 = new DLAQP2(dlarf, dlarfg, dswap, idamax, dlamch, dnrm2); DLAQPS dlaqps = new DLAQPS(dgemm, dgemv, dlarfg, dswap, idamax, dlamch, dnrm2); DORM2R dorm2r = new DORM2R(lsame, dlarf, xerbla); DORMQR dormqr = new DORMQR(lsame, ilaenv, dlarfb, dlarft, dorm2r, xerbla); DGEQP3 dgeqp3 = new DGEQP3(dgeqrf, dlaqp2, dlaqps, dormqr, dswap, xerbla, ilaenv, dnrm2); DLAIC1 dlaic1 = new DLAIC1(ddot, dlamch); DLASCL dlascl = new DLASCL(lsame, dlamch, xerbla); DLASET dlaset = new DLASET(lsame); DLARZB dlarzb = new DLARZB(lsame, dcopy, dgemm, dtrmm, xerbla); DLARZT dlarzt = new DLARZT(dgemv, dtrmv, xerbla, lsame); DLARZ dlarz = new DLARZ(daxpy, dcopy, dgemv, dger, lsame); DORMR3 dormr3 = new DORMR3(lsame, dlarz, xerbla); DORMRZ dormrz = new DORMRZ(lsame, ilaenv, dlarzb, dlarzt, dormr3, xerbla); DTRSM dtrsm = new DTRSM(lsame, xerbla); DLATRZ dlatrz = new DLATRZ(dlarfg, dlarz); DTZRZF dtzrzf = new DTZRZF(dlarzb, dlarzt, dlatrz, xerbla, ilaenv); #endregion #region Set Dependencies this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlange = dlange; this._dcopy = dcopy; this._dgeqp3 = dgeqp3; this._dlabad = dlabad;this._dlaic1 = dlaic1; this._dlascl = dlascl; this._dlaset = dlaset; this._dormqr = dormqr; this._dormrz = dormrz;this._dtrsm = dtrsm; this._dtzrzf = dtzrzf; this._xerbla = xerbla; #endregion }
public DGELSY() { #region Dependencies (Initialization) IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); 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(); DLABAD dlabad = new DLABAD(); DDOT ddot = new DDOT(); DAXPY daxpy = new DAXPY(); 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); 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); DGEMM dgemm = new DGEMM(lsame, 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); DGEQRF dgeqrf = new DGEQRF(dgeqr2, dlarfb, dlarft, xerbla, ilaenv); DLAQP2 dlaqp2 = new DLAQP2(dlarf, dlarfg, dswap, idamax, dlamch, dnrm2); DLAQPS dlaqps = new DLAQPS(dgemm, dgemv, dlarfg, dswap, idamax, dlamch, dnrm2); DORM2R dorm2r = new DORM2R(lsame, dlarf, xerbla); DORMQR dormqr = new DORMQR(lsame, ilaenv, dlarfb, dlarft, dorm2r, xerbla); DGEQP3 dgeqp3 = new DGEQP3(dgeqrf, dlaqp2, dlaqps, dormqr, dswap, xerbla, ilaenv, dnrm2); DLAIC1 dlaic1 = new DLAIC1(ddot, dlamch); DLASCL dlascl = new DLASCL(lsame, dlamch, xerbla); DLASET dlaset = new DLASET(lsame); DLARZB dlarzb = new DLARZB(lsame, dcopy, dgemm, dtrmm, xerbla); DLARZT dlarzt = new DLARZT(dgemv, dtrmv, xerbla, lsame); DLARZ dlarz = new DLARZ(daxpy, dcopy, dgemv, dger, lsame); DORMR3 dormr3 = new DORMR3(lsame, dlarz, xerbla); DORMRZ dormrz = new DORMRZ(lsame, ilaenv, dlarzb, dlarzt, dormr3, xerbla); DTRSM dtrsm = new DTRSM(lsame, xerbla); DLATRZ dlatrz = new DLATRZ(dlarfg, dlarz); DTZRZF dtzrzf = new DTZRZF(dlarzb, dlarzt, dlatrz, xerbla, ilaenv); #endregion #region Set Dependencies this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlange = dlange; this._dcopy = dcopy; this._dgeqp3 = dgeqp3; this._dlabad = dlabad; this._dlaic1 = dlaic1; this._dlascl = dlascl; this._dlaset = dlaset; this._dormqr = dormqr; this._dormrz = dormrz; this._dtrsm = dtrsm; this._dtzrzf = dtzrzf; this._xerbla = xerbla; #endregion }