diff options
author | ultramn <dchapm2@umbc.edu> | 2016-12-17 21:32:47 -0800 |
---|---|---|
committer | ultramn <dchapm2@umbc.edu> | 2016-12-17 21:32:47 -0800 |
commit | d1bb7ae144d499d9db554c51926e52aebb332228 (patch) | |
tree | 8a178412bb846f5f748d439e9a8dde090ae9c9d1 /dave/dclapack_test.c | |
parent | ebb2d6b456dfddbf7edb6358d4b4c71bfdd85a55 (diff) | |
download | libsurvive-d1bb7ae144d499d9db554c51926e52aebb332228.tar.gz libsurvive-d1bb7ae144d499d9db554c51926e52aebb332228.tar.bz2 |
Fixed a bug with dclapack.
Diffstat (limited to 'dave/dclapack_test.c')
-rw-r--r-- | dave/dclapack_test.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/dave/dclapack_test.c b/dave/dclapack_test.c index 38ae651..b0667ef 100644 --- a/dave/dclapack_test.c +++ b/dave/dclapack_test.c @@ -11,7 +11,7 @@ int main() float Ainv[ORDER][ORDER]; float Prod[ORDER][ORDER]; - int i, j, n = 12; + int i, j, n = 3; srand(7779); for(i=0; i<n; i++) { @@ -24,6 +24,7 @@ int main() INV(A,Ainv,n); } + PRINT(A,n,n); PRINT(Ainv,n,n); MUL(A,Ainv,Prod,n,n,n); PRINT(Prod,n,n); |