public DGEHRD(DAXPY daxpy, DGEHD2 dgehd2, DGEMM dgemm, DLAHR2 dlahr2, DLARFB dlarfb, DTRMM dtrmm, XERBLA xerbla, ILAENV ilaenv) { #region Set Dependencies this._daxpy = daxpy; this._dgehd2 = dgehd2; this._dgemm = dgemm; this._dlahr2 = dlahr2; this._dlarfb = dlarfb; this._dtrmm = dtrmm; this._xerbla = xerbla; this._ilaenv = ilaenv; #endregion }
public DGEHRD(DAXPY daxpy, DGEHD2 dgehd2, DGEMM dgemm, DLAHR2 dlahr2, DLARFB dlarfb, DTRMM dtrmm, XERBLA xerbla, ILAENV ilaenv) { #region Set Dependencies this._daxpy = daxpy; this._dgehd2 = dgehd2; this._dgemm = dgemm; this._dlahr2 = dlahr2; this._dlarfb = dlarfb; this._dtrmm = dtrmm;this._xerbla = xerbla; this._ilaenv = ilaenv; #endregion }
public DGEHRD() { #region Dependencies (Initialization) DAXPY daxpy = new DAXPY(); LSAME lsame = new LSAME(); XERBLA xerbla = new XERBLA(); DLAMC3 dlamc3 = new DLAMC3(); DLAPY2 dlapy2 = new DLAPY2(); DNRM2 dnrm2 = new DNRM2(); DSCAL dscal = new DSCAL(); DCOPY dcopy = new DCOPY(); IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); 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); DGEHD2 dgehd2 = new DGEHD2(dlarf, dlarfg, xerbla); DGEMM dgemm = new DGEMM(lsame, xerbla); DLACPY dlacpy = new DLACPY(lsame); DTRMM dtrmm = new DTRMM(lsame, xerbla); DTRMV dtrmv = new DTRMV(lsame, xerbla); DLAHR2 dlahr2 = new DLAHR2(daxpy, dcopy, dgemm, dgemv, dlacpy, dlarfg, dscal, dtrmm, dtrmv); DLARFB dlarfb = new DLARFB(lsame, dcopy, dgemm, dtrmm); ILAENV ilaenv = new ILAENV(ieeeck, iparmq); #endregion #region Set Dependencies this._daxpy = daxpy; this._dgehd2 = dgehd2; this._dgemm = dgemm; this._dlahr2 = dlahr2; this._dlarfb = dlarfb; this._dtrmm = dtrmm; this._xerbla = xerbla; this._ilaenv = ilaenv; #endregion }
public DGEHRD() { #region Dependencies (Initialization) DAXPY daxpy = new DAXPY(); LSAME lsame = new LSAME(); XERBLA xerbla = new XERBLA(); DLAMC3 dlamc3 = new DLAMC3(); DLAPY2 dlapy2 = new DLAPY2(); DNRM2 dnrm2 = new DNRM2(); DSCAL dscal = new DSCAL(); DCOPY dcopy = new DCOPY(); IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); 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); DGEHD2 dgehd2 = new DGEHD2(dlarf, dlarfg, xerbla); DGEMM dgemm = new DGEMM(lsame, xerbla); DLACPY dlacpy = new DLACPY(lsame); DTRMM dtrmm = new DTRMM(lsame, xerbla); DTRMV dtrmv = new DTRMV(lsame, xerbla); DLAHR2 dlahr2 = new DLAHR2(daxpy, dcopy, dgemm, dgemv, dlacpy, dlarfg, dscal, dtrmm, dtrmv); DLARFB dlarfb = new DLARFB(lsame, dcopy, dgemm, dtrmm); ILAENV ilaenv = new ILAENV(ieeeck, iparmq); #endregion #region Set Dependencies this._daxpy = daxpy; this._dgehd2 = dgehd2; this._dgemm = dgemm; this._dlahr2 = dlahr2; this._dlarfb = dlarfb; this._dtrmm = dtrmm;this._xerbla = xerbla; this._ilaenv = ilaenv; #endregion }
public DLAQR0() { #region Dependencies (Initialization) IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); LSAME lsame = new LSAME(); DLAMC3 dlamc3 = new DLAMC3(); DCOPY dcopy = new DCOPY(); DLABAD dlabad = new DLABAD(); DLAPY2 dlapy2 = new DLAPY2(); DNRM2 dnrm2 = new DNRM2(); DSCAL dscal = new DSCAL(); DROT drot = new DROT(); DAXPY daxpy = new DAXPY(); XERBLA xerbla = new XERBLA(); DLASSQ dlassq = new DLASSQ(); IDAMAX idamax = new IDAMAX(); DSWAP dswap = new DSWAP(); DLAQR1 dlaqr1 = new DLAQR1(); ILAENV ilaenv = new ILAENV(ieeeck, iparmq); DLACPY dlacpy = new DLACPY(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); DLANV2 dlanv2 = new DLANV2(dlamch, dlapy2); DLARFG dlarfg = new DLARFG(dlamch, dlapy2, dnrm2, dscal); DLAHQR dlahqr = new DLAHQR(dlamch, dcopy, dlabad, dlanv2, dlarfg, drot); DGEMV dgemv = new DGEMV(lsame, xerbla); DGER dger = new DGER(xerbla); DLARF dlarf = new DLARF(dgemv, dger, lsame); DGEHD2 dgehd2 = new DGEHD2(dlarf, dlarfg, xerbla); DGEMM dgemm = new DGEMM(lsame, xerbla); DTRMM dtrmm = new DTRMM(lsame, xerbla); DTRMV dtrmv = new DTRMV(lsame, xerbla); DLAHR2 dlahr2 = new DLAHR2(daxpy, dcopy, dgemm, dgemv, dlacpy, dlarfg, dscal, dtrmm, dtrmv); DLARFB dlarfb = new DLARFB(lsame, dcopy, dgemm, dtrmm); DGEHRD dgehrd = new DGEHRD(daxpy, dgehd2, dgemm, dlahr2, dlarfb, dtrmm, xerbla, ilaenv); DLASET dlaset = new DLASET(lsame); DLARFT dlarft = new DLARFT(dgemv, dtrmv, lsame); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORGQR dorgqr = new DORGQR(dlarfb, dlarft, dorg2r, xerbla, ilaenv); DORGHR dorghr = new DORGHR(dorgqr, xerbla, ilaenv); DLANGE dlange = new DLANGE(dlassq, lsame); DLARFX dlarfx = new DLARFX(lsame, dgemv, dger); DLARTG dlartg = new DLARTG(dlamch); DLASY2 dlasy2 = new DLASY2(idamax, dlamch, dcopy, dswap); DLAEXC dlaexc = new DLAEXC(dlamch, dlange, dlacpy, dlanv2, dlarfg, dlarfx, dlartg, dlasy2, drot); DTREXC dtrexc = new DTREXC(lsame, dlaexc, xerbla); DLAQR2 dlaqr2 = new DLAQR2(dlamch, dcopy, dgehrd, dgemm, dlabad, dlacpy, dlahqr, dlanv2, dlarf, dlarfg , dlaset, dorghr, dtrexc); DLAQR5 dlaqr5 = new DLAQR5(dlamch, dgemm, dlabad, dlacpy, dlaqr1, dlarfg, dlaset, dtrmm); DLAQR4 dlaqr4 = new DLAQR4(ilaenv, dlacpy, dlahqr, dlanv2, dlaqr2, dlaqr5); DLAQR3 dlaqr3 = new DLAQR3(dlamch, ilaenv, dcopy, dgehrd, dgemm, dlabad, dlacpy, dlahqr, dlanv2, dlaqr4 , dlarf, dlarfg, dlaset, dorghr, dtrexc); #endregion #region Set Dependencies this._ilaenv = ilaenv; this._dlacpy = dlacpy; this._dlahqr = dlahqr; this._dlanv2 = dlanv2; this._dlaqr3 = dlaqr3; this._dlaqr4 = dlaqr4;this._dlaqr5 = dlaqr5; #endregion }
public DLAQR0() { #region Dependencies (Initialization) IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); LSAME lsame = new LSAME(); DLAMC3 dlamc3 = new DLAMC3(); DCOPY dcopy = new DCOPY(); DLABAD dlabad = new DLABAD(); DLAPY2 dlapy2 = new DLAPY2(); DNRM2 dnrm2 = new DNRM2(); DSCAL dscal = new DSCAL(); DROT drot = new DROT(); DAXPY daxpy = new DAXPY(); XERBLA xerbla = new XERBLA(); DLASSQ dlassq = new DLASSQ(); IDAMAX idamax = new IDAMAX(); DSWAP dswap = new DSWAP(); DLAQR1 dlaqr1 = new DLAQR1(); ILAENV ilaenv = new ILAENV(ieeeck, iparmq); DLACPY dlacpy = new DLACPY(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); DLANV2 dlanv2 = new DLANV2(dlamch, dlapy2); DLARFG dlarfg = new DLARFG(dlamch, dlapy2, dnrm2, dscal); DLAHQR dlahqr = new DLAHQR(dlamch, dcopy, dlabad, dlanv2, dlarfg, drot); DGEMV dgemv = new DGEMV(lsame, xerbla); DGER dger = new DGER(xerbla); DLARF dlarf = new DLARF(dgemv, dger, lsame); DGEHD2 dgehd2 = new DGEHD2(dlarf, dlarfg, xerbla); DGEMM dgemm = new DGEMM(lsame, xerbla); DTRMM dtrmm = new DTRMM(lsame, xerbla); DTRMV dtrmv = new DTRMV(lsame, xerbla); DLAHR2 dlahr2 = new DLAHR2(daxpy, dcopy, dgemm, dgemv, dlacpy, dlarfg, dscal, dtrmm, dtrmv); DLARFB dlarfb = new DLARFB(lsame, dcopy, dgemm, dtrmm); DGEHRD dgehrd = new DGEHRD(daxpy, dgehd2, dgemm, dlahr2, dlarfb, dtrmm, xerbla, ilaenv); DLASET dlaset = new DLASET(lsame); DLARFT dlarft = new DLARFT(dgemv, dtrmv, lsame); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORGQR dorgqr = new DORGQR(dlarfb, dlarft, dorg2r, xerbla, ilaenv); DORGHR dorghr = new DORGHR(dorgqr, xerbla, ilaenv); DLANGE dlange = new DLANGE(dlassq, lsame); DLARFX dlarfx = new DLARFX(lsame, dgemv, dger); DLARTG dlartg = new DLARTG(dlamch); DLASY2 dlasy2 = new DLASY2(idamax, dlamch, dcopy, dswap); DLAEXC dlaexc = new DLAEXC(dlamch, dlange, dlacpy, dlanv2, dlarfg, dlarfx, dlartg, dlasy2, drot); DTREXC dtrexc = new DTREXC(lsame, dlaexc, xerbla); DLAQR2 dlaqr2 = new DLAQR2(dlamch, dcopy, dgehrd, dgemm, dlabad, dlacpy, dlahqr, dlanv2, dlarf, dlarfg , dlaset, dorghr, dtrexc); DLAQR5 dlaqr5 = new DLAQR5(dlamch, dgemm, dlabad, dlacpy, dlaqr1, dlarfg, dlaset, dtrmm); DLAQR4 dlaqr4 = new DLAQR4(ilaenv, dlacpy, dlahqr, dlanv2, dlaqr2, dlaqr5); DLAQR3 dlaqr3 = new DLAQR3(dlamch, ilaenv, dcopy, dgehrd, dgemm, dlabad, dlacpy, dlahqr, dlanv2, dlaqr4 , dlarf, dlarfg, dlaset, dorghr, dtrexc); #endregion #region Set Dependencies this._ilaenv = ilaenv; this._dlacpy = dlacpy; this._dlahqr = dlahqr; this._dlanv2 = dlanv2; this._dlaqr3 = dlaqr3; this._dlaqr4 = dlaqr4; this._dlaqr5 = dlaqr5; #endregion }
public DGEEV() { #region Dependencies (Initialization) LSAME lsame = new LSAME(); DSCAL dscal = new DSCAL(); DSWAP dswap = new DSWAP(); XERBLA xerbla = new XERBLA(); IDAMAX idamax = new IDAMAX(); DLAMC3 dlamc3 = new DLAMC3(); DAXPY daxpy = new DAXPY(); DLAPY2 dlapy2 = new DLAPY2(); DNRM2 dnrm2 = new DNRM2(); DCOPY dcopy = new DCOPY(); IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); DLABAD dlabad = new DLABAD(); DROT drot = new DROT(); DLASSQ dlassq = new DLASSQ(); DLAQR1 dlaqr1 = new DLAQR1(); DDOT ddot = new DDOT(); DLADIV dladiv = new DLADIV(); DGEBAK dgebak = new DGEBAK(lsame, dscal, dswap, 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); DGEBAL dgebal = new DGEBAL(lsame, idamax, dlamch, dscal, 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); DGEHD2 dgehd2 = new DGEHD2(dlarf, dlarfg, xerbla); DGEMM dgemm = new DGEMM(lsame, xerbla); DLACPY dlacpy = new DLACPY(lsame); DTRMM dtrmm = new DTRMM(lsame, xerbla); DTRMV dtrmv = new DTRMV(lsame, xerbla); DLAHR2 dlahr2 = new DLAHR2(daxpy, dcopy, dgemm, dgemv, dlacpy, dlarfg, dscal, dtrmm, dtrmv); DLARFB dlarfb = new DLARFB(lsame, dcopy, dgemm, dtrmm); ILAENV ilaenv = new ILAENV(ieeeck, iparmq); DGEHRD dgehrd = new DGEHRD(daxpy, dgehd2, dgemm, dlahr2, dlarfb, dtrmm, xerbla, ilaenv); DLANV2 dlanv2 = new DLANV2(dlamch, dlapy2); DLAHQR dlahqr = new DLAHQR(dlamch, dcopy, dlabad, dlanv2, dlarfg, drot); DLASET dlaset = new DLASET(lsame); DLARFT dlarft = new DLARFT(dgemv, dtrmv, lsame); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORGQR dorgqr = new DORGQR(dlarfb, dlarft, dorg2r, xerbla, ilaenv); DORGHR dorghr = new DORGHR(dorgqr, xerbla, ilaenv); DLANGE dlange = new DLANGE(dlassq, lsame); DLARFX dlarfx = new DLARFX(lsame, dgemv, dger); DLARTG dlartg = new DLARTG(dlamch); DLASY2 dlasy2 = new DLASY2(idamax, dlamch, dcopy, dswap); DLAEXC dlaexc = new DLAEXC(dlamch, dlange, dlacpy, dlanv2, dlarfg, dlarfx, dlartg, dlasy2, drot); DTREXC dtrexc = new DTREXC(lsame, dlaexc, xerbla); DLAQR2 dlaqr2 = new DLAQR2(dlamch, dcopy, dgehrd, dgemm, dlabad, dlacpy, dlahqr, dlanv2, dlarf, dlarfg , dlaset, dorghr, dtrexc); DLAQR5 dlaqr5 = new DLAQR5(dlamch, dgemm, dlabad, dlacpy, dlaqr1, dlarfg, dlaset, dtrmm); DLAQR4 dlaqr4 = new DLAQR4(ilaenv, dlacpy, dlahqr, dlanv2, dlaqr2, dlaqr5); DLAQR3 dlaqr3 = new DLAQR3(dlamch, ilaenv, dcopy, dgehrd, dgemm, dlabad, dlacpy, dlahqr, dlanv2, dlaqr4 , dlarf, dlarfg, dlaset, dorghr, dtrexc); DLAQR0 dlaqr0 = new DLAQR0(ilaenv, dlacpy, dlahqr, dlanv2, dlaqr3, dlaqr4, dlaqr5); DHSEQR dhseqr = new DHSEQR(ilaenv, lsame, dlacpy, dlahqr, dlaqr0, dlaset, xerbla); DLASCL dlascl = new DLASCL(lsame, dlamch, xerbla); DLALN2 dlaln2 = new DLALN2(dlamch, dladiv); DTREVC dtrevc = new DTREVC(lsame, idamax, ddot, dlamch, daxpy, dcopy, dgemv, dlaln2, dscal, xerbla , dlabad); #endregion #region Set Dependencies this._dgebak = dgebak; this._dgebal = dgebal; this._dgehrd = dgehrd; this._dhseqr = dhseqr; this._dlabad = dlabad; this._dlacpy = dlacpy; this._dlartg = dlartg; this._dlascl = dlascl; this._dorghr = dorghr; this._drot = drot; this._dscal = dscal; this._dtrevc = dtrevc; this._xerbla = xerbla; this._lsame = lsame; this._idamax = idamax; this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlange = dlange; this._dlapy2 = dlapy2; this._dnrm2 = dnrm2; #endregion }
public DGEEV() { #region Dependencies (Initialization) LSAME lsame = new LSAME(); DSCAL dscal = new DSCAL(); DSWAP dswap = new DSWAP(); XERBLA xerbla = new XERBLA(); IDAMAX idamax = new IDAMAX(); DLAMC3 dlamc3 = new DLAMC3(); DAXPY daxpy = new DAXPY(); DLAPY2 dlapy2 = new DLAPY2(); DNRM2 dnrm2 = new DNRM2(); DCOPY dcopy = new DCOPY(); IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); DLABAD dlabad = new DLABAD(); DROT drot = new DROT(); DLASSQ dlassq = new DLASSQ(); DLAQR1 dlaqr1 = new DLAQR1(); DDOT ddot = new DDOT(); DLADIV dladiv = new DLADIV(); DGEBAK dgebak = new DGEBAK(lsame, dscal, dswap, 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); DGEBAL dgebal = new DGEBAL(lsame, idamax, dlamch, dscal, 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); DGEHD2 dgehd2 = new DGEHD2(dlarf, dlarfg, xerbla); DGEMM dgemm = new DGEMM(lsame, xerbla); DLACPY dlacpy = new DLACPY(lsame); DTRMM dtrmm = new DTRMM(lsame, xerbla); DTRMV dtrmv = new DTRMV(lsame, xerbla); DLAHR2 dlahr2 = new DLAHR2(daxpy, dcopy, dgemm, dgemv, dlacpy, dlarfg, dscal, dtrmm, dtrmv); DLARFB dlarfb = new DLARFB(lsame, dcopy, dgemm, dtrmm); ILAENV ilaenv = new ILAENV(ieeeck, iparmq); DGEHRD dgehrd = new DGEHRD(daxpy, dgehd2, dgemm, dlahr2, dlarfb, dtrmm, xerbla, ilaenv); DLANV2 dlanv2 = new DLANV2(dlamch, dlapy2); DLAHQR dlahqr = new DLAHQR(dlamch, dcopy, dlabad, dlanv2, dlarfg, drot); DLASET dlaset = new DLASET(lsame); DLARFT dlarft = new DLARFT(dgemv, dtrmv, lsame); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORGQR dorgqr = new DORGQR(dlarfb, dlarft, dorg2r, xerbla, ilaenv); DORGHR dorghr = new DORGHR(dorgqr, xerbla, ilaenv); DLANGE dlange = new DLANGE(dlassq, lsame); DLARFX dlarfx = new DLARFX(lsame, dgemv, dger); DLARTG dlartg = new DLARTG(dlamch); DLASY2 dlasy2 = new DLASY2(idamax, dlamch, dcopy, dswap); DLAEXC dlaexc = new DLAEXC(dlamch, dlange, dlacpy, dlanv2, dlarfg, dlarfx, dlartg, dlasy2, drot); DTREXC dtrexc = new DTREXC(lsame, dlaexc, xerbla); DLAQR2 dlaqr2 = new DLAQR2(dlamch, dcopy, dgehrd, dgemm, dlabad, dlacpy, dlahqr, dlanv2, dlarf, dlarfg , dlaset, dorghr, dtrexc); DLAQR5 dlaqr5 = new DLAQR5(dlamch, dgemm, dlabad, dlacpy, dlaqr1, dlarfg, dlaset, dtrmm); DLAQR4 dlaqr4 = new DLAQR4(ilaenv, dlacpy, dlahqr, dlanv2, dlaqr2, dlaqr5); DLAQR3 dlaqr3 = new DLAQR3(dlamch, ilaenv, dcopy, dgehrd, dgemm, dlabad, dlacpy, dlahqr, dlanv2, dlaqr4 , dlarf, dlarfg, dlaset, dorghr, dtrexc); DLAQR0 dlaqr0 = new DLAQR0(ilaenv, dlacpy, dlahqr, dlanv2, dlaqr3, dlaqr4, dlaqr5); DHSEQR dhseqr = new DHSEQR(ilaenv, lsame, dlacpy, dlahqr, dlaqr0, dlaset, xerbla); DLASCL dlascl = new DLASCL(lsame, dlamch, xerbla); DLALN2 dlaln2 = new DLALN2(dlamch, dladiv); DTREVC dtrevc = new DTREVC(lsame, idamax, ddot, dlamch, daxpy, dcopy, dgemv, dlaln2, dscal, xerbla , dlabad); #endregion #region Set Dependencies this._dgebak = dgebak; this._dgebal = dgebal; this._dgehrd = dgehrd; this._dhseqr = dhseqr; this._dlabad = dlabad; this._dlacpy = dlacpy;this._dlartg = dlartg; this._dlascl = dlascl; this._dorghr = dorghr; this._drot = drot; this._dscal = dscal;this._dtrevc = dtrevc; this._xerbla = xerbla; this._lsame = lsame; this._idamax = idamax; this._ilaenv = ilaenv;this._dlamch = dlamch; this._dlange = dlange; this._dlapy2 = dlapy2; this._dnrm2 = dnrm2; #endregion }