30#ifndef FADLAPACKUNITTESTS_HPP
31#define FADLAPACKUNITTESTS_HPP
43#define COMPARE_FAD_VECTORS(X1, X2, n) \
44 ASSERT_TRUE(X1.size() == std::size_t(n)); \
45 ASSERT_TRUE(X2.size() == std::size_t(n)); \
46 for (unsigned int i=0; i<n; i++) { \
47 COMPARE_FADS(X1[i], X2[i]); \
52template <
class FadType>
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);
TYPED_TEST_SUITE_P(FadLAPACKUnitTests)
REGISTER_TYPED_TEST_SUITE_P(FadLAPACKUnitTests, testGESV)
TYPED_TEST_P(FadLAPACKUnitTests, testGESV)
#define COMPARE_VALUES(a, b)
Sacado::Random< ScalarType > urand
Sacado::Fad::Vector< unsigned int, FadType > VectorType
Sacado::Random< double > real_urand
Sacado::ScalarType< FadType >::type ScalarType
A class for storing a contiguously allocated array of Fad objects. This is a general definition that ...
A random number generator that generates random numbers uniformly distributed in the interval (a,...