public DSYEV(LSAME lsame, ILAENV ilaenv, DLAMCH dlamch, DLANSY dlansy, DLASCL dlascl, DORGTR dorgtr, DSCAL dscal, DSTEQR dsteqr, DSTERF dsterf, DSYTRD dsytrd , XERBLA xerbla) { #region Set Dependencies this._lsame = lsame; this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlansy = dlansy; this._dlascl = dlascl; this._dorgtr = dorgtr;this._dscal = dscal; this._dsteqr = dsteqr; this._dsterf = dsterf; this._dsytrd = dsytrd; this._xerbla = xerbla; #endregion }
public DSYEV(LSAME lsame, ILAENV ilaenv, DLAMCH dlamch, DLANSY dlansy, DLASCL dlascl, DORGTR dorgtr, DSCAL dscal, DSTEQR dsteqr, DSTERF dsterf, DSYTRD dsytrd , XERBLA xerbla) { #region Set Dependencies this._lsame = lsame; this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlansy = dlansy; this._dlascl = dlascl; this._dorgtr = dorgtr; this._dscal = dscal; this._dsteqr = dsteqr; this._dsterf = dsterf; this._dsytrd = dsytrd; this._xerbla = xerbla; #endregion }
public DSYEV() { #region Dependencies (Initialization) LSAME lsame = new LSAME(); IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); DLAMC3 dlamc3 = new DLAMC3(); DLASSQ dlassq = new DLASSQ(); XERBLA xerbla = new XERBLA(); DCOPY dcopy = new DCOPY(); DSCAL dscal = new DSCAL(); DLAPY2 dlapy2 = new DLAPY2(); DLAE2 dlae2 = new DLAE2(); DLAEV2 dlaev2 = new DLAEV2(); DSWAP dswap = new DSWAP(); DAXPY daxpy = new DAXPY(); DNRM2 dnrm2 = new DNRM2(); DDOT ddot = new DDOT(); 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); DLANSY dlansy = new DLANSY(dlassq, lsame); DLASCL dlascl = new DLASCL(lsame, dlamch, xerbla); DGEMM dgemm = new DGEMM(lsame, xerbla); DTRMM dtrmm = new DTRMM(lsame, xerbla); DLARFB dlarfb = new DLARFB(lsame, dcopy, dgemm, dtrmm); DGEMV dgemv = new DGEMV(lsame, xerbla); DTRMV dtrmv = new DTRMV(lsame, xerbla); DLARFT dlarft = new DLARFT(dgemv, dtrmv, lsame); DGER dger = new DGER(xerbla); DLARF dlarf = new DLARF(dgemv, dger, lsame); DORG2L dorg2l = new DORG2L(dlarf, dscal, xerbla); DORGQL dorgql = new DORGQL(dlarfb, dlarft, dorg2l, xerbla, ilaenv); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORGQR dorgqr = new DORGQR(dlarfb, dlarft, dorg2r, xerbla, ilaenv); DORGTR dorgtr = new DORGTR(lsame, ilaenv, dorgql, dorgqr, xerbla); DLANST dlanst = new DLANST(lsame, dlassq); DLARTG dlartg = new DLARTG(dlamch); DLASET dlaset = new DLASET(lsame); DLASR dlasr = new DLASR(lsame, xerbla); DLASRT dlasrt = new DLASRT(lsame, xerbla); DSTEQR dsteqr = new DSTEQR(lsame, dlamch, dlanst, dlapy2, dlae2, dlaev2, dlartg, dlascl, dlaset, dlasr , dlasrt, dswap, xerbla); DSTERF dsterf = new DSTERF(dlamch, dlanst, dlapy2, dlae2, dlascl, dlasrt, xerbla); DLARFG dlarfg = new DLARFG(dlamch, dlapy2, dnrm2, dscal); DSYMV dsymv = new DSYMV(lsame, xerbla); DLATRD dlatrd = new DLATRD(daxpy, dgemv, dlarfg, dscal, dsymv, lsame, ddot); DSYR2K dsyr2k = new DSYR2K(lsame, xerbla); DSYR2 dsyr2 = new DSYR2(lsame, xerbla); DSYTD2 dsytd2 = new DSYTD2(daxpy, dlarfg, dsymv, dsyr2, xerbla, lsame, ddot); DSYTRD dsytrd = new DSYTRD(dlatrd, dsyr2k, dsytd2, xerbla, lsame, ilaenv); #endregion #region Set Dependencies this._lsame = lsame; this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlansy = dlansy; this._dlascl = dlascl; this._dorgtr = dorgtr;this._dscal = dscal; this._dsteqr = dsteqr; this._dsterf = dsterf; this._dsytrd = dsytrd; this._xerbla = xerbla; #endregion }
public DSYEV() { #region Dependencies (Initialization) LSAME lsame = new LSAME(); IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); DLAMC3 dlamc3 = new DLAMC3(); DLASSQ dlassq = new DLASSQ(); XERBLA xerbla = new XERBLA(); DCOPY dcopy = new DCOPY(); DSCAL dscal = new DSCAL(); DLAPY2 dlapy2 = new DLAPY2(); DLAE2 dlae2 = new DLAE2(); DLAEV2 dlaev2 = new DLAEV2(); DSWAP dswap = new DSWAP(); DAXPY daxpy = new DAXPY(); DNRM2 dnrm2 = new DNRM2(); DDOT ddot = new DDOT(); 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); DLANSY dlansy = new DLANSY(dlassq, lsame); DLASCL dlascl = new DLASCL(lsame, dlamch, xerbla); DGEMM dgemm = new DGEMM(lsame, xerbla); DTRMM dtrmm = new DTRMM(lsame, xerbla); DLARFB dlarfb = new DLARFB(lsame, dcopy, dgemm, dtrmm); DGEMV dgemv = new DGEMV(lsame, xerbla); DTRMV dtrmv = new DTRMV(lsame, xerbla); DLARFT dlarft = new DLARFT(dgemv, dtrmv, lsame); DGER dger = new DGER(xerbla); DLARF dlarf = new DLARF(dgemv, dger, lsame); DORG2L dorg2l = new DORG2L(dlarf, dscal, xerbla); DORGQL dorgql = new DORGQL(dlarfb, dlarft, dorg2l, xerbla, ilaenv); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORGQR dorgqr = new DORGQR(dlarfb, dlarft, dorg2r, xerbla, ilaenv); DORGTR dorgtr = new DORGTR(lsame, ilaenv, dorgql, dorgqr, xerbla); DLANST dlanst = new DLANST(lsame, dlassq); DLARTG dlartg = new DLARTG(dlamch); DLASET dlaset = new DLASET(lsame); DLASR dlasr = new DLASR(lsame, xerbla); DLASRT dlasrt = new DLASRT(lsame, xerbla); DSTEQR dsteqr = new DSTEQR(lsame, dlamch, dlanst, dlapy2, dlae2, dlaev2, dlartg, dlascl, dlaset, dlasr , dlasrt, dswap, xerbla); DSTERF dsterf = new DSTERF(dlamch, dlanst, dlapy2, dlae2, dlascl, dlasrt, xerbla); DLARFG dlarfg = new DLARFG(dlamch, dlapy2, dnrm2, dscal); DSYMV dsymv = new DSYMV(lsame, xerbla); DLATRD dlatrd = new DLATRD(daxpy, dgemv, dlarfg, dscal, dsymv, lsame, ddot); DSYR2K dsyr2k = new DSYR2K(lsame, xerbla); DSYR2 dsyr2 = new DSYR2(lsame, xerbla); DSYTD2 dsytd2 = new DSYTD2(daxpy, dlarfg, dsymv, dsyr2, xerbla, lsame, ddot); DSYTRD dsytrd = new DSYTRD(dlatrd, dsyr2k, dsytd2, xerbla, lsame, ilaenv); #endregion #region Set Dependencies this._lsame = lsame; this._ilaenv = ilaenv; this._dlamch = dlamch; this._dlansy = dlansy; this._dlascl = dlascl; this._dorgtr = dorgtr; this._dscal = dscal; this._dsteqr = dsteqr; this._dsterf = dsterf; this._dsytrd = dsytrd; this._xerbla = xerbla; #endregion }