diff options
| author | Dana Robinson <derobins@hdfgroup.org> | 2019-07-19 07:48:00 (GMT) |
|---|---|---|
| committer | Larry Knox <lrknox@hdfgroup.org> | 2020-04-16 19:52:10 (GMT) |
| commit | ae6467dee4932133a5fed4b1317c48c4376ccda9 (patch) | |
| tree | f45a76c8cb7cf64bd735c42b3f687c7762ca1ffb /fortran/testpar | |
| parent | 82bace8f563f16a5326e165cc818f75d8fc2f8db (diff) | |
| download | hdf5-ae6467dee4932133a5fed4b1317c48c4376ccda9.zip hdf5-ae6467dee4932133a5fed4b1317c48c4376ccda9.tar.gz hdf5-ae6467dee4932133a5fed4b1317c48c4376ccda9.tar.bz2 | |
Parallel Fortran tests now use the MPI module instead of including
mpif.h.
Diffstat (limited to 'fortran/testpar')
| -rw-r--r-- | fortran/testpar/hyper.f90 | 3 | ||||
| -rw-r--r-- | fortran/testpar/mdset.f90 | 3 |
2 files changed, 4 insertions, 2 deletions
diff --git a/fortran/testpar/hyper.f90 b/fortran/testpar/hyper.f90 index 22f641d..c07636f 100644 --- a/fortran/testpar/hyper.f90 +++ b/fortran/testpar/hyper.f90 @@ -18,9 +18,10 @@ SUBROUTINE hyper(length,do_collective,do_chunk, mpi_size, mpi_rank, nerrors) USE HDF5 + USE MPI USE TH5_MISC + IMPLICIT NONE - INCLUDE 'mpif.h' INTEGER, INTENT(in) :: length ! array length LOGICAL, INTENT(in) :: do_collective ! use collective I/O diff --git a/fortran/testpar/mdset.f90 b/fortran/testpar/mdset.f90 index 70d2939..3de61c3 100644 --- a/fortran/testpar/mdset.f90 +++ b/fortran/testpar/mdset.f90 @@ -18,9 +18,10 @@ SUBROUTINE multiple_dset_write(length, do_collective, do_chunk, mpi_size, mpi_rank, nerrors) USE HDF5 + USE MPI USE TH5_MISC + IMPLICIT NONE - INCLUDE 'mpif.h' INTEGER, INTENT(in) :: length ! array length LOGICAL, INTENT(in) :: do_collective ! use collective I/O |