summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5Sff.F90
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2022-09-28 15:52:19 (GMT)
committerGitHub <noreply@github.com>2022-09-28 15:52:19 (GMT)
commit1bec0ce2d785b5c0d7f4514fb50f44b524fe4f67 (patch)
tree03bb3367f57f7feddef64ed17f45bfc423256c25 /fortran/src/H5Sff.F90
parent4184bac2ece1726056e5a0f3c91d38c5a5ef2c38 (diff)
downloadhdf5-1bec0ce2d785b5c0d7f4514fb50f44b524fe4f67.zip
hdf5-1bec0ce2d785b5c0d7f4514fb50f44b524fe4f67.tar.gz
hdf5-1bec0ce2d785b5c0d7f4514fb50f44b524fe4f67.tar.bz2
Misc. Fortran Doxygen updates (#2129)
Diffstat (limited to 'fortran/src/H5Sff.F90')
-rw-r--r--fortran/src/H5Sff.F90262
1 files changed, 127 insertions, 135 deletions
diff --git a/fortran/src/H5Sff.F90 b/fortran/src/H5Sff.F90
index 11404d4..b068deb 100644
--- a/fortran/src/H5Sff.F90
+++ b/fortran/src/H5Sff.F90
@@ -897,61 +897,58 @@ CONTAINS
DEALLOCATE(def_stride)
END SUBROUTINE h5sselect_hyperslab_f
-! !$!
-!>
-!! !$!
-!! !$! NAME
-!! !$! h5scombine_hyperslab_f
-!! !$!
-!! !$! PURPOSE
-!! !$! Combine a hyperslab selection with the current
-!! !$! selection for a dataspace
-!! !$!
-!! !$! INPUTS
-!! !$! space_id - dataspace of selection to use
-!! !$! operator - flag, valid values are:
-!! !$! H5S_SELECT_NOOP_F
-!! !$! H5S_SELECT_SET_F
-!! !$! H5S_SELECT_OR_F
-!! !$! H5S_SELECT_AND_F
-!! !$! H5S_SELECT_XOR_F
-!! !$! H5S_SELECT_NOTB_F
-!! !$! H5S_SELECT_NOTA_F
-!! !$! H5S_SELECT_APPEND_F
-!! !$! H5S_SELECT_PREPEND_F
-!! !$! start - array with hyperslab offsets
-!! !$! count - number of blocks included in the
-!! !$! hyperslab
-!! !$! OUTPUTS
-!! !$! hyper_id - identifier for the new hyperslab
-!! !$! hdferr: - error code
-!! !$! Success: 0
-!! !$! Failure: -1
-!! !$! OPTIONAL PARAMETERS
-!! !$! stride - array with hyperslab strides
-!! !$! block - array with hyperslab block sizes
-!! !$!
-!! !$! AUTHOR
-!! !$! Elena Pourmal
-!! !$! October 7, 2002
-!! !$!
-!! !$! HISTORY
-!! !$!
-!! !$!
-!! !$! NOTES
-!! !$! Commented out until 1.6 ? 10/08/2002
-!! !$!
-!! !$! SOURCE
+!
+! NAME
+! h5scombine_hyperslab_f
+!
+! PURPOSE
+! Combine a hyperslab selection with the current
+! selection for a dataspace
+!
+! INPUTS
+! space_id - dataspace of selection to use
+! operator - flag, valid values are:
+! H5S_SELECT_NOOP_F
+! H5S_SELECT_SET_F
+! H5S_SELECT_OR_F
+! H5S_SELECT_AND_F
+! H5S_SELECT_XOR_F
+! H5S_SELECT_NOTB_F
+! H5S_SELECT_NOTA_F
+! H5S_SELECT_APPEND_F
+! H5S_SELECT_PREPEND_F
+! start - array with hyperslab offsets
+! count - number of blocks included in the
+! hyperslab
+! OUTPUTS
+! hyper_id - identifier for the new hyperslab
+! hdferr: - error code
+! Success: 0
+! Failure: -1
+! OPTIONAL PARAMETERS
+! stride - array with hyperslab strides
+! block - array with hyperslab block sizes
+!
+! AUTHOR
+! Elena Pourmal
+! October 7, 2002
+!
+! HISTORY
+!
+!
+! NOTES
+! Commented out until 1.6 ? 10/08/2002
+!
+! SOURCE
! SUBROUTINE h5scombine_hyperslab_f(space_id, operator, start, count, &
! hyper_id, hdferr, stride, block)
! IMPLICIT NONE
-
- ! H5S_SELECT_AND_F
- ! H5S_SELECT_XOR_F
- ! H5S_SELECT_NOTB_F
- ! H5S_SELECT_NOTA_F
- ! H5S_SELECT_APPEND_F
- ! H5S_SELECT_PREPEND_F
+ ! H5S_SELECT_AND_F
+ ! H5S_SELECT_XOR_F
+ ! H5S_SELECT_NOTB_F
+ ! H5S_SELECT_NOTA_F
+ ! H5S_SELECT_APPEND_F
+ ! H5S_SELECT_PREPEND_F
!
! INTEGER :: rank
@@ -1019,49 +1016,46 @@ CONTAINS
! END SUBROUTINE h5scombine_hyperslab_f
-! !$!
-!>
-!! !$!
-!! !$! NAME
-!! !$! h5scombine_select_f
-!! !$!
-!! !$! PURPOSE
-!! !$! Combine two hyperslab selections with an operation
-!! !$! and return a dataspace with resulting selection.
-!! !$!
-!! !$! INPUTS
-!! !$! space1_id - dataspace of selection to use
-!! !$! operator - flag, valid values are:
-!! !$! H5S_SELECT_NOOP_F
-!! !$! H5S_SELECT_SET_F
-!! !$! H5S_SELECT_OR_F
-!! !$! H5S_SELECT_AND_F
-!! !$! H5S_SELECT_XOR_F
-!! !$! H5S_SELECT_NOTB_F
-!! !$! H5S_SELECT_NOTA_F
-!! !$! H5S_SELECT_APPEND_F
-!! !$! H5S_SELECT_PREPEND_F
-!! !$! space2_id - dataspace of selection to use
-!! !$! OUTPUTS
-!! !$! ds_id - idataspace identifier with the new selection
-!! !$! hdferr: - error code
-!! !$! Success: 0
-!! !$! Failure: -1
-!! !$! OPTIONAL PARAMETERS - NONE
-!! !$!
-!! !$! AUTHOR
-!! !$! Elena Pourmal
-!! !$! October 7, 2002
-!! !$!
-!! !$! HISTORY
-!! !$!
-!! !$!
-!! !$! NOTES commented out until 1.6 release(?) 10/08/2002
-!! !$!
!
-!! ! SOURCE
-! !$ SUBROUTINE h5scombine_select_f(space1_id, operator, space2_id, &
-! ds_id, hdferr)
+! NAME
+! h5scombine_select_f
+!
+! PURPOSE
+! Combine two hyperslab selections with an operation
+! and return a dataspace with resulting selection.
+!
+! INPUTS
+! space1_id - dataspace of selection to use
+! operator - flag, valid values are:
+! H5S_SELECT_NOOP_F
+! H5S_SELECT_SET_F
+! H5S_SELECT_OR_F
+! H5S_SELECT_AND_F
+! H5S_SELECT_XOR_F
+! H5S_SELECT_NOTB_F
+! H5S_SELECT_NOTA_F
+! H5S_SELECT_APPEND_F
+! H5S_SELECT_PREPEND_F
+! space2_id - dataspace of selection to use
+! OUTPUTS
+! ds_id - idataspace identifier with the new selection
+! hdferr: - error code
+! Success: 0
+! Failure: -1
+! OPTIONAL PARAMETERS - NONE
+!
+! AUTHOR
+! Elena Pourmal
+! October 7, 2002
+!
+! HISTORY
+!
+!
+! NOTES commented out until 1.6 release(?) 10/08/2002
+!
+!
+! SOURCE
+! SUBROUTINE h5scombine_select_f(space1_id, operator, space2_id, s_id, hdferr)
! IMPLICIT NONE
! H5S_SELECT_AND_F
@@ -1085,47 +1079,45 @@ CONTAINS
! END SUBROUTINE h5scombine_select_f
-! !$!
-!>
-!! !$!
-!! !$! NAME
-!! !$! h5smodify_select_f
-!! !$!
-!! !$! PURPOSE
-!! !$! Refine a hyperslab selection with an operation
-!! !$! using second hyperslab
-!! !$!
-!! !$! INPUTS
-!! !$! space1_id - dataspace of selection to modify
-!! !$! operator - flag, valid values are:
-!! !$! H5S_SELECT_NOOP_F
-!! !$! H5S_SELECT_SET_F
-!! !$! H5S_SELECT_OR_F
-!! !$! H5S_SELECT_AND_F
-!! !$! H5S_SELECT_XOR_F
-!! !$! H5S_SELECT_NOTB_F
-!! !$! H5S_SELECT_NOTA_F
-!! !$! H5S_SELECT_APPEND_F
-!! !$! H5S_SELECT_PREPEND_F
-!! !$! space2_id - dataspace of selection to use
-!! !$!
-!! !$! OUTPUTS
-!! !$! hdferr: - error code
-!! !$! Success: 0
-!! !$! Failure: -1
-!! !$! OPTIONAL PARAMETERS - NONE
-!! !$!
-!! !$! AUTHOR
-!! !$! Elena Pourmal
-!! !$! October 7, 2002
-!! !$!
-!! !$! HISTORY
-!! !$!
-!! !$!
-!! !$! NOTESCommented out until 1.6 release(?) 10/08/2002 EIP
-!! !$!
!
-!! ! SOURCE
+! NAME
+! h5smodify_select_f
+!
+! PURPOSE
+! Refine a hyperslab selection with an operation
+! using second hyperslab
+!
+! INPUTS
+! space1_id - dataspace of selection to modify
+! operator - flag, valid values are:
+! H5S_SELECT_NOOP_F
+! H5S_SELECT_SET_F
+! H5S_SELECT_OR_F
+! H5S_SELECT_AND_F
+! H5S_SELECT_XOR_F
+! H5S_SELECT_NOTB_F
+! H5S_SELECT_NOTA_F
+! H5S_SELECT_APPEND_F
+! H5S_SELECT_PREPEND_F
+! space2_id - dataspace of selection to use
+!
+! OUTPUTS
+! hdferr: - error code
+! Success: 0
+! Failure: -1
+! OPTIONAL PARAMETERS - NONE
+!
+! AUTHOR
+! Elena Pourmal
+! October 7, 2002
+!
+! HISTORY
+!
+!
+! NOTESCommented out until 1.6 release(?) 10/08/2002 EIP
+!
+!
+! SOURCE
! SUBROUTINE h5smodify_select_f(space1_id, operator, space2_id, &
! hdferr)
! IMPLICIT NONE
@@ -1136,7 +1128,7 @@ CONTAINS
! H5S_SELECT_NOTA_F
! H5S_SELECT_APPEND_F
! H5S_SELECT_PREPEND_F
- !
+ !
! space2_id)