public DORGHR() { #region Dependencies (Initialization) LSAME lsame = new LSAME(); DCOPY dcopy = new DCOPY(); XERBLA xerbla = new XERBLA(); DSCAL dscal = new DSCAL(); IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); 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); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); ILAENV ilaenv = new ILAENV(ieeeck, iparmq); DORGQR dorgqr = new DORGQR(dlarfb, dlarft, dorg2r, xerbla, ilaenv); #endregion #region Set Dependencies this._dorgqr = dorgqr; this._xerbla = xerbla; this._ilaenv = ilaenv; #endregion }
public DORGQR(DLARFB dlarfb, DLARFT dlarft, DORG2R dorg2r, XERBLA xerbla, ILAENV ilaenv) { #region Set Dependencies this._dlarfb = dlarfb; this._dlarft = dlarft; this._dorg2r = dorg2r; this._xerbla = xerbla; this._ilaenv = ilaenv; #endregion }
public DGGSVD() { #region Dependencies (Initialization) 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(); DLAPMT dlapmt = new DLAPMT(); DDOT ddot = new DDOT(); DAXPY daxpy = new DAXPY(); DLAS2 dlas2 = new DLAS2(); DROT drot = new DROT(); 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); DORM2R dorm2r = new DORM2R(lsame, dlarf, xerbla); DGEQPF dgeqpf = new DGEQPF(dgeqr2, dlarf, dlarfg, dorm2r, dswap, xerbla, idamax, dlamch, dnrm2); DGERQ2 dgerq2 = new DGERQ2(dlarf, dlarfg, xerbla); DLACPY dlacpy = new DLACPY(lsame); DLASET dlaset = new DLASET(lsame); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORMR2 dormr2 = new DORMR2(lsame, dlarf, xerbla); DGGSVP dggsvp = new DGGSVP(lsame, dgeqpf, dgeqr2, dgerq2, dlacpy, dlapmt, dlaset, dorg2r, dorm2r, dormr2 , xerbla); DLARTG dlartg = new DLARTG(dlamch); DLASV2 dlasv2 = new DLASV2(dlamch); DLAGS2 dlags2 = new DLAGS2(dlartg, dlasv2); DLAPLL dlapll = new DLAPLL(ddot, daxpy, dlarfg, dlas2); DTGSJA dtgsja = new DTGSJA(lsame, dcopy, dlags2, dlapll, dlartg, dlaset, drot, dscal, xerbla); #endregion #region Set Dependencies this._lsame = lsame; this._dlamch = dlamch; this._dlange = dlange; this._dcopy = dcopy; this._dggsvp = dggsvp; this._dtgsja = dtgsja; this._xerbla = xerbla; #endregion }
public DGGSVP(LSAME lsame, DGEQPF dgeqpf, DGEQR2 dgeqr2, DGERQ2 dgerq2, DLACPY dlacpy, DLAPMT dlapmt, DLASET dlaset, DORG2R dorg2r, DORM2R dorm2r, DORMR2 dormr2 , XERBLA xerbla) { #region Set Dependencies this._lsame = lsame; this._dgeqpf = dgeqpf; this._dgeqr2 = dgeqr2; this._dgerq2 = dgerq2; this._dlacpy = dlacpy; this._dlapmt = dlapmt; this._dlaset = dlaset; this._dorg2r = dorg2r; this._dorm2r = dorm2r; this._dormr2 = dormr2; this._xerbla = xerbla; #endregion }
public DGGSVP(LSAME lsame, DGEQPF dgeqpf, DGEQR2 dgeqr2, DGERQ2 dgerq2, DLACPY dlacpy, DLAPMT dlapmt, DLASET dlaset, DORG2R dorg2r, DORM2R dorm2r, DORMR2 dormr2 , XERBLA xerbla) { #region Set Dependencies this._lsame = lsame; this._dgeqpf = dgeqpf; this._dgeqr2 = dgeqr2; this._dgerq2 = dgerq2; this._dlacpy = dlacpy; this._dlapmt = dlapmt;this._dlaset = dlaset; this._dorg2r = dorg2r; this._dorm2r = dorm2r; this._dormr2 = dormr2; this._xerbla = xerbla; #endregion }
public DGGSVP() { #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(); DSWAP dswap = new DSWAP(); IDAMAX idamax = new IDAMAX(); DLAPMT dlapmt = new DLAPMT(); 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); DGEQR2 dgeqr2 = new DGEQR2(dlarf, dlarfg, xerbla); DORM2R dorm2r = new DORM2R(lsame, dlarf, xerbla); DGEQPF dgeqpf = new DGEQPF(dgeqr2, dlarf, dlarfg, dorm2r, dswap, xerbla, idamax, dlamch, dnrm2); DGERQ2 dgerq2 = new DGERQ2(dlarf, dlarfg, xerbla); DLACPY dlacpy = new DLACPY(lsame); DLASET dlaset = new DLASET(lsame); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORMR2 dormr2 = new DORMR2(lsame, dlarf, xerbla); #endregion #region Set Dependencies this._lsame = lsame; this._dgeqpf = dgeqpf; this._dgeqr2 = dgeqr2; this._dgerq2 = dgerq2; this._dlacpy = dlacpy; this._dlapmt = dlapmt; this._dlaset = dlaset; this._dorg2r = dorg2r; this._dorm2r = dorm2r; this._dormr2 = dormr2; this._xerbla = xerbla; #endregion }
public DGGSVD() { #region Dependencies (Initialization) 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(); DLAPMT dlapmt = new DLAPMT(); DDOT ddot = new DDOT(); DAXPY daxpy = new DAXPY(); DLAS2 dlas2 = new DLAS2(); DROT drot = new DROT(); 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); DORM2R dorm2r = new DORM2R(lsame, dlarf, xerbla); DGEQPF dgeqpf = new DGEQPF(dgeqr2, dlarf, dlarfg, dorm2r, dswap, xerbla, idamax, dlamch, dnrm2); DGERQ2 dgerq2 = new DGERQ2(dlarf, dlarfg, xerbla); DLACPY dlacpy = new DLACPY(lsame); DLASET dlaset = new DLASET(lsame); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORMR2 dormr2 = new DORMR2(lsame, dlarf, xerbla); DGGSVP dggsvp = new DGGSVP(lsame, dgeqpf, dgeqr2, dgerq2, dlacpy, dlapmt, dlaset, dorg2r, dorm2r, dormr2 , xerbla); DLARTG dlartg = new DLARTG(dlamch); DLASV2 dlasv2 = new DLASV2(dlamch); DLAGS2 dlags2 = new DLAGS2(dlartg, dlasv2); DLAPLL dlapll = new DLAPLL(ddot, daxpy, dlarfg, dlas2); DTGSJA dtgsja = new DTGSJA(lsame, dcopy, dlags2, dlapll, dlartg, dlaset, drot, dscal, xerbla); #endregion #region Set Dependencies this._lsame = lsame; this._dlamch = dlamch; this._dlange = dlange; this._dcopy = dcopy; this._dggsvp = dggsvp; this._dtgsja = dtgsja;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 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 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 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 DGESDD() { #region Dependencies (Initialization) LSAME lsame = new LSAME(); IEEECK ieeeck = new IEEECK(); IPARMQ iparmq = new IPARMQ(); DLAMC3 dlamc3 = new DLAMC3(); DLASSQ dlassq = new DLASSQ(); DCOPY dcopy = new DCOPY(); XERBLA xerbla = new XERBLA(); DLAMRG dlamrg = new DLAMRG(); DLAPY2 dlapy2 = new DLAPY2(); DROT drot = new DROT(); DNRM2 dnrm2 = new DNRM2(); DLASD5 dlasd5 = new DLASD5(); DLAS2 dlas2 = new DLAS2(); DLASQ5 dlasq5 = new DLASQ5(); DLAZQ4 dlazq4 = new DLAZQ4(); DSCAL dscal = new DSCAL(); DSWAP dswap = new DSWAP(); DLASDT dlasdt = new DLASDT(); 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); DLANST dlanst = new DLANST(lsame, dlassq); DLARTG dlartg = new DLARTG(dlamch); DLASCL dlascl = new DLASCL(lsame, dlamch, xerbla); DLACPY dlacpy = new DLACPY(lsame); DLASET dlaset = new DLASET(lsame); DLASD2 dlasd2 = new DLASD2(dlamch, dlapy2, dcopy, dlacpy, dlamrg, dlaset, drot, xerbla); DGEMM dgemm = new DGEMM(lsame, xerbla); DLAED6 dlaed6 = new DLAED6(dlamch); DLASD4 dlasd4 = new DLASD4(dlaed6, dlasd5, dlamch); DLASD3 dlasd3 = new DLASD3(dlamc3, dnrm2, dcopy, dgemm, dlacpy, dlascl, dlasd4, xerbla); DLASD1 dlasd1 = new DLASD1(dlamrg, dlascl, dlasd2, dlasd3, 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); DLASD0 dlasd0 = new DLASD0(dlasd1, dlasdq, dlasdt, xerbla); DLASD7 dlasd7 = new DLASD7(dcopy, dlamrg, drot, xerbla, dlamch, dlapy2); DLASD8 dlasd8 = new DLASD8(dcopy, dlascl, dlasd4, dlaset, xerbla, ddot, dlamc3, dnrm2); DLASD6 dlasd6 = new DLASD6(dcopy, dlamrg, dlascl, dlasd7, dlasd8, xerbla); DLASDA dlasda = new DLASDA(dcopy, dlasd6, dlasdq, dlasdt, dlaset, xerbla); DBDSDC dbdsdc = new DBDSDC(lsame, ilaenv, dlamch, dlanst, dcopy, dlartg, dlascl, dlasd0, dlasda, dlasdq , dlaset, dlasr, 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); DGEBD2 dgebd2 = new DGEBD2(dlarf, dlarfg, xerbla); DLABRD dlabrd = new DLABRD(dgemv, dlarfg, dscal); 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); DORGL2 dorgl2 = new DORGL2(dlarf, dscal, xerbla); DORGLQ dorglq = new DORGLQ(dlarfb, dlarft, dorgl2, xerbla, ilaenv); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORGQR dorgqr = new DORGQR(dlarfb, dlarft, dorg2r, xerbla, ilaenv); DORGBR dorgbr = new DORGBR(lsame, ilaenv, dorglq, dorgqr, 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._dbdsdc = dbdsdc; this._dgebrd = dgebrd; this._dgelqf = dgelqf; this._dgemm = dgemm; this._dgeqrf = dgeqrf; this._dlacpy = dlacpy;this._dlascl = dlascl; this._dlaset = dlaset; this._dorgbr = dorgbr; this._dorglq = dorglq; this._dorgqr = dorgqr;this._dormbr = dormbr; this._xerbla = xerbla; this._dlamch = dlamch; this._dlange = dlange; this._ilaenv = ilaenv;this._lsame = lsame; #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 }
public DGGSVP() { #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(); DSWAP dswap = new DSWAP(); IDAMAX idamax = new IDAMAX(); DLAPMT dlapmt = new DLAPMT(); 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); DGEQR2 dgeqr2 = new DGEQR2(dlarf, dlarfg, xerbla); DORM2R dorm2r = new DORM2R(lsame, dlarf, xerbla); DGEQPF dgeqpf = new DGEQPF(dgeqr2, dlarf, dlarfg, dorm2r, dswap, xerbla, idamax, dlamch, dnrm2); DGERQ2 dgerq2 = new DGERQ2(dlarf, dlarfg, xerbla); DLACPY dlacpy = new DLACPY(lsame); DLASET dlaset = new DLASET(lsame); DORG2R dorg2r = new DORG2R(dlarf, dscal, xerbla); DORMR2 dormr2 = new DORMR2(lsame, dlarf, xerbla); #endregion #region Set Dependencies this._lsame = lsame; this._dgeqpf = dgeqpf; this._dgeqr2 = dgeqr2; this._dgerq2 = dgerq2; this._dlacpy = dlacpy; this._dlapmt = dlapmt;this._dlaset = dlaset; this._dorg2r = dorg2r; this._dorm2r = dorm2r; this._dormr2 = dormr2; this._xerbla = xerbla; #endregion }