[svn-r4824]

Purpose:
    Bugfixes.
Description:
    Corrected spellings of FORTRAN function names (mpi --> mpio)
        h5pset/get_fapl_mpio_f  &  h5pset/get_dxpl_mpio_f
Platforms tested:
    IE 5
This commit is contained in:
Frank Baker
2002-01-15 10:10:08 -05:00
parent e379743b6e
commit d19059b61e

View File

@@ -1228,15 +1228,15 @@ FORTRAN Property List API -- h5p
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5pset_fapl_mpi_f">
<a name="h5pset_fapl_mpio_f">
<p>&nbsp;
</a>
<dt><strong>FORTRAN interface:</strong> &nbsp <strong>h5pset_fapl_mpi_f</strong>
<dt><strong>FORTRAN interface:</strong> &nbsp <strong>h5pset_fapl_mpio_f</strong>
<pre>
SUBROUTINE h5pset_fapl_mpi_f(prp_id, comm, info, hdferr)
SUBROUTINE h5pset_fapl_mpio_f(prp_id, comm, info, hdferr)
IMPLICIT NONE
INTEGER(HID_T), INTENT(IN) :: prp_id ! Property list identifier
INTEGER, INTENT(IN) :: comm ! MPI communicator to be used for file open
@@ -1244,7 +1244,7 @@ FORTRAN Property List API -- h5p
INTEGER, INTENT(IN) :: info ! MPI info object to be used for file open
! as defined in MPI_FILE_OPEN of MPI-2
INTEGER, INTENT(OUT) :: hdferr ! Error code
END SUBROUTINE h5pset_fapl_mpi_f
END SUBROUTINE h5pset_fapl_mpio_f
</pre>
@@ -1252,22 +1252,22 @@ FORTRAN Property List API -- h5p
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5pget_fapl_mpi_f">
<a name="h5pget_fapl_mpio_f">
<p>&nbsp;
</a>
<dt><strong>FORTRAN interface:</strong> &nbsp <strong>h5pget_fapl_mpi_f</strong>
<dt><strong>FORTRAN interface:</strong> &nbsp <strong>h5pget_fapl_mpio_f</strong>
<pre>
SUBROUTINE h5pget_fapl_mpi_f(prp_id, comm, info, hdferr)
SUBROUTINE h5pget_fapl_mpio_f(prp_id, comm, info, hdferr)
IMPLICIT NONE
INTEGER(HID_T), INTENT(IN) :: prp_id ! Property list identifier
INTEGER, INTENT(OUT) :: comm ! buffer to return communicator
INTEGER, INTENT(IN) :: info ! buffer to return info object
! as defined in MPI_FILE_OPEN of MPI-2
INTEGER, INTENT(OUT) :: hdferr ! Error code
END SUBROUTINE h5pget_fapl_mpi_f
END SUBROUTINE h5pget_fapl_mpio_f
</pre>
@@ -1275,22 +1275,22 @@ FORTRAN Property List API -- h5p
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5pset_dxpl_mpi_f">
<a name="h5pset_dxpl_mpio_f">
<p>&nbsp;
</a>
<dt><strong>FORTRAN interface:</strong> &nbsp <strong>h5pset_dxpl_mpi_f</strong>
<dt><strong>FORTRAN interface:</strong> &nbsp <strong>h5pset_dxpl_mpio_f</strong>
<pre>
SUBROUTINE h5pset_dxpl_mpi_f(prp_id, data_xfer_mode, hdferr)
SUBROUTINE h5pset_dxpl_mpio_f(prp_id, data_xfer_mode, hdferr)
IMPLICIT NONE
INTEGER(HID_T), INTENT(IN) :: prp_id ! Property list identifier
INTEGER, INTENT(IN) :: data_xfer_mode ! Data transfer mode. Possible values are:
! H5FD_MPIO_INDEPENDENT_F (0)
! H5FD_MPIO_COLLECTIVE_F (1)
INTEGER, INTENT(OUT) :: hdferr ! Error code
END SUBROUTINE h5pset_dxpl_mpi_f
END SUBROUTINE h5pset_dxpl_mpio_f
</pre>
@@ -1298,22 +1298,22 @@ FORTRAN Property List API -- h5p
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5pget_dxpl_mpi_f">
<a name="h5pget_dxpl_mpio_f">
<p>&nbsp;
</a>
<dt><strong>FORTRAN interface:</strong> &nbsp <strong>h5pget_dxpl_mpi_f</strong>
<dt><strong>FORTRAN interface:</strong> &nbsp <strong>h5pget_dxpl_mpio_f</strong>
<pre>
SUBROUTINE h5pget_dxpl_mpi_f(prp_id, data_xfer_mode, hdferr)
SUBROUTINE h5pget_dxpl_mpio_f(prp_id, data_xfer_mode, hdferr)
IMPLICIT NONE
INTEGER(HID_T), INTENT(IN) :: prp_id ! Property list identifier
INTEGER, INTENT(OUT) :: data_xfer_mode ! Data transfer mode. Possible values are:
! H5FD_MPIO_INDEPENDENT_F (0)
! H5FD_MPIO_COLLECTIVE_F (1)
INTEGER, INTENT(OUT) :: hdferr ! Error code
END SUBROUTINE h5pget_dxpl_mpi_f
END SUBROUTINE h5pget_dxpl_mpio_f
</pre>