diff options
author | Vivian McPhail <haskell.vivian.mcphail@gmail.com> | 2010-09-20 03:48:46 +0000 |
---|---|---|
committer | Vivian McPhail <haskell.vivian.mcphail@gmail.com> | 2010-09-20 03:48:46 +0000 |
commit | 482b533c3fbfcd75d6c5c1d3ce32585bf9fc2ad7 (patch) | |
tree | 82f284eeb1cf03fd4514960b848d38e5af94e709 /lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h | |
parent | 503f598801b67886028d9ffdfdef38813954e46f (diff) |
remove Fractional from Element
Diffstat (limited to 'lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h')
-rw-r--r-- | lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h b/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h index 12dcde4..0543f7a 100644 --- a/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h +++ b/lib/Numeric/LinearAlgebra/LAPACK/lapack-aux.h | |||
@@ -64,18 +64,22 @@ typedef short ftnlen; | |||
64 | 64 | ||
65 | /********************************************************/ | 65 | /********************************************************/ |
66 | 66 | ||
67 | int multiplyF(int ta, int tb, KFMAT(a),KFMAT(b),FMAT(r)); | ||
67 | int multiplyR(int ta, int tb, KDMAT(a),KDMAT(b),DMAT(r)); | 68 | int multiplyR(int ta, int tb, KDMAT(a),KDMAT(b),DMAT(r)); |
68 | int multiplyC(int ta, int tb, KCMAT(a),KCMAT(b),CMAT(r)); | 69 | int multiplyC(int ta, int tb, KCMAT(a),KCMAT(b),CMAT(r)); |
70 | int multiplyQ(int ta, int tb, KQMAT(a),KQMAT(b),QMAT(r)); | ||
69 | 71 | ||
70 | int transF(KFMAT(x),FMAT(t)); | 72 | int transF(KFMAT(x),FMAT(t)); |
71 | int transR(KDMAT(x),DMAT(t)); | 73 | int transR(KDMAT(x),DMAT(t)); |
72 | int transQ(KQMAT(x),QMAT(t)); | 74 | int transQ(KQMAT(x),QMAT(t)); |
73 | int transC(KCMAT(x),CMAT(t)); | 75 | int transC(KCMAT(x),CMAT(t)); |
76 | int transP(KPMAT(x),PMAT(t)); | ||
74 | 77 | ||
75 | int constantF(float * pval, FVEC(r)); | 78 | int constantF(float * pval, FVEC(r)); |
76 | int constantR(double * pval, DVEC(r)); | 79 | int constantR(double * pval, DVEC(r)); |
77 | int constantQ(complex* pval, QVEC(r)); | 80 | int constantQ(complex* pval, QVEC(r)); |
78 | int constantC(doublecomplex* pval, CVEC(r)); | 81 | int constantC(doublecomplex* pval, CVEC(r)); |
82 | int constantP(void* pval, PVEC(r)); | ||
79 | 83 | ||
80 | int float2double(FVEC(x),DVEC(y)); | 84 | int float2double(FVEC(x),DVEC(y)); |
81 | int double2float(DVEC(x),FVEC(y)); | 85 | int double2float(DVEC(x),FVEC(y)); |