diff options
author | Elena Pourmal <epourmal@hdfgroup.org> | 2000-12-13 19:21:52 (GMT) |
---|---|---|
committer | Elena Pourmal <epourmal@hdfgroup.org> | 2000-12-13 19:21:52 (GMT) |
commit | c701e8b89f694cecbbb5319ec872ef78ea3bfa92 (patch) | |
tree | d9594fb8315db04fdcb88fb256b559ceda8e966a /fortran/testpar | |
parent | c85098bd45ba7b5acad1a9f3f4bd4948d2540388 (diff) | |
download | hdf5-c701e8b89f694cecbbb5319ec872ef78ea3bfa92.zip hdf5-c701e8b89f694cecbbb5319ec872ef78ea3bfa92.tar.gz hdf5-c701e8b89f694cecbbb5319ec872ef78ea3bfa92.tar.bz2 |
[svn-r3130]
Purpose:
Maintenance
Description:
Not all platforms support F90 MPI. I used USE MPI statement, and
it did not work on T3E (mcurie.nersc.gov)
Solution:
Use INCLUDE 'MPIF.H' statement instead of USE MPI.
Platforms tested:
O2K and T3E
Diffstat (limited to 'fortran/testpar')
-rw-r--r-- | fortran/testpar/ptesthdf5_fortran.f90 | 2 | ||||
-rw-r--r-- | fortran/testpar/thdf5.f90 | 3 |
2 files changed, 3 insertions, 2 deletions
diff --git a/fortran/testpar/ptesthdf5_fortran.f90 b/fortran/testpar/ptesthdf5_fortran.f90 index 4a99e4c..c44008d 100644 --- a/fortran/testpar/ptesthdf5_fortran.f90 +++ b/fortran/testpar/ptesthdf5_fortran.f90 @@ -5,7 +5,7 @@ USE HDF5 ! This module contains all necessary modules USE THDF5 - USE MPI +! USE MPI IMPLICIT NONE INTEGER :: error ! Error flags diff --git a/fortran/testpar/thdf5.f90 b/fortran/testpar/thdf5.f90 index 9552df8..0d38f88 100644 --- a/fortran/testpar/thdf5.f90 +++ b/fortran/testpar/thdf5.f90 @@ -1,6 +1,7 @@ MODULE THDF5 USE HDF5 - USE MPI + include 'mpif.h' +! USE MPI ! Dataset dimensions |