public DGESV() { #region Dependencies (Initialization) LSAME lsame = new LSAME(); XERBLA xerbla = new XERBLA(); DLAMC3 dlamc3 = new DLAMC3(); IDAMAX idamax = new IDAMAX(); DSCAL dscal = new DSCAL(); DSWAP dswap = new DSWAP(); DLASWP dlaswp = new DLASWP(); IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); DGEMM dgemm = new DGEMM(lsame, xerbla); 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); DGER dger = new DGER(xerbla); DGETF2 dgetf2 = new DGETF2(dlamch, idamax, dger, dscal, dswap, xerbla); DTRSM dtrsm = new DTRSM(lsame, xerbla); ILAENV ilaenv = new ILAENV(ieeeck, iparmq); DGETRF dgetrf = new DGETRF(dgemm, dgetf2, dlaswp, dtrsm, xerbla, ilaenv); DGETRS dgetrs = new DGETRS(lsame, dlaswp, dtrsm, xerbla); #endregion #region Set Dependencies this._dgetrf = dgetrf; this._dgetrs = dgetrs; this._xerbla = xerbla; #endregion }
public DGESV() { #region Dependencies (Initialization) LSAME lsame = new LSAME(); XERBLA xerbla = new XERBLA(); DLAMC3 dlamc3 = new DLAMC3(); IDAMAX idamax = new IDAMAX(); DSCAL dscal = new DSCAL(); DSWAP dswap = new DSWAP(); DLASWP dlaswp = new DLASWP(); IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); DGEMM dgemm = new DGEMM(lsame, xerbla); 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); DGER dger = new DGER(xerbla); DGETF2 dgetf2 = new DGETF2(dlamch, idamax, dger, dscal, dswap, xerbla); DTRSM dtrsm = new DTRSM(lsame, xerbla); ILAENV ilaenv = new ILAENV(ieeeck, iparmq); DGETRF dgetrf = new DGETRF(dgemm, dgetf2, dlaswp, dtrsm, xerbla, ilaenv); DGETRS dgetrs = new DGETRS(lsame, dlaswp, dtrsm, xerbla); #endregion #region Set Dependencies this._dgetrf = dgetrf; this._dgetrs = dgetrs; this._xerbla = xerbla; #endregion }
public DGESV(DGETRF dgetrf, DGETRS dgetrs, XERBLA xerbla) { #region Set Dependencies this._dgetrf = dgetrf; this._dgetrs = dgetrs; this._xerbla = xerbla; #endregion }
public DGESV(DGETRF dgetrf, DGETRS dgetrs, XERBLA xerbla) { #region Set Dependencies this._dgetrf = dgetrf; this._dgetrs = dgetrs; this._xerbla = xerbla; #endregion }