Commit 6b1fd49b authored by Dmitry Bagaev's avatar Dmitry Bagaev

Some fixes

# SolverPETSc cmake file case sensitive
# SuperLU segmentation fault fixed
# Trilinos enumeration namespace fixed
# Examples mpi off fixed
parent 843e751c
set(SOURCE ${SOURCE} ${CMAKE_CURRENT_SOURCE_DIR}/solver_petsc.cpp)
set(SOURCE ${SOURCE} ${CMAKE_CURRENT_SOURCE_DIR}/solver_petsc.h)
set(SOURCE ${SOURCE} ${CMAKE_CURRENT_SOURCE_DIR}/SolverPETSC.cpp)
set(SOURCE ${SOURCE} ${CMAKE_CURRENT_SOURCE_DIR}/SolverPETSc.cpp)
set(HEADER ${HEADER} ${CMAKE_CURRENT_SOURCE_DIR}/SolverPETSc.h)
set(SOURCE ${SOURCE} PARENT_SCOPE)
......
......@@ -155,7 +155,7 @@ namespace INMOST {
}
SolverSUPERLU::~SolverSUPERLU() {
this->Clear();
//this->Clear();
}
......
......@@ -66,7 +66,7 @@ namespace INMOST {
for (k = imbeg; k < imend; ++k) {
temporary[k - imbeg] = A[k].Size();
}
matrix = new Epetra_CrsMatrix(Epetra_DataAccess::Copy, Map, temporary, true);
matrix = new Epetra_CrsMatrix(::Copy, Map, temporary, true);
delete[] temporary;
refill = false;
}
......
......@@ -110,8 +110,9 @@ int main(int argc,char ** argv)
//b.Save("b.rhs");
//A.Save("A.mtx");
}
#if defined(USE_MPI)
MPI_Barrier(MPI_COMM_WORLD);
#endif
Solver::Finalize(); // Finalize solver and close MPI activity
return 0;
}
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment