diff options
author | Albert Cheng <acheng@hdfgroup.org> | 2004-09-22 16:04:24 (GMT) |
---|---|---|
committer | Albert Cheng <acheng@hdfgroup.org> | 2004-09-22 16:04:24 (GMT) |
commit | 047be918c872e500f868ecce3cad699d5eb3c7ee (patch) | |
tree | cf72307638fba64e1d82c028becb665946b7b9ee /release_docs | |
parent | 6481d1a82e93096f209805e4215eb6129b98ac6b (diff) | |
download | hdf5-047be918c872e500f868ecce3cad699d5eb3c7ee.zip hdf5-047be918c872e500f868ecce3cad699d5eb3c7ee.tar.gz hdf5-047be918c872e500f868ecce3cad699d5eb3c7ee.tar.bz2 |
[svn-r9303] Updated the Fortran Sample program to use the INCLUDE instead of the
USE statement.
Diffstat (limited to 'release_docs')
-rw-r--r-- | release_docs/INSTALL_parallel | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/release_docs/INSTALL_parallel b/release_docs/INSTALL_parallel index 64e85c4..65014da 100644 --- a/release_docs/INSTALL_parallel +++ b/release_docs/INSTALL_parallel @@ -382,13 +382,19 @@ main(int ac, char **av) ! The following example demonstrates how to create and close a parallel ! file using MPI-IO calls. ! +! USE MPI is the proper way to bring in MPI definitions but many +! MPI Fortran compiler supports the pseudo standard of INCLUDE. +! So, HDF5 uses the INCLUDE statement instead. +! PROGRAM MPIOEXAMPLE - USE MPI - + ! USE MPI + IMPLICIT NONE + INCLUDE 'mpif.h' + CHARACTER(LEN=80), PARAMETER :: filename = "filef.h5" ! File name INTEGER :: ierror ! Error flag INTEGER :: fh ! File handle |