93 double A[] = { 1.1, 0.1, .01, 0.9 };
96 double B[] = { 0.1, 0.2 };
100 const double refX[] = {0.088978766430738, 0.212335692618807};
102 Teuchos::LAPACK<int,double> teuchos_lapack;
103 teuchos_lapack.GESV(n, nrhs, &A[0], lda, &IPIV[0], &
B[0], ldb, &info);