diff options
Diffstat (limited to 'relapack/test/xtrtri.c')
-rw-r--r-- | relapack/test/xtrtri.c | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/relapack/test/xtrtri.c b/relapack/test/xtrtri.c new file mode 100644 index 000000000..106391bc8 --- /dev/null +++ b/relapack/test/xtrtri.c @@ -0,0 +1,25 @@ +#include "test.h" + +datatype *A[2]; +int info; + +void pre() { + x2matgen(n, n, A[0], A[1]); +} + +void post() { + error = x2vecerr(n * n, A[0], A[1]); +} + +void tests() { + A[0] = xmalloc(n * n); + A[1] = xmalloc(n * n); + + #define ROUTINE XPREF(trtri) + + TEST("L", "N", &n, A[i], &n, &info); + TEST("U", "N", &n, A[i], &n, &info); + + free(A[0]); + free(A[1]); +} |