tweak the fc_mpi test to use both the module mpi.F90 and include mpif.h
This commit is contained in:
@ -1,5 +1,5 @@
|
||||
if (MPI_FOUND)
|
||||
add_executable(example example.f90)
|
||||
add_executable(example example.F90)
|
||||
else()
|
||||
message(FATAL "MPI not found!")
|
||||
endif()
|
||||
|
@ -1,8 +1,12 @@
|
||||
program example
|
||||
|
||||
#if defined USE_MPI_MODULE
|
||||
use mpi
|
||||
|
||||
implicit none
|
||||
#else
|
||||
implicit none
|
||||
#include "mpif.h"
|
||||
#endif
|
||||
|
||||
integer :: ierr, rank, num_ranks
|
||||
logical :: test_ok
|
Reference in New Issue
Block a user