metis no MPI

Author: scivision

CMakeLists.txt

@@ -10,6 +10,10 @@ set(arith "d")
 
 include(cmake/options.cmake)
 
+add_compile_options(
+$<$<AND:$<CONFIG:Release>,$<COMPILE_LANG_AND_ID:Fortran,GNU>>:-fno-backtrace>
+)
+
 find_package(MPI COMPONENTS C Fortran REQUIRED)
 find_package(LAPACK REQUIRED)
 find_package(SCALAPACK REQUIRED)

src/CMakeLists.txt

@@ -1,11 +1,7 @@
 if(METIS_FOUND)
   add_executable(metis_demo metis.f90)
   target_link_libraries(metis_demo PRIVATE METIS::METIS)
-
-  add_test(NAME Metis
-  COMMAND ${MPIEXEC_EXECUTABLE} ${MPIEXEC_NUMPROC_FLAG} ${MPIEXEC_MAX_NUMPROCS} $<TARGET_FILE:metis_demo>
-  WORKING_DIRECTORY ${CMAKE_CURRENT_SOURCE_DIR}
-  )
+  add_test(NAME Metis COMMAND metis_demo)
 endif()
 
 if(MUMPS_FOUND)

src/metis.f90

@@ -66,9 +66,7 @@ program test_metis
 
 call METIS_PartGraphKway(nvtxs, ncon, xadj, adjncy, vwgt, vsize, adjwgt, nparts, tpwgts, ubvec, options, objval, part)
 
-do, j=1,nvtxs
-  print *, j, part(j)
-enddo
+print '(15I3)', part
 
 refpart = [3,1,1,2,4,3,4,2,2,4,3,1,1,2,4]