From c701e8b89f694cecbbb5319ec872ef78ea3bfa92 Mon Sep 17 00:00:00 2001
From: Elena Pourmal <epourmal@hdfgroup.org>
Date: Wed, 13 Dec 2000 14:21:52 -0500
Subject: [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

---
 fortran/testpar/ptesthdf5_fortran.f90 | 2 +-
 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
 
-- 
cgit v0.12