int test_Matrix::runtests()
{
//-------------------------------
// Test a Factory_Trilinos matrix.
if (localProc_==0) FEI_COUT << "Testing Factory_Trilinos fei::Matrix..." << FEI_ENDL;
fei::SharedPtr<fei::Factory> factory_trilinos(new Factory_Trilinos(comm_));
fei::SharedPtr<fei::Matrix> mat = create_matrix(factory_trilinos);
matrix_test1(mat);
if (localProc_==0) FEI_COUT << FEI_ENDL;
#ifdef HAVE_FEI_AZTECOO
//-------------------------------
// Test a matrix from a "snl_fei::Factory", which was created by the
// test-util function create_fei_Factory for library "Aztec", which causes
// an "old" LinearSystemCore object to be used as the underlying assembly layer.
// (It still ends up using Aztec if you create a solver and solve the linear-
// system, but it assembles data into non-Trilinos matrix/vector data structures.)
if (localProc_==0) FEI_COUT << "Testing 'old' factory_aztec fei::Matrix..." << FEI_ENDL;
fei::SharedPtr<fei::Factory> factory_aztec =
fei::create_fei_Factory(comm_, "Aztec");
fei::SharedPtr<fei::Matrix> mat1 = create_matrix(factory_aztec);
matrix_test1(mat1);
#endif
return(0);
}
int main(int argc, char *argv[]) {
matrix_test1();
return 0;
}
