summaryrefslogtreecommitdiffstats
path: root/fortran/testpar/hyper.f90
diff options
context:
space:
mode:
authorAllen Byrne <byrn@hdfgroup.org>2015-09-10 14:11:17 (GMT)
committerAllen Byrne <byrn@hdfgroup.org>2015-09-10 14:11:17 (GMT)
commit10da31a926a0a2b4e2cee11656a89d5ab966815e (patch)
treea1544263bd33d1bd3e904a7352766fc3eb60d303 /fortran/testpar/hyper.f90
parent1dc01a33b277bd48e6ac2d829d0f4f870cee83aa (diff)
downloadhdf5-10da31a926a0a2b4e2cee11656a89d5ab966815e.zip
hdf5-10da31a926a0a2b4e2cee11656a89d5ab966815e.tar.gz
hdf5-10da31a926a0a2b4e2cee11656a89d5ab966815e.tar.bz2
[svn-r27745] Merge trunk revision 27744
Diffstat (limited to 'fortran/testpar/hyper.f90')
-rw-r--r--fortran/testpar/hyper.f902
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/testpar/hyper.f90 b/fortran/testpar/hyper.f90
index a03095a..a2e2e07 100644
--- a/fortran/testpar/hyper.f90
+++ b/fortran/testpar/hyper.f90
@@ -21,8 +21,8 @@
SUBROUTINE hyper(length,do_collective,do_chunk, mpi_size, mpi_rank, nerrors)
USE HDF5
USE TH5_MISC
- USE mpi
IMPLICIT NONE
+ INCLUDE 'mpif.h'
INTEGER, INTENT(in) :: length ! array length
LOGICAL, INTENT(in) :: do_collective ! use collective I/O