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