summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5Pf.c
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2015-08-11 14:35:30 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2015-08-11 14:35:30 (GMT)
commitcaf0e7692a2f3cf0f2d0957c30a404e6c706d3df (patch)
treeec3eddd4abad940acc89f83c0f114203ff3d6345 /fortran/src/H5Pf.c
parent3b4696ccd16c2b98e2700a46bf7a5c76ef4a9764 (diff)
downloadhdf5-caf0e7692a2f3cf0f2d0957c30a404e6c706d3df.zip
hdf5-caf0e7692a2f3cf0f2d0957c30a404e6c706d3df.tar.gz
hdf5-caf0e7692a2f3cf0f2d0957c30a404e6c706d3df.tar.bz2
[svn-r27493] Trying again to merge the F2003_v1.10 branch to the trunk.
Tested: h5committest --PASSED--
Diffstat (limited to 'fortran/src/H5Pf.c')
-rw-r--r--fortran/src/H5Pf.c2627
1 files changed, 1239 insertions, 1388 deletions
diff --git a/fortran/src/H5Pf.c b/fortran/src/H5Pf.c
index fe2f21a..9735f48 100644
--- a/fortran/src/H5Pf.c
+++ b/fortran/src/H5Pf.c
@@ -1,6 +1,6 @@
/****h* H5Pf/H5Pf
* PURPOSE
- * This file contains C stubs for H5P Fortran APIs
+ * This file contains C stubs for H5P Fortran APIs
*
* COPYRIGHT
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
@@ -23,18 +23,35 @@
#include "H5f90.h"
#include "H5Eprivate.h"
+#include "H5public.h"
+
+#ifdef H5_HAVE_PARALLEL
+
+#include <mpi.h>
+/* Support for C to Fortran translation in MPI */
+#ifndef H5_HAVE_MPI_MULTI_LANG_Comm
+#define MPI_Comm_c2f(comm) (int_f)(comm)
+#define MPI_Comm_f2c(comm) (MPI_Comm)(comm)
+#endif /*MPI Comm*/
+
+#ifndef H5_HAVE_MPI_MULTI_LANG_Info
+#define MPI_Info_c2f(info) (int_f)(info)
+#define MPI_Info_f2c(info) (MPI_Info)(info)
+#endif /*MPI Info*/
+
+#endif /*H5_HAVE_PARALLEL*/
/****if* H5Pf/h5pcreate_c
* NAME
- * h5pcreate_c
+ * h5pcreate_c
* PURPOSE
- * Call H5Pcreate to create a property list
+ * Call H5Pcreate to create a property list
* INPUTS
- * cls - property list class identifier
+ * cls - property list class identifier
* OUTPUTS
- * prp_id - identifier of the created property list
+ * prp_id - identifier of the created property list
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
* Wednesday, October 9, 2002
@@ -43,7 +60,7 @@
*/
int_f
-nh5pcreate_c ( hid_t_f *cls, hid_t_f *prp_id )
+h5pcreate_c ( hid_t_f *cls, hid_t_f *prp_id )
/******/
{
hid_t c_prp_id;
@@ -61,22 +78,22 @@ done:
/****if* H5Pf/h5pclose_c
* NAME
- * h5pclose_c
+ * h5pclose_c
* PURPOSE
- * Call H5Pclose to close property lis
+ * Call H5Pclose to close property lis
* INPUTS
- * prp_id - identifier of the property list to be closed
+ * prp_id - identifier of the property list to be closed
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Saturday, August 14, 1999
+ * Saturday, August 14, 1999
*
* SOURCE
*/
int_f
-nh5pclose_c ( hid_t_f *prp_id )
+h5pclose_c ( hid_t_f *prp_id )
/******/
{
int_f ret_value = 0;
@@ -90,23 +107,23 @@ nh5pclose_c ( hid_t_f *prp_id )
/****if* H5Pf/h5pcopy_c
* NAME
- * h5pcopy_c
+ * h5pcopy_c
* PURPOSE
- * Call H5Pcopy to copy property list
+ * Call H5Pcopy to copy property list
* INPUTS
- * prp_id - identifier of the property list to be copied
+ * prp_id - identifier of the property list to be copied
* OUTPUTS
- * new_prp_id - identifier of the new property list
+ * new_prp_id - identifier of the new property list
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Saturday, August 14, 1999
+ * Saturday, August 14, 1999
*
* SOURCE
*/
int_f
-nh5pcopy_c ( hid_t_f *prp_id , hid_t_f *new_prp_id)
+h5pcopy_c ( hid_t_f *prp_id , hid_t_f *new_prp_id)
/******/
{
hid_t c_new_prp_id;
@@ -124,24 +141,24 @@ done:
/****if* H5Pf/h5pequal_c
* NAME
- * h5pequal_c
+ * h5pequal_c
* PURPOSE
- * Call H5Pequal to check if two property lists are equal
+ * Call H5Pequal to check if two property lists are equal
* INPUTS
- * plist1_id - property list identifier
- * plist2_id - property list identifier
+ * plist1_id - property list identifier
+ * plist2_id - property list identifier
* OUTPUTS
- * c_flag - flag to indicate that lists are eqaul
+ * c_flag - flag to indicate that lists are eqaul
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday, September 30, 2002
+ * Monday, September 30, 2002
*
* SOURCE
*/
int_f
-nh5pequal_c ( hid_t_f *plist1_id , hid_t_f *plist2_id, int_f * c_flag)
+h5pequal_c ( hid_t_f *plist1_id , hid_t_f *plist2_id, int_f * c_flag)
/******/
{
htri_t c_c_flag;
@@ -176,7 +193,7 @@ done:
*/
int_f
-nh5pget_class_c ( hid_t_f *prp_id , hid_t_f *classtype)
+h5pget_class_c ( hid_t_f *prp_id , hid_t_f *classtype)
/******/
{
hid_t c_classtype;
@@ -193,15 +210,15 @@ done:
/****if* H5Pf/h5pset_preserve_c
* NAME
- * h5pset_preserve_c
+ * h5pset_preserve_c
* PURPOSE
- * Call H5Pset_preserve to set transfer property for compound
- * datatype
+ * Call H5Pset_preserve to set transfer property for compound
+ * datatype
* INPUTS
- * prp_id - property list identifier
- * flag - TRUE/FALSE flag
+ * prp_id - property list identifier
+ * flag - TRUE/FALSE flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
* Thursday, February 17, 2000
@@ -209,7 +226,7 @@ done:
*/
int_f
-nh5pset_preserve_c ( hid_t_f *prp_id , int_f *flag)
+h5pset_preserve_c ( hid_t_f *prp_id , int_f *flag)
/******/
{
int ret_value = 0;
@@ -227,16 +244,16 @@ nh5pset_preserve_c ( hid_t_f *prp_id , int_f *flag)
/****if* H5Pf/h5pget_preserve_c
* NAME
- * h5pget_preserve_c
+ * h5pget_preserve_c
* PURPOSE
- * Call H5Pget_preserve to set transfer property for compound
- * datatype
+ * Call H5Pget_preserve to set transfer property for compound
+ * datatype
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* OUTPUTS
- * flag - TRUE/FALSE flag
+ * flag - TRUE/FALSE flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
* Thursday, February 17, 2000
@@ -244,7 +261,7 @@ nh5pset_preserve_c ( hid_t_f *prp_id , int_f *flag)
*/
int_f
-nh5pget_preserve_c ( hid_t_f *prp_id , int_f *flag)
+h5pget_preserve_c ( hid_t_f *prp_id , int_f *flag)
/******/
{
int ret_value = 0;
@@ -260,22 +277,22 @@ nh5pget_preserve_c ( hid_t_f *prp_id , int_f *flag)
/****if* H5Pf/h5pset_deflate_c
* NAME
- * h5pset_deflate_c
+ * h5pset_deflate_c
* PURPOSE
- * Call H5Pset_deflate to set deflate level
+ * Call H5Pset_deflate to set deflate level
* INPUTS
- * prp_id - property list identifier
- * level - level of deflation
+ * prp_id - property list identifier
+ * level - level of deflation
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Saturday, August 14, 1999
+ * Saturday, August 14, 1999
* SOURCE
*/
int_f
-nh5pset_deflate_c ( hid_t_f *prp_id , int_f *level)
+h5pset_deflate_c ( hid_t_f *prp_id , int_f *level)
/******/
{
int ret_value = 0;
@@ -294,24 +311,24 @@ nh5pset_deflate_c ( hid_t_f *prp_id , int_f *level)
/****if* H5Pf/h5pset_chunk_c
* NAME
- * h5pset_chunk_c
+ * h5pset_chunk_c
* PURPOSE
- * Call H5Pset_chunk to set the sizes of chunks for a chunked
- * layout dataset
+ * Call H5Pset_chunk to set the sizes of chunks for a chunked
+ * layout dataset
* INPUTS
- * prp_id - property list identifier
- * rank - number of dimensions of each chunk
- * dims - array of the size of each chunk
+ * prp_id - property list identifier
+ * rank - number of dimensions of each chunk
+ * dims - array of the size of each chunk
* RETURNS
- * 0 on success, -1 on failure
- * Saturday, August 14, 1999
+ * 0 on success, -1 on failure
+ * Saturday, August 14, 1999
* AUTHOR
* Elena Pourmal
* SOURCE
*/
int_f
-nh5pset_chunk_c ( hid_t_f *prp_id, int_f *rank, hsize_t_f *dims )
+h5pset_chunk_c ( hid_t_f *prp_id, int_f *rank, hsize_t_f *dims )
/******/
{
int ret_value = -1;
@@ -338,24 +355,24 @@ DONE:
/****if* H5Pf/h5pget_chunk_c
* NAME
- * h5pget_chunk_c
+ * h5pget_chunk_c
* PURPOSE
- * Call H5Pget_chunk to get the sizes of chunks for a chunked
- * layout dataset for at list max_rank number of dimensions
+ * Call H5Pget_chunk to get the sizes of chunks for a chunked
+ * layout dataset for at list max_rank number of dimensions
* INPUTS
- * prp_id - property list identifier
- * max rank - maximum number of dimensions to return
- * dims - array of the size of each chunk
+ * prp_id - property list identifier
+ * max rank - maximum number of dimensions to return
+ * dims - array of the size of each chunk
* RETURNS
- * number of chunk's dimnesion on success, -1 on failure
- * Saturday, August 14, 1999
+ * number of chunk's dimnesion on success, -1 on failure
+ * Saturday, August 14, 1999
* AUTHOR
* Elena Pourmal
* SOURCE
*/
int_f
-nh5pget_chunk_c ( hid_t_f *prp_id, int_f *max_rank, hsize_t_f *dims )
+h5pget_chunk_c ( hid_t_f *prp_id, int_f *max_rank, hsize_t_f *dims )
/******/
{
int ret_value = -1;
@@ -377,36 +394,6 @@ nh5pget_chunk_c ( hid_t_f *prp_id, int_f *max_rank, hsize_t_f *dims )
return ret_value;
}
-/****if* H5Pf/h5pset_fill_valuec_c
- * NAME
- * h5pset_fill_valuec_c
- * PURPOSE
- * Call h5pset_fill_value_c to a character fill value
- * INPUTS
- * prp_id - property list identifier
- * type_id - datatype identifier (fill value is of type type_id)
- * fillvalue - character value
- * RETURNS
- * 0 on success, -1 on failure
- * Saturday, August 14, 1999
- * AUTHOR
- * Elena Pourmal
- * SOURCE
-*/
-int_f
-nh5pset_fill_valuec_c (hid_t_f *prp_id, hid_t_f *type_id, _fcd fillvalue)
-/******/
-{
- int ret_value = -1;
-
- /*
- * Call h5pset_fill_value_c function.
- */
- ret_value = h5pset_fill_value_c(prp_id, type_id, _fcdtocp(fillvalue));
-
- return ret_value;
-}
-
/****if* H5Pf/h5pset_fill_value_c
* NAME
* h5pset_fill_value_c
@@ -444,68 +431,6 @@ h5pset_fill_value_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue)
return ret_value;
}
-int_f
-nh5pset_fill_value_integer_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue)
-/******/
-{
- /*
- * Call h5pset_fill_value_c function.
- */
- return h5pset_fill_value_c(prp_id, type_id, fillvalue);
-}
-
-int_f
-nh5pset_fill_value_real_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue)
-{
- /*
- * Call h5pset_fill_value_c function.
- */
- return h5pset_fill_value_c(prp_id, type_id, fillvalue);
-}
-
-int_f
-nh5pset_fill_value_double_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue)
-{
- /*
- * Call h5pset_fill_value_c function.
- */
- return h5pset_fill_value_c(prp_id, type_id, fillvalue);
-}
-
-/****if* H5Pf/h5pget_fill_valuec_c
- * NAME
- * h5pget_fill_valuec_c
- * PURPOSE
- * Call h5pget_fill_value_c to a character fill value
- * INPUTS
- * prp_id - property list identifier
- * type_id - datatype identifier (fill value is of type type_id)
- * fillvalue - character value
- * RETURNS
- * 0 on success, -1 on failure
- * AUTHOR
- * Elena Pourmal
- * Saturday, August 14, 1999
- * HISTORY
- * Fixed wrong call to C wrapper, was nh5pset_fill_value_c, changed
- * to nh5pget_fill_value_c. MSB - 7/21/2014
- *
- * SOURCE
-*/
-int_f
-nh5pget_fill_valuec_c (hid_t_f *prp_id, hid_t_f *type_id, _fcd fillvalue)
-/******/
-{
- int ret_value = -1;
-
- /*
- * Call h5pget_fill_value_c function.
- */
- ret_value = h5pget_fill_value_c(prp_id, type_id, _fcdtocp(fillvalue));
-
- return ret_value;
-}
-
/****if* H5Pf/h5pget_fill_value_c
* NAME
* h5pget_fill_value_c
@@ -543,57 +468,30 @@ h5pget_fill_value_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue)
return ret_value;
}
-int_f
-nh5pget_fill_value_integer_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue)
-{
- /*
- * Call h5pget_fill_value_c function.
- */
- return h5pget_fill_value_c(prp_id, type_id, fillvalue);
-}
-
-int_f
-nh5pget_fill_value_real_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue)
-{
- /*
- * Call h5pget_fill_value_c function.
- */
- return h5pget_fill_value_c(prp_id, type_id, fillvalue);
-}
-
-int_f
-nh5pget_fill_value_double_c (hid_t_f *prp_id, hid_t_f *type_id, void *fillvalue)
-{
- /*
- * Call h5pget_fill_value_c function.
- */
- return h5pget_fill_value_c(prp_id, type_id, fillvalue);
-}
-
/****if* H5Pf/h5pget_version_c
* NAME
- * h5pget_version_c
+ * h5pget_version_c
* PURPOSE
- * Call H5Pget_version to get the version information
- * of various objects for a file creation property list
+ * Call H5Pget_version to get the version information
+ * of various objects for a file creation property list
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* OUTPUTS
- * boot - array to put boot block version number
- * freelist - array to put global freelist version number
- * stab - array to put symbol table version number
- * shhdr - array to put shared object header version number
+ * boot - array to put boot block version number
+ * freelist - array to put global freelist version number
+ * stab - array to put symbol table version number
+ * shhdr - array to put shared object header version number
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Wednesday, February 23, 2000
+ * Wednesday, February 23, 2000
* HISTORY
- * Removed extra length parameters EP 7/6/00
+ * Removed extra length parameters EP 7/6/00
* SOURCE
*/
int_f
-nh5pget_version_c (hid_t_f *prp_id, int_f * boot,int_f * freelist, int_f * stab, int_f *shhdr)
+h5pget_version_c (hid_t_f *prp_id, int_f * boot,int_f * freelist, int_f * stab, int_f *shhdr)
/******/
{
int ret_value = -1;
@@ -630,22 +528,22 @@ nh5pget_version_c (hid_t_f *prp_id, int_f * boot,int_f * freelist, int_f * stab,
/****if* H5Pf/h5pget_userblock_c
* NAME
- * h5pget_userblock_c
+ * h5pget_userblock_c
* PURPOSE
- * Call H5Pget_userblock to get the size of a user block in
- * a file creation property list
+ * Call H5Pget_userblock to get the size of a user block in
+ * a file creation property list
* INPUTS
- * prp_id - property list identifier
- * Outputs size - Size of the user-block in bytes
+ * prp_id - property list identifier
+ * Outputs size - Size of the user-block in bytes
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Wednesday, February 23, 2000
+ * Wednesday, February 23, 2000
* SOURCE
*/
int_f
-nh5pget_userblock_c (hid_t_f *prp_id, hsize_t_f * size)
+h5pget_userblock_c (hid_t_f *prp_id, hsize_t_f * size)
/******/
{
int ret_value = -1;
@@ -668,22 +566,22 @@ nh5pget_userblock_c (hid_t_f *prp_id, hsize_t_f * size)
/****if* H5Pf/h5pset_userblock_c
* NAME
- * h5pset_userblock_c
+ * h5pset_userblock_c
* PURPOSE
- * Call H5Pset_userblock to set the size of a user block in
- * a file creation property list
+ * Call H5Pset_userblock to set the size of a user block in
+ * a file creation property list
* INPUTS
- * prp_id - property list identifier
- * size - Size of the user-block in bytes
+ * prp_id - property list identifier
+ * size - Size of the user-block in bytes
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Wednesday, February 23, 2000
+ * Wednesday, February 23, 2000
* SOURCE
*/
int_f
-nh5pset_userblock_c (hid_t_f *prp_id, hsize_t_f * size)
+h5pset_userblock_c (hid_t_f *prp_id, hsize_t_f * size)
/******/
{
int ret_value = -1;
@@ -705,25 +603,25 @@ nh5pset_userblock_c (hid_t_f *prp_id, hsize_t_f * size)
/****if* H5Pf/h5pget_sizes_c
* NAME
- * h5pget_sizes_c
+ * h5pget_sizes_c
* PURPOSE
- * Call H5Pget_sizes to get the size of the offsets
- * and lengths used in an HDF5 file
+ * Call H5Pget_sizes to get the size of the offsets
+ * and lengths used in an HDF5 file
* INPUTS
- * prp_id - property list identifier
- * Outputs sizeof_addr - Size of an object offset in bytes
- * sizeof_size - Size of an object length in bytes
+ * prp_id - property list identifier
+ * Outputs sizeof_addr - Size of an object offset in bytes
+ * sizeof_size - Size of an object length in bytes
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Wednesday, February 23, 2000
+ * Wednesday, February 23, 2000
* HISTORY
- * Deleted extra length parameters. EP 6/7/00
+ * Deleted extra length parameters. EP 6/7/00
* SOURCE
*/
int_f
-nh5pget_sizes_c (hid_t_f *prp_id, size_t_f * sizeof_addr, size_t_f * sizeof_size)
+h5pget_sizes_c (hid_t_f *prp_id, size_t_f * sizeof_addr, size_t_f * sizeof_size)
/******/
{
int ret_value = -1;
@@ -748,24 +646,24 @@ nh5pget_sizes_c (hid_t_f *prp_id, size_t_f * sizeof_addr, size_t_f * sizeof_size
/****if* H5Pf/h5pset_sizes_c
* NAME
- * h5pset_sizes_c
+ * h5pset_sizes_c
* PURPOSE
- * Call H5Pset_sizes to set the size of the offsets
+ * Call H5Pset_sizes to set the size of the offsets
* INPUTS
- * prp_id - property list identifier
- * sizeof_addr - Size of an object offset in bytes
- * sizeof_size - Size of an object length in bytes
+ * prp_id - property list identifier
+ * sizeof_addr - Size of an object offset in bytes
+ * sizeof_size - Size of an object length in bytes
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Wednesday, February 23, 2000
+ * Wednesday, February 23, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_sizes_c (hid_t_f *prp_id, size_t_f * sizeof_addr, size_t_f * sizeof_size)
+h5pset_sizes_c (hid_t_f *prp_id, size_t_f * sizeof_addr, size_t_f * sizeof_size)
/******/
{
int ret_value = -1;
@@ -788,23 +686,23 @@ nh5pset_sizes_c (hid_t_f *prp_id, size_t_f * sizeof_addr, size_t_f * sizeof_size
/****if* H5Pf/h5pset_sym_k_c
* NAME
- * h5pset_sym_k_c
+ * h5pset_sym_k_c
* PURPOSE
- * Call H5Pset_sym_k to set the size of parameters used
- * to control the symbol table node
+ * Call H5Pset_sym_k to set the size of parameters used
+ * to control the symbol table node
* INPUTS
- * prp_id - property list identifier
- * ik - Symbol table tree rank
- * lk - Symbol table node size
+ * prp_id - property list identifier
+ * ik - Symbol table tree rank
+ * lk - Symbol table node size
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* SOURCE
*/
int_f
-nh5pset_sym_k_c (hid_t_f *prp_id, int_f* ik, int_f* lk)
+h5pset_sym_k_c (hid_t_f *prp_id, int_f* ik, int_f* lk)
/******/
{
int ret_value = -1;
@@ -828,26 +726,26 @@ nh5pset_sym_k_c (hid_t_f *prp_id, int_f* ik, int_f* lk)
/****if* H5Pf/h5pget_sym_k_c
* NAME
- * h5pget_sym_k_c
+ * h5pget_sym_k_c
* PURPOSE
- * Call H5Pget_sym_k to get the size of parameters used
- * to control the symbol table node
+ * Call H5Pget_sym_k to get the size of parameters used
+ * to control the symbol table node
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* OUTPUTS
- * ik - Symbol table tree rank
- * lk - Symbol table node size
+ * ik - Symbol table tree rank
+ * lk - Symbol table node size
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_sym_k_c (hid_t_f *prp_id, int_f* ik, int_f* lk)
+h5pget_sym_k_c (hid_t_f *prp_id, int_f* ik, int_f* lk)
/******/
{
int ret_value = -1;
@@ -870,24 +768,24 @@ nh5pget_sym_k_c (hid_t_f *prp_id, int_f* ik, int_f* lk)
/****if* H5Pf/h5pset_istore_k_c
* NAME
- * h5pset_istore_k_c
+ * h5pset_istore_k_c
* PURPOSE
- * Call H5Pset_istore_k to set the size of the parameter
- * used to control the B-trees for indexing chunked datasets
+ * Call H5Pset_istore_k to set the size of the parameter
+ * used to control the B-trees for indexing chunked datasets
* INPUTS
- * prp_id - property list identifier
- * ik - Symbol table tree rank
+ * prp_id - property list identifier
+ * ik - Symbol table tree rank
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_istore_k_c (hid_t_f *prp_id, int_f* ik)
+h5pset_istore_k_c (hid_t_f *prp_id, int_f* ik)
/******/
{
int ret_value = -1;
@@ -909,25 +807,25 @@ nh5pset_istore_k_c (hid_t_f *prp_id, int_f* ik)
/****if* H5Pf/h5pget_istore_k_c
* NAME
- * h5pget_istore_k_c
+ * h5pget_istore_k_c
* PURPOSE
- * Call H5Pget_istore_k to get the size of parameters used
- * to control the B-trees for indexing chunked datasets
+ * Call H5Pget_istore_k to get the size of parameters used
+ * to control the B-trees for indexing chunked datasets
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* OUTPUTS
- * ik - Symbol table tree rank
+ * ik - Symbol table tree rank
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_istore_k_c (hid_t_f *prp_id, int_f* ik)
+h5pget_istore_k_c (hid_t_f *prp_id, int_f* ik)
/******/
{
int ret_value = -1;
@@ -948,24 +846,24 @@ nh5pget_istore_k_c (hid_t_f *prp_id, int_f* ik)
/****if* H5Pf/h5pget_driver_c
* NAME
- * h5pget_driver_c
+ * h5pget_driver_c
* PURPOSE
- * Call H5Pget_driver to get low-level file driver identifier
+ * Call H5Pget_driver to get low-level file driver identifier
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* OUTPUTS
- * driver - low-level file driver identifier
+ * driver - low-level file driver identifier
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_driver_c (hid_t_f *prp_id, hid_t_f* driver)
+h5pget_driver_c (hid_t_f *prp_id, hid_t_f* driver)
/******/
{
int ret_value = -1;
@@ -986,23 +884,23 @@ DONE:
/****if* H5Pf/h5pset_fapl_stdio_c
* NAME
- * h5pset_fapl_stdio_c
+ * h5pset_fapl_stdio_c
* PURPOSE
- * Call H5Pset_stdio to set the low level file driver to
- * use the functions declared in the stdio.h
+ * Call H5Pset_stdio to set the low level file driver to
+ * use the functions declared in the stdio.h
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 7, 2001
+ * March 7, 2001
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_fapl_stdio_c (hid_t_f *prp_id)
+h5pset_fapl_stdio_c (hid_t_f *prp_id)
/******/
{
int ret_value = -1;
@@ -1020,26 +918,26 @@ nh5pset_fapl_stdio_c (hid_t_f *prp_id)
#ifdef NO_SUCH_F90_FUNCTION
/****if* H5Pf/h5pget_fapl_stdio_c
* NAME
- * h5pget_fapl_stdio_c
+ * h5pget_fapl_stdio_c
* PURPOSE
- * Call H5Pget_fapl_stdio to determine whther the low level file driver
- * uses the functions declared in the stdio.h
+ * Call H5Pget_fapl_stdio to determine whther the low level file driver
+ * uses the functions declared in the stdio.h
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* OUTPUTS
- * io - value indicates whether the file driver uses
- * the functions declared in the stdio.h
+ * io - value indicates whether the file driver uses
+ * the functions declared in the stdio.h
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 9, 2001
+ * March 9, 2001
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_fapl_stdio_c (hid_t_f *prp_id, int_f* io)
+h5pget_fapl_stdio_c (hid_t_f *prp_id, int_f* io)
/******/
{
int ret_value = -1;
@@ -1060,23 +958,23 @@ nh5pget_fapl_stdio_c (hid_t_f *prp_id, int_f* io)
/****if* H5Pf/h5pset_fapl_sec2_c
* NAME
- * h5pset_fapl_sec2_c
+ * h5pset_fapl_sec2_c
* PURPOSE
- * Call H5Pset_fapl_sec2 to set the low level file driver to
- * use the functions declared in the unistd.h
+ * Call H5Pset_fapl_sec2 to set the low level file driver to
+ * use the functions declared in the unistd.h
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 9, 2001
+ * March 9, 2001
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_fapl_sec2_c (hid_t_f *prp_id)
+h5pset_fapl_sec2_c (hid_t_f *prp_id)
/******/
{
int ret_value = -1;
@@ -1095,26 +993,26 @@ nh5pset_fapl_sec2_c (hid_t_f *prp_id)
#ifdef NO_SUCH_F90_FUNCTION
/****if* H5Pf/h5pget_fapl_sec2_c
* NAME
- * h5pget_fapl_sec2_c
+ * h5pget_fapl_sec2_c
* PURPOSE
- * Call H5Pget_fapl_stdio to determine whther the low level file driver
- * uses the functions declared in the unistd.h
+ * Call H5Pget_fapl_stdio to determine whther the low level file driver
+ * uses the functions declared in the unistd.h
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* OUTPUTS
- * sec2 - value indicates whether the file driver uses
- * the functions declared in the unistd.h
+ * sec2 - value indicates whether the file driver uses
+ * the functions declared in the unistd.h
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 9, 2001
+ * March 9, 2001
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_fapl_sec2_c (hid_t_f *prp_id, int_f* sec2)
+h5pget_fapl_sec2_c (hid_t_f *prp_id, int_f* sec2)
/******/
{
int ret_value = -1;
@@ -1134,25 +1032,25 @@ nh5pget_fapl_sec2_c (hid_t_f *prp_id, int_f* sec2)
/****if* H5Pf/h5pset_alignment_c
* NAME
- * h5pset_alignment_c
+ * h5pset_alignment_c
* PURPOSE
- * Call H5Pset_alignment to set alignment properties of
- * a file access property list
+ * Call H5Pset_alignment to set alignment properties of
+ * a file access property list
* INPUTS
- * prp_id - property list identifier
- * threshold - Threshold value
- * alignment - Alignment value
+ * prp_id - property list identifier
+ * threshold - Threshold value
+ * alignment - Alignment value
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_alignment_c (hid_t_f *prp_id, hsize_t_f* threshold, hsize_t_f* alignment)
+h5pset_alignment_c (hid_t_f *prp_id, hsize_t_f* threshold, hsize_t_f* alignment)
/******/
{
int ret_value = -1;
@@ -1173,25 +1071,25 @@ nh5pset_alignment_c (hid_t_f *prp_id, hsize_t_f* threshold, hsize_t_f* alignment
/****if* H5Pf/h5pget_alignment_c
* NAME
- * h5pget_alignment_c
+ * h5pget_alignment_c
* PURPOSE
- * Call H5Pget_alignment to get alignment properties of
- * a file access property list
+ * Call H5Pget_alignment to get alignment properties of
+ * a file access property list
* INPUTS
- * prp_id - property list identifier
- * threshold - Threshold value
- * alignment - Alignment value
+ * prp_id - property list identifier
+ * threshold - Threshold value
+ * alignment - Alignment value
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_alignment_c (hid_t_f *prp_id, hsize_t_f* threshold, hsize_t_f* alignment)
+h5pget_alignment_c (hid_t_f *prp_id, hsize_t_f* threshold, hsize_t_f* alignment)
/******/
{
int ret_value = -1;
@@ -1213,26 +1111,26 @@ nh5pget_alignment_c (hid_t_f *prp_id, hsize_t_f* threshold, hsize_t_f* alignment
/****if* H5Pf/h5pset_fapl_core_c
* NAME
- * h5pset_fapl_core_c
+ * h5pset_fapl_core_c
* PURPOSE
- * Call H5Pset_fapl_core to set the low-level file driver
- * to use malloc() and free()
+ * Call H5Pset_fapl_core to set the low-level file driver
+ * to use malloc() and free()
* INPUTS
- * prp_id - property list identifier
- * increment - File block size in bytes
- * flag - Boolean flag indicating whether to write the
- * file contents to disk when the file is closed.
+ * prp_id - property list identifier
+ * increment - File block size in bytes
+ * flag - Boolean flag indicating whether to write the
+ * file contents to disk when the file is closed.
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 9, 2001
+ * March 9, 2001
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_fapl_core_c (hid_t_f *prp_id, size_t_f* increment, int_f *flag)
+h5pset_fapl_core_c (hid_t_f *prp_id, size_t_f* increment, int_f *flag)
/******/
{
int ret_value = -1;
@@ -1255,24 +1153,24 @@ nh5pset_fapl_core_c (hid_t_f *prp_id, size_t_f* increment, int_f *flag)
/****if* H5Pf/h5pget_fapl_core_c
* NAME
- * h5pget_fapl_core_c
+ * h5pget_fapl_core_c
* PURPOSE
- * Call H5Pget_fapl_core to determine whether the file access
- * property list is set to the core drive
+ * Call H5Pget_fapl_core to determine whether the file access
+ * property list is set to the core drive
* INPUTS
- * prp_id - property list identifier
- * Outputs increment - File block size in bytes
+ * prp_id - property list identifier
+ * Outputs increment - File block size in bytes
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 9, 2001
+ * March 9, 2001
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_fapl_core_c (hid_t_f *prp_id, size_t_f* increment, int_f *flag)
+h5pget_fapl_core_c (hid_t_f *prp_id, size_t_f* increment, int_f *flag)
/******/
{
int ret_value = -1;
@@ -1295,26 +1193,26 @@ nh5pget_fapl_core_c (hid_t_f *prp_id, size_t_f* increment, int_f *flag)
/****if* H5Pf/h5pset_fapl_family_c
* NAME
- * h5pset_fapl_family_c
+ * h5pset_fapl_family_c
* PURPOSE
- * Call H5Pset_fapl_family to set the file access properties list
- * to the family driver
+ * Call H5Pset_fapl_family to set the file access properties list
+ * to the family driver
* INPUTS
- * prp_id - property list identifier
- * memb_size - Logical size, in bytes, of each family member.
- * memb_plist - Identifier of the file access property list
- * for each member of the family
+ * prp_id - property list identifier
+ * memb_size - Logical size, in bytes, of each family member.
+ * memb_plist - Identifier of the file access property list
+ * for each member of the family
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 9, 2001
+ * March 9, 2001
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_fapl_family_c(hid_t_f *prp_id, hsize_t_f* memb_size, hid_t_f* memb_plist )
+h5pset_fapl_family_c(hid_t_f *prp_id, hsize_t_f* memb_size, hid_t_f* memb_plist )
/******/
{
int ret_value = -1;
@@ -1336,26 +1234,26 @@ nh5pset_fapl_family_c(hid_t_f *prp_id, hsize_t_f* memb_size, hid_t_f* memb_plist
/****if* H5Pf/h5pget_fapl_family_c
* NAME
- * h5pget_fapl_family_c
+ * h5pget_fapl_family_c
* PURPOSE
- * Call H5Pget_fapl_family to determine whether the file access
- * property list is set to the family driver
+ * Call H5Pget_fapl_family to determine whether the file access
+ * property list is set to the family driver
* INPUTS
- * prp_id - property list identifier
- * memb_size - Logical size, in bytes, of each family member.
- * memb_plist - Identifier of the file access property list
- * for each member of the family
+ * prp_id - property list identifier
+ * memb_size - Logical size, in bytes, of each family member.
+ * memb_plist - Identifier of the file access property list
+ * for each member of the family
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 9, 2001
+ * March 9, 2001
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_fapl_family_c(hid_t_f *prp_id, hsize_t_f* memb_size, hid_t_f* memb_plist)
+h5pget_fapl_family_c(hid_t_f *prp_id, hsize_t_f* memb_size, hid_t_f* memb_plist)
/******/
{
int ret_value = -1;
@@ -1378,29 +1276,29 @@ nh5pget_fapl_family_c(hid_t_f *prp_id, hsize_t_f* memb_size, hid_t_f* memb_plist
/****if* H5Pf/h5pset_cache_c
* NAME
- * h5pset_cache_c
+ * h5pset_cache_c
* PURPOSE
- * Call H5Pset_cache to set he number of elements in
- * the meta data cache and the total number of bytes in
- * the raw data chunk cache
+ * Call H5Pset_cache to set he number of elements in
+ * the meta data cache and the total number of bytes in
+ * the raw data chunk cache
* INPUTS
- * prp_id - property list identifier
- * mdc_nelmts - Number of elements (objects) in the
- * meta data cache
- * rdcc_nbytes - Total size of the raw data chunk cache, in bytes
- * rdcc_w0 - Preemption policy
+ * prp_id - property list identifier
+ * mdc_nelmts - Number of elements (objects) in the
+ * meta data cache
+ * rdcc_nbytes - Total size of the raw data chunk cache, in bytes
+ * rdcc_w0 - Preemption policy
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
- * Changed the type of the rdcc_w0 parameter to be real_f EP 7/7/00
- * instead of double
+ * Changed the type of the rdcc_w0 parameter to be real_f EP 7/7/00
+ * instead of double
* SOURCE
*/
int_f
-nh5pset_cache_c(hid_t_f *prp_id, int_f* mdc_nelmts, size_t_f* rdcc_nelmts, size_t_f* rdcc_nbytes , real_f* rdcc_w0 )
+h5pset_cache_c(hid_t_f *prp_id, int_f* mdc_nelmts, size_t_f* rdcc_nelmts, size_t_f* rdcc_nbytes , real_f* rdcc_w0 )
/******/
{
int ret_value = -1;
@@ -1427,32 +1325,32 @@ nh5pset_cache_c(hid_t_f *prp_id, int_f* mdc_nelmts, size_t_f* rdcc_nelmts, size
/****if* H5Pf/h5pget_cache_c
* NAME
- * h5pget_cache_c
+ * h5pget_cache_c
* PURPOSE
- * Call H5Pget_cache to get he number of elements in
- * the meta data cache and the total number of bytes in
- * the raw data chunk cache
+ * Call H5Pget_cache to get he number of elements in
+ * the meta data cache and the total number of bytes in
+ * the raw data chunk cache
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* OUTPUTS
- * mdc_nelmts - Number of elements (objects) in the
- * meta data cache
- * rdcc_nelmts - Number of elements in the raw data chunk
- * rdcc_nbytes - Total size of the raw data chunk cache, in bytes
- * rdcc_w0 - Preemption policy
+ * mdc_nelmts - Number of elements (objects) in the
+ * meta data cache
+ * rdcc_nelmts - Number of elements in the raw data chunk
+ * rdcc_nbytes - Total size of the raw data chunk cache, in bytes
+ * rdcc_w0 - Preemption policy
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
- * Changed type of the rdcc_w0 parameter to be real_f instead of double
- * Changed type of the rdcc_nelmts parameter to be int_f.
+ * Changed type of the rdcc_w0 parameter to be real_f instead of double
+ * Changed type of the rdcc_nelmts parameter to be int_f.
* EIP October 10, 2003
* SOURCE
*/
int_f
-nh5pget_cache_c(hid_t_f *prp_id, int_f* mdc_nelmts, size_t_f* rdcc_nelmts, size_t_f* rdcc_nbytes , real_f* rdcc_w0)
+h5pget_cache_c(hid_t_f *prp_id, int_f* mdc_nelmts, size_t_f* rdcc_nelmts, size_t_f* rdcc_nbytes , real_f* rdcc_w0)
/******/
{
int ret_value = -1;
@@ -1479,29 +1377,29 @@ nh5pget_cache_c(hid_t_f *prp_id, int_f* mdc_nelmts, size_t_f* rdcc_nelmts, size_
/****if* H5Pf/h5pset_fapl_split_c
* NAME
- * h5pset_fapl_split_c
+ * h5pset_fapl_split_c
* PURPOSE
- * Call H5Pset_fapl_split to set he low-level driver to split meta data
- * from raw data
+ * Call H5Pset_fapl_split to set he low-level driver to split meta data
+ * from raw data
* INPUTS
- * prp_id - property list identifier
- * meta_len - Length of meta_ext
- * meta_ext - Name of the extension for the metafile filename.
- * meta_plist - Identifier of the meta file access property list
- * raw_len - Length of raw _ext
- * raw_ext - Name of the extension for the raw file filename.
- * raw_plist - Identifier of the raw file access property list
+ * prp_id - property list identifier
+ * meta_len - Length of meta_ext
+ * meta_ext - Name of the extension for the metafile filename.
+ * meta_plist - Identifier of the meta file access property list
+ * raw_len - Length of raw _ext
+ * raw_ext - Name of the extension for the raw file filename.
+ * raw_plist - Identifier of the raw file access property list
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 9, 2001
+ * March 9, 2001
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_fapl_split_c(hid_t_f *prp_id, int_f* meta_len, _fcd meta_ext, hid_t_f* meta_plist, int_f* raw_len, _fcd raw_ext, hid_t_f * raw_plist)
+h5pset_fapl_split_c(hid_t_f *prp_id, int_f* meta_len, _fcd meta_ext, hid_t_f* meta_plist, int_f* raw_len, _fcd raw_ext, hid_t_f * raw_plist)
/******/
{
int ret_value = -1;
@@ -1540,32 +1438,32 @@ DONE:
#ifdef NO_SUCH_F90_FUNCTION
/****if* H5Pf/h5pget_fapl_split_c
* NAME
- * h5pget_fapl_split_c
+ * h5pget_fapl_split_c
* PURPOSE
- * Call H5Pget_fapl_split to determine whether the file access
- * property list is set to the split driver
+ * Call H5Pget_fapl_split to determine whether the file access
+ * property list is set to the split driver
* INPUTS
- * prp_id - property list identifier
- * meta_ext_size - Number of characters of the meta file extension
- * to be copied to the meta_ext buffer
- * raw_ext_size - Number of characters of the raw file extension
- * to be copied to the raw_ext buffer
+ * prp_id - property list identifier
+ * meta_ext_size - Number of characters of the meta file extension
+ * to be copied to the meta_ext buffer
+ * raw_ext_size - Number of characters of the raw file extension
+ * to be copied to the raw_ext buffer
*OUTPUT
- * meta_ext - Name of the extension for the metafile filename.
- * meta_plist - Identifier of the meta file access property list
- * raw_ext - Name of the extension for the raw file filename.
- * raw_plist - Identifier of the raw file access property list
+ * meta_ext - Name of the extension for the metafile filename.
+ * meta_plist - Identifier of the meta file access property list
+ * raw_ext - Name of the extension for the raw file filename.
+ * raw_plist - Identifier of the raw file access property list
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 9 , 2001
+ * March 9 , 2001
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_fapl_split_c(hid_t_f *prp_id, size_t_f* meta_ext_size , _fcd meta_ext, hid_t_f* meta_plist, size_t_f* raw_ext_size, _fcd raw_ext, hid_t_f * raw_plist)
+h5pget_fapl_split_c(hid_t_f *prp_id, size_t_f* meta_ext_size , _fcd meta_ext, hid_t_f* meta_plist, size_t_f* raw_ext_size, _fcd raw_ext, hid_t_f * raw_plist)
/******/
{
int ret_value = -1;
@@ -1603,25 +1501,25 @@ nh5pget_fapl_split_c(hid_t_f *prp_id, size_t_f* meta_ext_size , _fcd meta_ext, h
/****if* H5Pf/h5pset_gc_references_c
* NAME
- * h5pset_gc_references_c
+ * h5pset_gc_references_c
* PURPOSE
- * Call H5Pset_gc_references to set garbage
- * collecting references flag
+ * Call H5Pset_gc_references to set garbage
+ * collecting references flag
* INPUTS
- * prp_id - property list identifier
- * gc_reference - flag for garbage collecting references
- * for the file
+ * prp_id - property list identifier
+ * gc_reference - flag for garbage collecting references
+ * for the file
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_gc_references_c (hid_t_f *prp_id, int_f* gc_references)
+h5pset_gc_references_c (hid_t_f *prp_id, int_f* gc_references)
/******/
{
int ret_value = -1;
@@ -1643,25 +1541,25 @@ nh5pset_gc_references_c (hid_t_f *prp_id, int_f* gc_references)
/****if* H5Pf/h5pget_gc_references_c
* NAME
- * h5pget_gc_references_c
+ * h5pget_gc_references_c
* PURPOSE
- * Call H5Pget_gc_references to set garbage
- * collecting references flag
+ * Call H5Pget_gc_references to set garbage
+ * collecting references flag
* INPUTS
- * prp_id - property list identifier
- * Outputs gc_reference - flag for garbage collecting references
- * for the file
+ * prp_id - property list identifier
+ * Outputs gc_reference - flag for garbage collecting references
+ * for the file
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_gc_references_c (hid_t_f *prp_id, int_f* gc_references)
+h5pget_gc_references_c (hid_t_f *prp_id, int_f* gc_references)
/******/
{
int ret_value = -1;
@@ -1681,24 +1579,24 @@ nh5pget_gc_references_c (hid_t_f *prp_id, int_f* gc_references)
/****if* H5Pf/h5pset_layout_c
* NAME
- * h5pset_layout_c
+ * h5pset_layout_c
* PURPOSE
- * Call H5Pset_layout to the type of storage used
- * store the raw data for a dataset
+ * Call H5Pset_layout to the type of storage used
+ * store the raw data for a dataset
* INPUTS
- * prp_id - property list identifier
- * layout - Type of storage layout for raw data.
+ * prp_id - property list identifier
+ * layout - Type of storage layout for raw data.
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_layout_c (hid_t_f *prp_id, int_f* layout)
+h5pset_layout_c (hid_t_f *prp_id, int_f* layout)
/******/
{
int ret_value = -1;
@@ -1719,25 +1617,25 @@ nh5pset_layout_c (hid_t_f *prp_id, int_f* layout)
/****if* H5Pf/h5pget_layout_c
* NAME
- * h5pget_layout_c
+ * h5pget_layout_c
* PURPOSE
- * Call H5Pget_layout to the type of storage used
- * store the raw data for a dataset
+ * Call H5Pget_layout to the type of storage used
+ * store the raw data for a dataset
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* OUTPUTS
- * layout - Type of storage layout for raw data.
+ * layout - Type of storage layout for raw data.
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_layout_c (hid_t_f *prp_id, int_f* layout)
+h5pget_layout_c (hid_t_f *prp_id, int_f* layout)
/******/
{
int ret_value = -1;
@@ -1756,27 +1654,27 @@ nh5pget_layout_c (hid_t_f *prp_id, int_f* layout)
/****if* H5Pf/h5pset_filter_c
* NAME
- * h5pset_filter_c
+ * h5pset_filter_c
* PURPOSE
- * Call H5Pset_filter to add a filter to the filter pipeline.
+ * Call H5Pset_filter to add a filter to the filter pipeline.
* INPUTS
- * prp_id - property list identifier
- * filter - Filter to be added to the pipeline.
- * flags - Bit vector specifying certain general
- * properties of the filter.
- * cd_nelmts - Number of elements in cd_values.
- * cd_values - Auxiliary data for the filter.
+ * prp_id - property list identifier
+ * filter - Filter to be added to the pipeline.
+ * flags - Bit vector specifying certain general
+ * properties of the filter.
+ * cd_nelmts - Number of elements in cd_values.
+ * cd_values - Auxiliary data for the filter.
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Wednesday, February 23, 2000
+ * Wednesday, February 23, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_filter_c (hid_t_f *prp_id, int_f* filter, int_f* flags, size_t_f* cd_nelmts, int_f* cd_values )
+h5pset_filter_c (hid_t_f *prp_id, int_f* filter, int_f* flags, size_t_f* cd_nelmts, int_f* cd_values )
/******/
{
int ret_value = -1;
@@ -1824,7 +1722,7 @@ DONE:
* SOURCE
*/
int_f
-nh5pget_nfilters_c (hid_t_f *prp_id, int_f* nfilters)
+h5pget_nfilters_c (hid_t_f *prp_id, int_f* nfilters)
/******/
{
int ret_value = -1;
@@ -1844,30 +1742,30 @@ nh5pget_nfilters_c (hid_t_f *prp_id, int_f* nfilters)
}
/*----------------------------------------------------------------------------
- * Name: h5pget_filter_c
- * Purpose: Call H5Pget_filter2 to get information about a filter
- * in a pipeline
- * Inputs: prp_id - property list identifier
- * filter_number - Sequence number within the filter
- * pipeline of the filter for which
- * information is sought.
- * namelen - Anticipated number of characters in name.
- *Outputs: flags - Bit vector specifying certain general
- * properties of the filter.
- * cd_nelmts - Number of elements in cd_value
- * cd_values - Auxiliary data for the filter.
- * name - Name of the filter
- * filter_id - filter identification number
- * Returns: 0 on success, -1 on failure
- * Programmer: Xiangyang Su
- * Friday, February 25, 2000
- * Modifications:
- * Since cd_nelmts has IN/OUT attributes, fixed the input and
- * returned value of cd_nelmnts to satisfy this specification.
+ * Name: h5pget_filter_c
+ * Purpose: Call H5Pget_filter2 to get information about a filter
+ * in a pipeline
+ * Inputs: prp_id - property list identifier
+ * filter_number - Sequence number within the filter
+ * pipeline of the filter for which
+ * information is sought.
+ * namelen - Anticipated number of characters in name.
+ * Outputs: flags - Bit vector specifying certain general
+ * properties of the filter.
+ * cd_nelmts - Number of elements in cd_value
+ * cd_values - Auxiliary data for the filter.
+ * name - Name of the filter
+ * filter_id - filter identification number
+ * Returns: 0 on success, -1 on failure
+ * Programmer: Xiangyang Su
+ * Friday, February 25, 2000
+ * Modifications:
+ * Since cd_nelmts has IN/OUT attributes, fixed the input and
+ * returned value of cd_nelmnts to satisfy this specification.
* MSB January 27, 2009
*---------------------------------------------------------------------------*/
int_f
-nh5pget_filter_c(hid_t_f *prp_id, int_f* filter_number, int_f* flags, size_t_f* cd_nelmts, int_f* cd_values, size_t_f *namelen, _fcd name, int_f* filter_id)
+h5pget_filter_c(hid_t_f *prp_id, int_f* filter_number, int_f* flags, size_t_f* cd_nelmts, int_f* cd_values, size_t_f *namelen, _fcd name, int_f* filter_id)
/******/
{
unsigned int c_flags;
@@ -1921,7 +1819,7 @@ DONE:
* name - Name of an external file
* namelen - length of name
* offset - Offset, in bytes, from the beginning of the file
- * to the location in the file where the data starts.
+ * to the location in the file where the data starts.
* bytes - Number of bytes reserved in the file for the data.
* RETURNS
* 0 on success, -1 on failure
@@ -1934,7 +1832,7 @@ DONE:
* SOURCE
*/
int_f
-nh5pset_external_c (hid_t_f *prp_id, _fcd name, int_f* namelen, off_t_f* offset, hsize_t_f*bytes)
+h5pset_external_c (hid_t_f *prp_id, _fcd name, int_f* namelen, off_t_f* offset, hsize_t_f*bytes)
/******/
{
int ret_value = -1;
@@ -1967,25 +1865,25 @@ DONE:
/****if* H5Pf/h5pget_external_count_c
* NAME
- * h5pget_external_count_c
+ * h5pget_external_count_c
* PURPOSE
- * Call H5Pget_external_count to get the number of external
- * files for the specified dataset.
+ * Call H5Pget_external_count to get the number of external
+ * files for the specified dataset.
* INPUTS
- * prp_id - property list identifier
+ * prp_id - property list identifier
* OUTPUTS
- * count - number of external files
+ * count - number of external files
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_external_count_c (hid_t_f *prp_id, int_f* count)
+h5pget_external_count_c (hid_t_f *prp_id, int_f* count)
/******/
{
int ret_value = -1;
@@ -2008,14 +1906,14 @@ nh5pget_external_count_c (hid_t_f *prp_id, int_f* count)
* PURPOSE
* Call H5Pget_external to get nformation about an external file.
* INPUTS
- * prp_id - property list identifier
- * name_size - length of name
- * idx - External file index.
+ * prp_id - property list identifier
+ * name_size - length of name
+ * idx - External file index.
* OUTPUT
- * name - Name of an external file
- * offset - Offset, in bytes, from the beginning of the file
- * to the location in the file where the data starts.
- * bytes - Number of bytes reserved in the file for the data.
+ * name - Name of an external file
+ * offset - Offset, in bytes, from the beginning of the file
+ * to the location in the file where the data starts.
+ * bytes - Number of bytes reserved in the file for the data.
* RETURNS
* on success, -1 on failure
* AUTHOR
@@ -2027,7 +1925,7 @@ nh5pget_external_count_c (hid_t_f *prp_id, int_f* count)
* SOURCE
*/
int_f
-nh5pget_external_c(hid_t_f *prp_id, int_f *idx, size_t_f* name_size, _fcd name, off_t_f* offset, hsize_t_f*bytes)
+h5pget_external_c(hid_t_f *prp_id, int_f *idx, size_t_f* name_size, _fcd name, off_t_f* offset, hsize_t_f*bytes)
/******/
{
int ret_value = -1;
@@ -2071,27 +1969,27 @@ DONE:
/****if* H5Pf/h5pset_btree_ratios_c
* NAME
- * h5pset_btree_ratios_c
+ * h5pset_btree_ratios_c
* PURPOSE
- * Call H5Pset_btree_ratios to set B-tree split ratios for B-tree split ratios for a dataset transfer property list. a
- * dataset transfer property list.
+ * Call H5Pset_btree_ratios to set B-tree split ratios for B-tree split ratios for a dataset transfer property list. a
+ * dataset transfer property list.
* INPUTS
- * prp_id - property list identifier
- * left - The B-tree split ratio for left-most nodes.
- * middle - The B-tree split ratio for all other nodes
- * right - The B-tree split ratio for right-most nodes
- * and lone nodes.
+ * prp_id - property list identifier
+ * left - The B-tree split ratio for left-most nodes.
+ * middle - The B-tree split ratio for all other nodes
+ * right - The B-tree split ratio for right-most nodes
+ * and lone nodes.
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
- * Changed the type of the last three parameters from double to real_f
+ * Changed the type of the last three parameters from double to real_f
* SOURCE
*/
int_f
-nh5pset_btree_ratios_c(hid_t_f *prp_id, real_f* left, real_f* middle, real_f* right)
+h5pset_btree_ratios_c(hid_t_f *prp_id, real_f* left, real_f* middle, real_f* right)
/******/
{
int ret_value = -1;
@@ -2116,27 +2014,27 @@ nh5pset_btree_ratios_c(hid_t_f *prp_id, real_f* left, real_f* middle, real_f* ri
/****if* H5Pf/h5pget_btree_ratios_c
* NAME
- * h5pget_btree_ratios_c
+ * h5pget_btree_ratios_c
* PURPOSE
- * Call H5Pget_btree_ratios to Gets B-tree split ratios
- * for a dataset transfer property list.
+ * Call H5Pget_btree_ratios to Gets B-tree split ratios
+ * for a dataset transfer property list.
* INPUTS
- * prp_id - property list identifier
- * left - The B-tree split ratio for left-most nodes.
- * middle - The B-tree split ratio for all other nodes
- * right - The B-tree split ratio for right-most nodes
- * and lone nodes.
+ * prp_id - property list identifier
+ * left - The B-tree split ratio for left-most nodes.
+ * middle - The B-tree split ratio for all other nodes
+ * right - The B-tree split ratio for right-most nodes
+ * and lone nodes.
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Xiangyang Su
- * Friday, February 25, 2000
+ * Friday, February 25, 2000
* HISTORY
- * Changed the type of the last three parameters from double to real_f
+ * Changed the type of the last three parameters from double to real_f
* SOURCE
*/
int_f
-nh5pget_btree_ratios_c(hid_t_f *prp_id, real_f* left, real_f* middle, real_f* right)
+h5pget_btree_ratios_c(hid_t_f *prp_id, real_f* left, real_f* middle, real_f* right)
/******/
{
int ret_value = -1;
@@ -2158,30 +2056,30 @@ nh5pget_btree_ratios_c(hid_t_f *prp_id, real_f* left, real_f* middle, real_f* ri
}
/****if* H5Pf/h5pget_fclose_degree_c
* NAME
- * h5pget_fclose_degree_c
+ * h5pget_fclose_degree_c
* PURPOSE
- * Call H5Pget_fclose_degree to determine file close behavior
+ * Call H5Pget_fclose_degree to determine file close behavior
* INPUTS
- * fapl_id - file access identifier
+ * fapl_id - file access identifier
* OUTPUTS
*
- * degree - possible values are:
+ * degree - possible values are:
* H5F_CLOSE_DEFAULT
* H5F_CLOSE_WEAK
* H5F_CLOSE_SEMI
* H5F_CLOSE_STRONG
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Thursday, September 26, 2002
+ * Thursday, September 26, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_fclose_degree_c ( hid_t_f *fapl_id , int_f *degree)
+h5pget_fclose_degree_c ( hid_t_f *fapl_id , int_f *degree)
/******/
{
int ret_value = -1;
@@ -2198,28 +2096,28 @@ nh5pget_fclose_degree_c ( hid_t_f *fapl_id , int_f *degree)
/****if* H5Pf/h5pset_fclose_degree_c
* NAME
- * h5pset_fclose_degree_c
+ * h5pset_fclose_degree_c
* PURPOSE
- * Call H5Pset_fclose_degree to set file close behavior
+ * Call H5Pset_fclose_degree to set file close behavior
* INPUTS
- * fapl_id - file access identifier
- * degree - possible values are:
+ * fapl_id - file access identifier
+ * degree - possible values are:
* H5F_CLOSE_DEFAULT
* H5F_CLOSE_WEAK
* H5F_CLOSE_SEMI
* H5F_CLOSE_STRONG
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Thursday, September 26, 2002
+ * Thursday, September 26, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_fclose_degree_c ( hid_t_f *fapl_id , int_f *degree)
+h5pset_fclose_degree_c ( hid_t_f *fapl_id , int_f *degree)
/******/
{
int ret_value = -1;
@@ -2236,26 +2134,26 @@ nh5pset_fclose_degree_c ( hid_t_f *fapl_id , int_f *degree)
/****if* H5Pf/h5pset_buffer_c
* NAME
- * h5pset_buffer_c
+ * h5pset_buffer_c
* PURPOSE
- * Call H5Pset_buffer to set size of conversion buffer
+ * Call H5Pset_buffer to set size of conversion buffer
* INPUTS
- * prp_id - t`dataset trasfer property list identifier
- * size - size of the buffer
+ * prp_id - t`dataset trasfer property list identifier
+ * size - size of the buffer
* OUTPUTS
* NONE
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Wednesday, October 2, 2002
+ * Wednesday, October 2, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_buffer_c ( hid_t_f *prp_id , hsize_t_f *size)
+h5pset_buffer_c ( hid_t_f *prp_id , hsize_t_f *size)
/******/
{
int ret_value = 0;
@@ -2270,25 +2168,25 @@ nh5pset_buffer_c ( hid_t_f *prp_id , hsize_t_f *size)
/****if* H5Pf/h5pget_buffer_c
* NAME
- * h5pget_buffer_c
+ * h5pget_buffer_c
* PURPOSE
- * Call H5Pget_buffer to get size of conversion buffer
+ * Call H5Pget_buffer to get size of conversion buffer
* INPUTS
- * prp_id - t`dataset trasfer property list identifier
+ * prp_id - t`dataset trasfer property list identifier
* OUTPUTS
- * size - size of conversion buffer
+ * size - size of conversion buffer
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Wednesday, October 2, 2002
+ * Wednesday, October 2, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_buffer_c ( hid_t_f *prp_id , hsize_t_f *size)
+h5pget_buffer_c ( hid_t_f *prp_id , hsize_t_f *size)
/******/
{
int ret_value = -1;
@@ -2304,25 +2202,25 @@ nh5pget_buffer_c ( hid_t_f *prp_id , hsize_t_f *size)
}
/****if* H5Pf/h5pfill_value_defined_c
* NAME
- * h5pfill_value_defined_c
+ * h5pfill_value_defined_c
* PURPOSE
- * Call H5Pfill_value_defined to check if fill value is defined
+ * Call H5Pfill_value_defined to check if fill value is defined
* INPUTS
- * prp_id - dataset creation property list identifier
+ * prp_id - dataset creation property list identifier
* OUTPUTS
- * flag - fill value status flag
+ * flag - fill value status flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Friday, October 4, 2002
+ * Friday, October 4, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pfill_value_defined_c ( hid_t_f *prp_id , int_f *flag)
+h5pfill_value_defined_c ( hid_t_f *prp_id , int_f *flag)
/******/
{
int ret_value = -1;
@@ -2337,26 +2235,26 @@ nh5pfill_value_defined_c ( hid_t_f *prp_id , int_f *flag)
}
/****if* H5Pf/h5pget_alloc_time_c
* NAME
- * h5pget_alloc_time_c
+ * h5pget_alloc_time_c
* PURPOSE
- * Call H5Pget_alloc_time to get space allocation
- * time for dataset during creation
+ * Call H5Pget_alloc_time to get space allocation
+ * time for dataset during creation
* INPUTS
- * prp_id - dataset creation property list identifier
+ * prp_id - dataset creation property list identifier
* OUTPUTS
- * flag - allocation time flag
+ * flag - allocation time flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Friday, October 4, 2002
+ * Friday, October 4, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_alloc_time_c ( hid_t_f *prp_id , int_f *flag)
+h5pget_alloc_time_c ( hid_t_f *prp_id , int_f *flag)
/******/
{
int ret_value = -1;
@@ -2371,25 +2269,25 @@ nh5pget_alloc_time_c ( hid_t_f *prp_id , int_f *flag)
}
/****if* H5Pf/h5pset_alloc_time_c
* NAME
- * h5pset_alloc_time_c
+ * h5pset_alloc_time_c
* PURPOSE
- * Call H5Pset_alloc_time to get space allocation
- * time for dataset during creation
+ * Call H5Pset_alloc_time to get space allocation
+ * time for dataset during creation
* INPUTS
- * prp_id - dataset creation property list identifier
- * flag - allocation time flag
+ * prp_id - dataset creation property list identifier
+ * flag - allocation time flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Friday, October 4, 2002
+ * Friday, October 4, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_alloc_time_c ( hid_t_f *prp_id , int_f *flag)
+h5pset_alloc_time_c ( hid_t_f *prp_id , int_f *flag)
/******/
{
int ret_value = -1;
@@ -2404,26 +2302,26 @@ nh5pset_alloc_time_c ( hid_t_f *prp_id , int_f *flag)
}
/****if* H5Pf/h5pget_fill_time_c
* NAME
- * h5pget_fill_time_c
+ * h5pget_fill_time_c
* PURPOSE
- * Call H5Pget_fill_time to get fill value writing
- * time for dataset during creation
+ * Call H5Pget_fill_time to get fill value writing
+ * time for dataset during creation
* INPUTS
- * prp_id - dataset creation property list identifier
+ * prp_id - dataset creation property list identifier
* OUTPUTS
- * flag - fill value writing time flag
+ * flag - fill value writing time flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Friday, October 4, 2002
+ * Friday, October 4, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_fill_time_c ( hid_t_f *prp_id , int_f *flag)
+h5pget_fill_time_c ( hid_t_f *prp_id , int_f *flag)
/******/
{
int ret_value = -1;
@@ -2438,25 +2336,25 @@ nh5pget_fill_time_c ( hid_t_f *prp_id , int_f *flag)
}
/****if* H5Pf/h5pset_fill_time_c
* NAME
- * h5pset_fill_time_c
+ * h5pset_fill_time_c
* PURPOSE
- * Call H5Pset_fill_time to set fill value writing
- * time for dataset during creation
+ * Call H5Pset_fill_time to set fill value writing
+ * time for dataset during creation
* INPUTS
- * prp_id - dataset creation property list identifier
- * flag - fill value writing time flag
+ * prp_id - dataset creation property list identifier
+ * flag - fill value writing time flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Friday, October 4, 2002
+ * Friday, October 4, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_fill_time_c ( hid_t_f *prp_id , int_f *flag)
+h5pset_fill_time_c ( hid_t_f *prp_id , int_f *flag)
/******/
{
int ret_value = -1;
@@ -2471,26 +2369,26 @@ nh5pset_fill_time_c ( hid_t_f *prp_id , int_f *flag)
}
/****if* H5Pf/h5pset_meta_block_size_c
* NAME
- * h5pset_meta_block_size_c
+ * h5pset_meta_block_size_c
* PURPOSE
- * Call H5Pset_meta_block_size to set size of metadata block
+ * Call H5Pset_meta_block_size to set size of metadata block
* INPUTS
- * prp_id - file access property list identifier
- * size - size of the metadata block
+ * prp_id - file access property list identifier
+ * size - size of the metadata block
* OUTPUTS
* NONE
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday, October 7, 2002
+ * Monday, October 7, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_meta_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
+h5pset_meta_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
/******/
{
int ret_value = 0;
@@ -2504,26 +2402,26 @@ nh5pset_meta_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
}
/****if* H5Pf/h5pget_meta_block_size_c
* NAME
- * h5pget_meta_block_size_c
+ * h5pget_meta_block_size_c
* PURPOSE
- * Call H5Pget_meta_block_size to get size of metadata block
+ * Call H5Pget_meta_block_size to get size of metadata block
* INPUTS
- * prp_id - file access property list identifier
+ * prp_id - file access property list identifier
* OUTPUTS
*
- * size - size of the metadata block
+ * size - size of the metadata block
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday, October 7, 2002
+ * Monday, October 7, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_meta_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
+h5pget_meta_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
/******/
{
int ret_value = 0;
@@ -2537,26 +2435,26 @@ nh5pget_meta_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
}
/****if* H5Pf/h5pset_sieve_buf_size_c
* NAME
- * h5pset_sieve_buf_size_c
+ * h5pset_sieve_buf_size_c
* PURPOSE
- * Call H5Pset_sieve_buf_size to set size of datasieve buffer
+ * Call H5Pset_sieve_buf_size to set size of datasieve buffer
* INPUTS
- * prp_id - file access property list identifier
- * size - size of the buffer
+ * prp_id - file access property list identifier
+ * size - size of the buffer
* OUTPUTS
* NONE
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday, October 7, 2002
+ * Monday, October 7, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_sieve_buf_size_c ( hid_t_f *prp_id , size_t_f *size)
+h5pset_sieve_buf_size_c ( hid_t_f *prp_id , size_t_f *size)
/******/
{
int ret_value = 0;
@@ -2570,26 +2468,26 @@ nh5pset_sieve_buf_size_c ( hid_t_f *prp_id , size_t_f *size)
}
/****if* H5Pf/h5pget_sieve_buf_size_c
* NAME
- * h5pget_sieve_buf_size_c
+ * h5pget_sieve_buf_size_c
* PURPOSE
- * Call H5Pget_sieve_buf_size to get size of datasieve buffer
+ * Call H5Pget_sieve_buf_size to get size of datasieve buffer
* INPUTS
- * prp_id - file access property list identifier
+ * prp_id - file access property list identifier
* OUTPUTS
*
- * size - size of the buffer
+ * size - size of the buffer
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday, October 7, 2002
+ * Monday, October 7, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_sieve_buf_size_c ( hid_t_f *prp_id , size_t_f *size)
+h5pget_sieve_buf_size_c ( hid_t_f *prp_id , size_t_f *size)
/******/
{
int ret_value = 0;
@@ -2603,26 +2501,26 @@ nh5pget_sieve_buf_size_c ( hid_t_f *prp_id , size_t_f *size)
}
/****if* H5Pf/h5pset_small_data_block_size_c
* NAME
- * h5pset_small_data_block_size_c
+ * h5pset_small_data_block_size_c
* PURPOSE
- * Call H5Pset_small_data_block_size to set size of raw small data block
+ * Call H5Pset_small_data_block_size to set size of raw small data block
* INPUTS
- * prp_id - file access property list identifier
- * size - size of the block
+ * prp_id - file access property list identifier
+ * size - size of the block
* OUTPUTS
* NONE
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday, October 7, 2002
+ * Monday, October 7, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_small_data_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
+h5pset_small_data_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
/******/
{
int ret_value = 0;
@@ -2636,26 +2534,26 @@ nh5pset_small_data_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
}
/****if* H5Pf/h5pget_small_data_block_size_c
* NAME
- * h5pget_small_data_block_size_c
+ * h5pget_small_data_block_size_c
* PURPOSE
- * Call H5Pget_small_data_block_size to get size of raw small data block
+ * Call H5Pget_small_data_block_size to get size of raw small data block
* INPUTS
- * prp_id - file access property list identifier
+ * prp_id - file access property list identifier
* OUTPUTS
*
- * size - size of the block
+ * size - size of the block
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday, October 7, 2002
+ * Monday, October 7, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_small_data_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
+h5pget_small_data_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
/******/
{
int ret_value = 0;
@@ -2669,26 +2567,26 @@ nh5pget_small_data_block_size_c ( hid_t_f *prp_id , hsize_t_f *size)
}
/****if* H5Pf/h5pset_hyper_vector_size_c
* NAME
- * h5pset_hyper_vector_size_c
+ * h5pset_hyper_vector_size_c
* PURPOSE
- * Call H5Pset_hyper_vector_size to set size of the hyper vector
+ * Call H5Pset_hyper_vector_size to set size of the hyper vector
* INPUTS
- * prp_id - dataset transfer property list identifier
- * size - size of the vector
+ * prp_id - dataset transfer property list identifier
+ * size - size of the vector
* OUTPUTS
* NONE
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday, October 7, 2002
+ * Monday, October 7, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_hyper_vector_size_c ( hid_t_f *prp_id , size_t_f *size)
+h5pset_hyper_vector_size_c ( hid_t_f *prp_id , size_t_f *size)
/******/
{
int ret_value = 0;
@@ -2702,26 +2600,26 @@ nh5pset_hyper_vector_size_c ( hid_t_f *prp_id , size_t_f *size)
}
/****if* H5Pf/h5pget_hyper_vector_size_c
* NAME
- * h5pget_hyper_vector_size_c
+ * h5pget_hyper_vector_size_c
* PURPOSE
- * Call H5Pget_hyper_vector_size to get size of the hyper vector
+ * Call H5Pget_hyper_vector_size to get size of the hyper vector
* INPUTS
- * prp_id - dataset transfer property list identifier
+ * prp_id - dataset transfer property list identifier
* OUTPUTS
*
- * size - size of the vector
+ * size - size of the vector
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday, October 7, 2002
+ * Monday, October 7, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_hyper_vector_size_c ( hid_t_f *prp_id , size_t_f *size)
+h5pget_hyper_vector_size_c ( hid_t_f *prp_id , size_t_f *size)
/******/
{
int ret_value = 0;
@@ -2733,36 +2631,6 @@ nh5pget_hyper_vector_size_c ( hid_t_f *prp_id , size_t_f *size)
*size = (size_t_f)c_size;
return ret_value;
}
-/****if* H5Pf/h5pcreate_class_c
- * NAME
- * h5pcreate_class_c
- * PURPOSE
- * Call H5Pcreate_class to create a new property class
- * INPUTS
- * parent - property list class identifier
- * name - name of the new class
- * name_len - lenght of the "name" buffer
- * OUTPUTS
- * cls - new class identifier
- * RETURNS
- * 0 on success, -1 on failure
- * AUTHOR
- * Elena Pourmal
- * October 11, 2002
- *
- * HISTORY
- * SOURCE
-*/
-int_f
-nh5pcreate_class_f90_c(hid_t_f *parent, _fcd name, int_f *name_len, hid_t_f *cls)
-/******/
-{
- int ret_value = -1;
-
- ret_value = h5pcreate_class_c(parent, name, name_len, cls, NULL, NULL, NULL, NULL, NULL, NULL);
- return ret_value;
-}
-
/****if* H5Pf/h5pcreate_class_c
* NAME
@@ -2814,40 +2682,6 @@ DONE:
return ret_value;
}
-
-/****if* H5Pf/h5pregisterc_c
- * NAME
- * h5pregisterc_c
- * PURPOSE
- * Call h5pregister_c to registers a permanent property
- * INPUTS
- * class - property list class identifier
- * name - name of the new property
- * name_len - length of the "name" buffer
- * size - property size
- * value - property value of character type
- * RETURNS
- * 0 on success, -1 on failure
- * AUTHOR
- * Elena Pourmal
- * October 11, 2002
- * HISTORY
- *
- * SOURCE
-*/
-int_f
-nh5pregisterc_c(hid_t_f *cls, _fcd name, int_f *name_len, size_t_f *size, _fcd value, int_f H5_ATTR_UNUSED *value_len)
-/******/
-{
- int ret_value = -1;
-
- /*
- * Call h5pregister_c function
- */
- ret_value = h5pregister_c(cls, name, name_len, size, _fcdtocp(value));
- return ret_value;
-}
-
/****if* H5Pf/h5pregister_c
* NAME
* h5pregister_c
@@ -2891,66 +2725,6 @@ DONE:
return ret_value;
}
-int_f
-nh5pregister_integer_c(hid_t_f *cls, _fcd name, int_f *name_len, size_t_f *size, void *value)
-{
- /*
- * Call h5pregister_c function
- */
- return h5pregister_c(cls, name, name_len, size, value);
-}
-
-int_f
-nh5pregister_real_c(hid_t_f *cls, _fcd name, int_f *name_len, size_t_f *size, void *value)
-{
- /*
- * Call h5pregister_c function
- */
- return h5pregister_c(cls, name, name_len, size, value);
-}
-
-int_f
-nh5pregister_double_c(hid_t_f *cls, _fcd name, int_f *name_len, size_t_f *size, void *value)
-{
- /*
- * Call h5pregister_c function
- */
- return h5pregister_c(cls, name, name_len, size, value);
-}
-
-/****if* H5Pf/h5pinsertc_c
- * NAME
- * h5pinsertc_c
- * PURPOSE
- * Call h5pinsert_c to register a temporary property
- * INPUTS
- * plist - property list identifier
- * name - name of the new property
- * name_len - length of the "name" buffer
- * size - property size
- * value - property value of character type
- * RETURNS
- * 0 on success, -1 on failure
- * AUTHOR
- * Elena Pourmal
- * October 11, 2002
- * HISTORY
- *
- * SOURCE
-*/
-int_f
-nh5pinsertc_c(hid_t_f *plist, _fcd name, int_f *name_len, size_t_f *size, _fcd value, int_f H5_ATTR_UNUSED *value_len)
-/******/
-{
- int_f ret_value = -1;
-
- /*
- * Call h5pinsert_c function
- */
- ret_value = h5pinsert_c(plist, name, name_len, size, _fcdtocp(value));
- return ret_value;
-}
-
/****if* H5Pf/h5pinsert_c
* NAME
* h5pinsert_c
@@ -2994,54 +2768,27 @@ DONE:
return ret_value;
}
-int_f
-nh5pinsert_integer_c(hid_t_f *plist, _fcd name, int_f *name_len, size_t_f *size, void *value)
-{
- /*
- * Call h5pinsert_c function
- */
- return h5pinsert_c(plist, name, name_len, size, value);
-}
-
-int_f
-nh5pinsert_real_c(hid_t_f *plist, _fcd name, int_f *name_len, size_t_f *size, void *value)
-{
- /*
- * Call h5pinsert_c function
- */
- return h5pinsert_c(plist, name, name_len, size, value);
-}
-
-int_f
-nh5pinsert_double_c(hid_t_f *plist, _fcd name, int_f *name_len, size_t_f *size, void *value)
-{
- /*
- * Call h5pinsert_c function
- */
- return h5pinsert_c(plist, name, name_len, size, value);
-}
-
/****if* H5Pf/h5pexist_c
* NAME
- * h5pexist_c
+ * h5pexist_c
* PURPOSE
- * Call H5Pexist to querie whether a property name exists
- * in a property list or class
+ * Call H5Pexist to querie whether a property name exists
+ * in a property list or class
* INPUTS
- * plist - property list or property class identifier
- * name - name of the new property
- * name_len - length of the "name" buffer
+ * plist - property list or property class identifier
+ * name - name of the new property
+ * name_len - length of the "name" buffer
* RETURNS
- * nonnegative on success, -1 on failure
+ * nonnegative on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * October 11, 2002
+ * October 11, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pexist_c(hid_t_f *cls, _fcd name, int_f *name_len)
+h5pexist_c(hid_t_f *cls, _fcd name, int_f *name_len)
/******/
{
int_f ret_value = -1;
@@ -3065,24 +2812,24 @@ DONE:
}
/****if* H5Pf/h5pisa_class_c
* NAME
- * h5pisa_class_c
+ * h5pisa_class_c
* PURPOSE
- * Call H5Pisa_class to querie whether a property is a
- * member of a class
+ * Call H5Pisa_class to querie whether a property is a
+ * member of a class
* INPUTS
- * plist - property list identifier
- * cls - property class identifier
+ * plist - property list identifier
+ * cls - property class identifier
* RETURNS
- * nonnegative on success, -1 on failure
+ * nonnegative on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * October 11, 2002
+ * October 11, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pisa_class_c(hid_t_f *plist, hid_t_f *cls)
+h5pisa_class_c(hid_t_f *plist, hid_t_f *cls)
/******/
{
int_f ret_value = -1;
@@ -3102,26 +2849,26 @@ nh5pisa_class_c(hid_t_f *plist, hid_t_f *cls)
}
/****if* H5Pf/h5pget_size_c
* NAME
- * h5pget_size_c
+ * h5pget_size_c
* PURPOSE
- * Call H5Pget_size to querie the size of the property
+ * Call H5Pget_size to querie the size of the property
* INPUTS
- * plist - property list to query
- * name - name of the property
- * name_len - length of the "name" buffer
+ * plist - property list to query
+ * name - name of the property
+ * name_len - length of the "name" buffer
* OUTPUTS
- * size - size of the property in bytes
+ * size - size of the property in bytes
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * October 11, 2002
+ * October 11, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_size_c(hid_t_f *plist, _fcd name, int_f *name_len, size_t_f *size)
+h5pget_size_c(hid_t_f *plist, _fcd name, int_f *name_len, size_t_f *size)
/******/
{
int_f ret_value = -1;
@@ -3146,24 +2893,24 @@ DONE:
}
/****if* H5Pf/h5pget_nprops_c
* NAME
- * h5pget_nprops_c
+ * h5pget_nprops_c
* PURPOSE
- * Call H5Pget_nporps to get number of the properties in the list
+ * Call H5Pget_nporps to get number of the properties in the list
* INPUTS
- * plist - property list to query
+ * plist - property list to query
* OUTPUTS
- * nprops - number of properties in the list
+ * nprops - number of properties in the list
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * October 11, 2002
+ * October 11, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_nprops_c(hid_t_f *plist, size_t_f *nprops)
+h5pget_nprops_c(hid_t_f *plist, size_t_f *nprops)
/******/
{
int_f ret_value = -1;
@@ -3183,25 +2930,25 @@ nh5pget_nprops_c(hid_t_f *plist, size_t_f *nprops)
}
/****if* H5Pf/h5pget_class_parent_c
* NAME
- * h5pget_class_parent_c
+ * h5pget_class_parent_c
* PURPOSE
- * Call H5Pget_class_parent to get the parent class of
- * a genereic property class
+ * Call H5Pget_class_parent to get the parent class of
+ * a genereic property class
* INPUTS
- * prp_id - property list to query
+ * prp_id - property list to query
* OUTPUTS
- * parent_id - parent classs identifier
+ * parent_id - parent classs identifier
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * October 11, 2002
+ * October 11, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_class_parent_c(hid_t_f *prp_id, hid_t_f *parent_id)
+h5pget_class_parent_c(hid_t_f *prp_id, hid_t_f *parent_id)
/******/
{
int_f ret_value = -1;
@@ -3222,26 +2969,26 @@ nh5pget_class_parent_c(hid_t_f *prp_id, hid_t_f *parent_id)
}
/****if* H5Pf/h5pcopy_prop_c
* NAME
- * h5pcopy_prop_c
+ * h5pcopy_prop_c
* PURPOSE
- * Call H5Pcopy_prop to copy a property from one list or
- * class to another
+ * Call H5Pcopy_prop to copy a property from one list or
+ * class to another
* INPUTS
- * dst_id - identifier of destination property list
- * src_id - identifier of source property list
- * name - name of the property
- * name_len - length of the "name" buffer
+ * dst_id - identifier of destination property list
+ * src_id - identifier of source property list
+ * name - name of the property
+ * name_len - length of the "name" buffer
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * October 11, 2002
+ * October 11, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5pcopy_prop_c(hid_t_f *dst_id, hid_t_f *src_id, _fcd name, int_f *name_len)
+h5pcopy_prop_c(hid_t_f *dst_id, hid_t_f *src_id, _fcd name, int_f *name_len)
/******/
{
int_f ret_value = -1;
@@ -3265,24 +3012,24 @@ DONE:
}
/****if* H5Pf/h5premove_c
* NAME
- * h5premove_c
+ * h5premove_c
* PURPOSE
- * Call H5Premove to remove a property from a list
+ * Call H5Premove to remove a property from a list
* INPUTS
- * plid - identifier of property list
- * name - name of the property to remove
- * name_len - length of the "name" buffer
+ * plid - identifier of property list
+ * name - name of the property to remove
+ * name_len - length of the "name" buffer
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * October 11, 2002
+ * October 11, 2002
* HISTORY
*
* SOURCE
*/
int_f
-nh5premove_c(hid_t_f *plid, _fcd name, int_f *name_len)
+h5premove_c(hid_t_f *plid, _fcd name, int_f *name_len)
/******/
{
int_f ret_value = -1;
@@ -3305,15 +3052,15 @@ DONE:
}
/****if* H5Pf/h5punregister_c
* NAME
- * h5punregister_c
+ * h5punregister_c
* PURPOSE
- * Call H5Punregister to remove a property from a property class
+ * Call H5Punregister to remove a property from a property class
* INPUTS
- * cls - identifier of property class
- * name - name of the property to unregister
- * name_len - length of the "name" buffer
+ * cls - identifier of property class
+ * name - name of the property to unregister
+ * name_len - length of the "name" buffer
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
* October 11, 2002
@@ -3322,7 +3069,7 @@ DONE:
* SOURCE
*/
int_f
-nh5punregister_c(hid_t_f *cls, _fcd name, int_f *name_len)
+h5punregister_c(hid_t_f *cls, _fcd name, int_f *name_len)
/******/
{
int_f ret_value = -1;
@@ -3345,13 +3092,13 @@ DONE:
}
/****if* H5Pf/h5pclose_class_c
* NAME
- * h5pclose_class_c
+ * h5pclose_class_c
* PURPOSE
- * Call H5Pclose_class to close property class
+ * Call H5Pclose_class to close property class
* INPUTS
- * class - identifier of property class to close
+ * class - identifier of property class to close
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
* October 11, 2002
@@ -3360,7 +3107,7 @@ DONE:
* SOURCE
*/
int_f
-nh5pclose_class_c(hid_t_f *cls)
+h5pclose_class_c(hid_t_f *cls)
/******/
{
int_f ret_value = -1;
@@ -3377,15 +3124,15 @@ nh5pclose_class_c(hid_t_f *cls)
/****if* H5Pf/h5pget_class_name_c
* NAME
- * h5pget_class_name_c
+ * h5pget_class_name_c
* PURPOSE
- * Call H5Pget_class_name to get property class name
+ * Call H5Pget_class_name to get property class name
* INPUTS
- * cls - identifier of property class
- * name - buffer to retrieve name in
- * name_len - length of the "name" buffer
+ * cls - identifier of property class
+ * name - buffer to retrieve name in
+ * name_len - length of the "name" buffer
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
* October 11, 2002
@@ -3394,7 +3141,7 @@ nh5pclose_class_c(hid_t_f *cls)
* SOURCE
*/
int_f
-nh5pget_class_name_c(hid_t_f *cls, _fcd name, int_f *name_len)
+h5pget_class_name_c(hid_t_f *cls, _fcd name, int_f *name_len)
/******/
{
int_f ret_value = -1;
@@ -3417,38 +3164,6 @@ DONE:
return ret_value;
}
-/****if* H5Pf/h5psetc_c
- * NAME
- * h5psetc_c
- * PURPOSE
- * Call h5setc_c to set property with the character string value
- * INPUTS
- * plist - property list identifier
- * name - name of property
- * name_len - length of the "name" buffer
- * value - property value of character type
- * RETURNS
- * 0 on success, -1 on failure
- * AUTHOR
- * Elena Pourmal
- * October 11, 2002
- * HISTORY
- *
- * SOURCE
-*/
-int_f
-nh5psetc_c(hid_t_f *plist, _fcd name, int_f *name_len, _fcd value, int_f H5_ATTR_UNUSED *value_len)
-/******/
-{
- int_f ret_value = -1;
-
- /*
- * Call h5pset_c function
- */
- ret_value = h5pset_c(plist, name, name_len, _fcdtocp(value));
- return ret_value;
-}
-
/****if* H5Pf/h5pset_c
* NAME
* h5pset_c
@@ -3489,64 +3204,6 @@ DONE:
return ret_value;
}
-int_f
-nh5pset_integer_c(hid_t_f *plist, _fcd name, int_f *name_len, void *value)
-{
- /*
- * Call h5pset_c function
- */
- return h5pset_c(plist, name, name_len, value);
-}
-
-int_f
-nh5pset_real_c(hid_t_f *plist, _fcd name, int_f *name_len, void *value)
-{
- /*
- * Call h5pset_c function
- */
- return h5pset_c(plist, name, name_len, value);
-}
-
-int_f
-nh5pset_double_c(hid_t_f *plist, _fcd name, int_f *name_len, void *value)
-{
- /*
- * Call h5pset_c function
- */
- return h5pset_c(plist, name, name_len, value);
-}
-/****if* H5Pf/h5pgetc_c
- * NAME
- * h5pgetc_c
- * PURPOSE
- * Call h5set_c to set property with the character string value
- * INPUTS
- * plist - property list identifier
- * name - name of property
- * name_len - length of the "name" buffer
- * Output: value - property value of character type
- * RETURNS
- * 0 on success, -1 on failure
- * AUTHOR
- * Elena Pourmal
- * October 11, 2002
- * HISTORY
- *
- * SOURCE
-*/
-int_f
-nh5pgetc_c(hid_t_f *plist, _fcd name, int_f *name_len, _fcd value, int_f H5_ATTR_UNUSED *value_len)
-/******/
-{
- int_f ret_value = -1;
-
- /*
- * Call h5pget_c function
- */
- ret_value = h5pget_c(plist, name, name_len, _fcdtocp(value));
- return ret_value;
-}
-
/****if* H5Pf/h5pget_c
* NAME
* h5pget_c
@@ -3556,7 +3213,7 @@ nh5pgetc_c(hid_t_f *plist, _fcd name, int_f *name_len, _fcd value, int_f H5_ATTR
* plist - property list class identifier
* name - name of the new property
* name_len - length of the "name" buffer
- * Output:
+ * Output:
* value - property value
* RETURNS
* 0 on success, -1 on failure
@@ -3588,54 +3245,26 @@ DONE:
return ret_value;
}
-int_f
-nh5pget_integer_c(hid_t_f *plist, _fcd name, int_f *name_len, void *value)
-{
- /*
- * Call h5pget_c function
- */
- return h5pget_c(plist, name, name_len, value);
-}
-
-int_f
-nh5pget_real_c(hid_t_f *plist, _fcd name, int_f *name_len, void *value)
-{
- /*
- * Call h5pget_c function
- */
- return h5pget_c(plist, name, name_len, value);
-}
-
-int_f
-nh5pget_double_c(hid_t_f *plist, _fcd name, int_f *name_len, void *value)
-{
- /*
- * Call h5pget_c function
- */
- return h5pget_c(plist, name, name_len, value);
-}
-
-
/****if* H5Pf/h5pset_shuffle_c
* NAME
- * h5pset_shuffle_c
+ * h5pset_shuffle_c
* PURPOSE
- * Call H5Pset_shuffle
+ * Call H5Pset_shuffle
* INPUTS
- * prp_id - property list identifier
- * type_size - size of the datatype in bytes
+ * prp_id - property list identifier
+ * type_size - size of the datatype in bytes
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Wednesday, March 12, 2003
+ * Wednesday, March 12, 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_shuffle_c ( hid_t_f *prp_id )
+h5pset_shuffle_c ( hid_t_f *prp_id )
/******/
{
int_f ret_value = 0;
@@ -3649,23 +3278,23 @@ nh5pset_shuffle_c ( hid_t_f *prp_id )
}
/****if* H5Pf/h5pset_fletcher32_c
* NAME
- * h5pset_fletcher32_c
+ * h5pset_fletcher32_c
* PURPOSE
- * Call H5Pset_fletcher32 to enable EDC
+ * Call H5Pset_fletcher32 to enable EDC
* INPUTS
- * prp_id - dataset creation property list identifier
+ * prp_id - dataset creation property list identifier
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Thursday, March 13, 2003
+ * Thursday, March 13, 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_fletcher32_c ( hid_t_f *prp_id )
+h5pset_fletcher32_c ( hid_t_f *prp_id )
/******/
{
int_f ret_value = 0;
@@ -3680,24 +3309,24 @@ nh5pset_fletcher32_c ( hid_t_f *prp_id )
/****if* H5Pf/h5pset_edc_check_c
* NAME
- * h5pset_edc_check_c
+ * h5pset_edc_check_c
* PURPOSE
- * Call H5Pset_edc_check to enable EDC
+ * Call H5Pset_edc_check to enable EDC
* INPUTS
- * prp_id - dataset transfer property list identifier
- * flag - EDC flag
+ * prp_id - dataset transfer property list identifier
+ * flag - EDC flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Thursday, March 13, 2003
+ * Thursday, March 13, 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_edc_check_c ( hid_t_f *prp_id, int_f *flag )
+h5pset_edc_check_c ( hid_t_f *prp_id, int_f *flag )
/******/
{
int_f ret_value = 0;
@@ -3714,24 +3343,24 @@ nh5pset_edc_check_c ( hid_t_f *prp_id, int_f *flag )
/****if* H5Pf/h5pget_edc_check_c
* NAME
- * h5pget_edc_check_c
+ * h5pget_edc_check_c
* PURPOSE
- * Call H5Pget_edc_check to query EDC
+ * Call H5Pget_edc_check to query EDC
* INPUTS
- * prp_id - dataset transfer property list identifier
- * Outouts: flag - EDC flag
+ * prp_id - dataset transfer property list identifier
+ * Outouts: flag - EDC flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Thursday, March 13, 2003
+ * Thursday, March 13, 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_edc_check_c ( hid_t_f *prp_id, int_f *flag )
+h5pget_edc_check_c ( hid_t_f *prp_id, int_f *flag )
/******/
{
int_f ret_value = 0;
@@ -3746,24 +3375,24 @@ nh5pget_edc_check_c ( hid_t_f *prp_id, int_f *flag )
}
/****if* H5Pf/h5pset_family_offset_c
* NAME
- * h5pset_family_offset_c
+ * h5pset_family_offset_c
* PURPOSE
- * Call H5Pset_family_offset to set and offset for family driver
+ * Call H5Pset_family_offset to set and offset for family driver
* INPUTS
- * prp_id - property list identifier
- * offset - offset in bytes
+ * prp_id - property list identifier
+ * offset - offset in bytes
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Wednesday, 19 March 2003
+ * Wednesday, 19 March 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_family_offset_c ( hid_t_f *prp_id , hsize_t_f *offset)
+h5pset_family_offset_c ( hid_t_f *prp_id , hsize_t_f *offset)
/******/
{
int_f ret_value = 0;
@@ -3780,30 +3409,30 @@ nh5pset_family_offset_c ( hid_t_f *prp_id , hsize_t_f *offset)
/****if* H5Pf/h5pset_fapl_multi_c
* NAME
- * h5pset_fapl_multi_c
+ * h5pset_fapl_multi_c
* PURPOSE
- * Call H5Pset_fapl_multi to set multi file dirver
+ * Call H5Pset_fapl_multi to set multi file dirver
* INPUTS
- * prp_id - file_creation property list identifier
- * mem_map - memory mapping array
- * memb_fapl - property list for each memory usage type
- * memb_name - array with members names
- * len - array with the lenght of each name
- * lenmax - lenght of the name a sdeclared in Fortran
- * flag - flag allowing partila access when one of the files is missing
+ * prp_id - file_creation property list identifier
+ * mem_map - memory mapping array
+ * memb_fapl - property list for each memory usage type
+ * memb_name - array with members names
+ * len - array with the lenght of each name
+ * lenmax - lenght of the name a sdeclared in Fortran
+ * flag - flag allowing partila access when one of the files is missing
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday 24, March 2003
+ * Monday 24, March 2003
* HISTORY
*
* SOURCE
*/
int_f
-/*nh5pset_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _fcd memb_name, int_f *len, int_f *lenmax, haddr_t_f *memb_addr, int_f *flag) */
-nh5pset_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _fcd memb_name, int_f *len, int_f *lenmax, real_f *memb_addr, int_f *flag)
+/*h5pset_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _fcd memb_name, int_f *len, int_f *lenmax, haddr_t_f *memb_addr, int_f *flag) */
+h5pset_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _fcd memb_name, int_f *len, int_f *lenmax, real_f *memb_addr, int_f *flag)
/******/
{
int_f ret_value = -1;
@@ -3821,13 +3450,13 @@ nh5pset_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _f
c_lenmax = (int)*lenmax;
relax = (hbool_t)*flag;
/*
- * Check that we got correct values from Fortran for memb_addr array
+ * Check that we got correct values from Fortran for memb_addr array
*/
for (i=0; i < H5FD_MEM_NTYPES; i++) {
if(memb_addr[i] >= 1.0f) return ret_value;
}
/*
- * Take care of names array
+ * Take care of names array
*/
tmp = (char *)HD5f2cstring(memb_name, (size_t)c_lenmax*(H5FD_MEM_NTYPES));
@@ -3841,7 +3470,7 @@ nh5pset_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _f
tmp_p = tmp_p + c_lenmax;
}
/*
- * Take care of othe arguments
+ * Take care of othe arguments
*/
tmp_max_addr = (long double)(HADDR_MAX);
c_prp_id = (hid_t)*prp_id;
@@ -3852,7 +3481,7 @@ nh5pset_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _f
else c_memb_addr[i] = (haddr_t)(((float)memb_addr[i])*(tmp_max_addr));
}
/*
- * Call H5Pset_fapl_multi function
+ * Call H5Pset_fapl_multi function
*/
status = H5Pset_fapl_multi(c_prp_id, c_memb_map, c_memb_fapl, (const char * const *)c_memb_name, c_memb_addr, relax);
@@ -3868,23 +3497,23 @@ DONE:
/****if* H5Pf/h5pset_fapl_multi_sc
* NAME
- * h5pset_fapl_multi_sc
+ * h5pset_fapl_multi_sc
* PURPOSE
- * Call H5Pset_fapl_multi to set multi file dirver
+ * Call H5Pset_fapl_multi to set multi file dirver
* INPUTS
- * prp_id - file_creation property list identifier
+ * prp_id - file_creation property list identifier
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * March 31 2003
+ * March 31 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_fapl_multi_sc ( hid_t_f *prp_id , int_f *flag)
+h5pset_fapl_multi_sc ( hid_t_f *prp_id , int_f *flag)
/******/
{
int_f ret_value = -1;
@@ -3895,7 +3524,7 @@ nh5pset_fapl_multi_sc ( hid_t_f *prp_id , int_f *flag)
relax = (hbool_t)*flag;
c_prp_id = (hid_t)*prp_id;
/*
- * Call H5Pset_fapl_multi function
+ * Call H5Pset_fapl_multi function
*/
status = H5Pset_fapl_multi(c_prp_id, NULL, NULL, NULL, NULL, relax);
@@ -3905,30 +3534,30 @@ nh5pset_fapl_multi_sc ( hid_t_f *prp_id , int_f *flag)
}
/****if* H5Pf/h5pget_fapl_multi_c
* NAME
- * h5pget_fapl_multi_c
+ * h5pget_fapl_multi_c
* PURPOSE
- * Call H5Pget_fapl_multi to set multi file dirver
+ * Call H5Pget_fapl_multi to set multi file dirver
* INPUTS
- * prp_id - file_creation property list identifier
- * lenmax - lenght of the name a sdeclared in Fortran
+ * prp_id - file_creation property list identifier
+ * lenmax - lenght of the name a sdeclared in Fortran
* OUTPUTS
- * memb_map - memory mapping array
- * memb_fapl - property list for each memory usage type
- * memb_name - array with members names
- * len - array with the lenght of each name
- * flag - flag allowing partila access when one of the files is missing
+ * memb_map - memory mapping array
+ * memb_fapl - property list for each memory usage type
+ * memb_name - array with members names
+ * len - array with the lenght of each name
+ * flag - flag allowing partila access when one of the files is missing
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * Monday 24, March 2003
+ * Monday 24, March 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _fcd memb_name, int_f *len, int_f *lenmax, real_f *memb_addr, int_f *flag, int_f *maxlen_out)
+h5pget_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _fcd memb_name, int_f *len, int_f *lenmax, real_f *memb_addr, int_f *flag, int_f *maxlen_out)
/******/
{
int_f ret_value = -1;
@@ -3947,14 +3576,14 @@ nh5pget_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _f
c_prp_id = (hid_t)*prp_id;
/*
- * Call H5Pget_fapl_multi function
+ * Call H5Pget_fapl_multi function
*/
status = H5Pget_fapl_multi(c_prp_id, c_memb_map, c_memb_fapl, c_memb_name, c_memb_addr, &relax);
if ( status < 0 ) return ret_value;
/*
- * Take care of names array
+ * Take care of names array
*/
tmp = (char *)HDmalloc(c_lenmax*H5FD_MEM_NTYPES + 1);
tmp_p = tmp;
@@ -3969,7 +3598,7 @@ nh5pget_fapl_multi_c ( hid_t_f *prp_id , int_f *memb_map, hid_t_f *memb_fapl, _f
HD5packFstring(tmp, _fcdtocp(memb_name), (size_t)(c_lenmax*H5FD_MEM_NTYPES));
/*
- * Take care of other arguments
+ * Take care of other arguments
*/
for (i=0; i < H5FD_MEM_NTYPES; i++) {
@@ -3989,25 +3618,25 @@ HD5packFstring(tmp, _fcdtocp(memb_name), (size_t)(c_lenmax*H5FD_MEM_NTYPES));
/****if* H5Pf/h5pset_szip_c
* NAME
- * h5pset_szip_c
+ * h5pset_szip_c
* PURPOSE
- * Call H5Pset_szip to set szip compression
+ * Call H5Pset_szip to set szip compression
* INPUTS
- * prp_id - dataset creation property list identifier
- * options_mask
- * pixels_per_block -szip compression parameters
+ * prp_id - dataset creation property list identifier
+ * options_mask
+ * pixels_per_block -szip compression parameters
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * April 8 2003
+ * April 8 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_szip_c ( hid_t_f *prp_id , int_f *options_mask, int_f *pixels_per_block)
+h5pset_szip_c ( hid_t_f *prp_id , int_f *options_mask, int_f *pixels_per_block)
/******/
{
int_f ret_value = -1;
@@ -4020,7 +3649,7 @@ nh5pset_szip_c ( hid_t_f *prp_id , int_f *options_mask, int_f *pixels_per_block)
c_options_mask = (unsigned)*options_mask;
c_pixels_per_block = (unsigned)*pixels_per_block;
/*
- * Call H5Pset_szip function
+ * Call H5Pset_szip function
*/
status = H5Pset_szip(c_prp_id, c_options_mask, c_pixels_per_block);
@@ -4030,25 +3659,25 @@ nh5pset_szip_c ( hid_t_f *prp_id , int_f *options_mask, int_f *pixels_per_block)
}
/****if* H5Pf/h5pall_filters_avail_c
* NAME
- * h5pall_filters_avail_c
+ * h5pall_filters_avail_c
* PURPOSE
- * Call H5Pall_filters_avail
+ * Call H5Pall_filters_avail
* INPUTS
- * prp_id - dataset creation property list identifier
+ * prp_id - dataset creation property list identifier
* OUTPUTS
- * status - logical flag
+ * status - logical flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * April 10 2003
+ * April 10 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pall_filters_avail_c ( hid_t_f *prp_id , int_f *status)
+h5pall_filters_avail_c ( hid_t_f *prp_id , int_f *status)
/******/
{
int_f ret_value = -1;
@@ -4058,7 +3687,7 @@ nh5pall_filters_avail_c ( hid_t_f *prp_id , int_f *status)
c_prp_id = (hid_t)*prp_id;
/*
- * Call H5Pall_filters_avail function
+ * Call H5Pall_filters_avail function
*/
c_status = H5Pall_filters_avail(c_prp_id);
@@ -4071,31 +3700,31 @@ nh5pall_filters_avail_c ( hid_t_f *prp_id , int_f *status)
/****if* H5Pf/h5pget_filter_by_id_c
* NAME
- * h5pget_filter_by_id_c
+ * h5pget_filter_by_id_c
* PURPOSE
- * Call H5Pget_filter_by_id2 to get information about a filter
- * in a pipeline
+ * Call H5Pget_filter_by_id2 to get information about a filter
+ * in a pipeline
* INPUTS
- * prp_id - property list identifier
- * filter_id - filter id
- * namelen - Anticipated number of characters in name.
+ * prp_id - property list identifier
+ * filter_id - filter id
+ * namelen - Anticipated number of characters in name.
*OUTPUT
- * flags - Bit vector specifying certain general
- * properties of the filter.
- * cd_nelmts - Number of elements in cd_value
- * cd_values - Auxiliary data for the filter.
- * name - Name of the filter
+ * flags - Bit vector specifying certain general
+ * properties of the filter.
+ * cd_nelmts - Number of elements in cd_value
+ * cd_values - Auxiliary data for the filter.
+ * name - Name of the filter
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena POurmal
- * April 10, 2003
+ * April 10, 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_filter_by_id_c(hid_t_f *prp_id, int_f* filter_id, int_f* flags, size_t_f* cd_nelmts, int_f* cd_values, size_t_f *namelen, _fcd name)
+h5pget_filter_by_id_c(hid_t_f *prp_id, int_f* filter_id, int_f* flags, size_t_f* cd_nelmts, int_f* cd_values, size_t_f *namelen, _fcd name)
/******/
{
unsigned int c_flags;
@@ -4138,27 +3767,27 @@ DONE:
/****if* H5Pf/h5pmodify_filter_c
* NAME
- * h5pmodify_filter_c
+ * h5pmodify_filter_c
* PURPOSE
- * Call H5Pmodify_filter to modify a filter
+ * Call H5Pmodify_filter to modify a filter
* INPUTS
- * prp_id - property list identifier
- * filter - Filter to be modified
- * flags - Bit vector specifying certain general
- * properties of the filter.
- * cd_nelmts - Number of elements in cd_values.
- * cd_values - Auxiliary data for the filter.
+ * prp_id - property list identifier
+ * filter - Filter to be modified
+ * flags - Bit vector specifying certain general
+ * properties of the filter.
+ * cd_nelmts - Number of elements in cd_values.
+ * cd_values - Auxiliary data for the filter.
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Elena Pourmal
- * April 10 2003
+ * April 10 2003
* HISTORY
*
* SOURCE
*/
int_f
-nh5pmodify_filter_c (hid_t_f *prp_id, int_f* filter, int_f* flags, size_t_f* cd_nelmts, int_f* cd_values )
+h5pmodify_filter_c (hid_t_f *prp_id, int_f* filter, int_f* flags, size_t_f* cd_nelmts, int_f* cd_values )
/******/
{
int_f ret_value = -1;
@@ -4190,23 +3819,23 @@ DONE:
/****if* H5Pf/h5premove_filter_c
* NAME
- * h5premove_filter_c
+ * h5premove_filter_c
* PURPOSE
- * Call H5Premove_filter to delete one or more filters
+ * Call H5Premove_filter to delete one or more filters
* INPUTS
- * prp_id - property list identifier
- * filter - Filter to be deleted
+ * prp_id - property list identifier
+ * filter - Filter to be deleted
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* Quincey Koziol
- * January 27 2004
+ * January 27 2004
* HISTORY
*
* SOURCE
*/
int_f
-nh5premove_filter_c (hid_t_f *prp_id, int_f* filter)
+h5premove_filter_c (hid_t_f *prp_id, int_f* filter)
/******/
{
int_f ret_value = -1;
@@ -4228,25 +3857,25 @@ DONE:
/****if* H5Pf/h5pget_attr_phase_change_c
* NAME
- * h5pget_attr_phase_change_c
+ * h5pget_attr_phase_change_c
* PURPOSE
- * Calls H5Pget_attr_phase_change
+ * Calls H5Pget_attr_phase_change
*
* INPUTS
- * ocpl_id - Object (dataset or group) creation property list identifier
- * Outputs max_compact - Maximum number of attributes to be stored in compact storage
- * min_dense - Minimum number of attributes to be stored in dense storage
+ * ocpl_id - Object (dataset or group) creation property list identifier
+ * Outputs max_compact - Maximum number of attributes to be stored in compact storage
+ * min_dense - Minimum number of attributes to be stored in dense storage
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * January, 2008
+ * January, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_attr_phase_change_c(hid_t_f *ocpl_id, int_f *max_compact, int_f *min_dense )
+h5pget_attr_phase_change_c(hid_t_f *ocpl_id, int_f *max_compact, int_f *min_dense )
/******/
{
int ret_value = -1;
@@ -4269,24 +3898,24 @@ nh5pget_attr_phase_change_c(hid_t_f *ocpl_id, int_f *max_compact, int_f *min_den
/****if* H5Pf/h5pset_attr_creation_order_c
* NAME
- * h5pset_attr_creation_order_c
+ * h5pset_attr_creation_order_c
* PURPOSE
- * Calls H5Ppset_attr_creation_order
+ * Calls H5Ppset_attr_creation_order
*
* INPUTS
- * ocpl_id - Object (dataset or group) creation property list identifier
- * Outputs crt_order_flags - Flags specifying whether to track and index attribute creation order
+ * ocpl_id - Object (dataset or group) creation property list identifier
+ * Outputs crt_order_flags - Flags specifying whether to track and index attribute creation order
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * January, 2008
+ * January, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_attr_creation_order_c(hid_t_f *ocpl_id, int_f *crt_order_flags )
+h5pset_attr_creation_order_c(hid_t_f *ocpl_id, int_f *crt_order_flags )
/******/
{
int ret_value = -1;
@@ -4306,29 +3935,29 @@ nh5pset_attr_creation_order_c(hid_t_f *ocpl_id, int_f *crt_order_flags )
/****if* H5Pf/h5pset_shared_mesg_nindexes_c
* NAME
- * h5pset_shared_mesg_nindexes_c
+ * h5pset_shared_mesg_nindexes_c
* PURPOSE
- * Calls h5pset_shared_mesg_nindexes
+ * Calls h5pset_shared_mesg_nindexes
*
* INPUTS
*
- * plist_id - file creation property list
- * nindexes - Number of shared object header message indexes
- * available in files created WITH this property list
+ * plist_id - file creation property list
+ * nindexes - Number of shared object header message indexes
+ * available in files created WITH this property list
*
* OUTPUTS
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * January, 2008
+ * January, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_shared_mesg_nindexes_c(hid_t_f *plist_id, int_f *nindexes )
+h5pset_shared_mesg_nindexes_c(hid_t_f *plist_id, int_f *nindexes )
/******/
{
int ret_value = -1;
@@ -4349,30 +3978,30 @@ nh5pset_shared_mesg_nindexes_c(hid_t_f *plist_id, int_f *nindexes )
/****if* H5Pf/h5pset_shared_mesg_index_c
* NAME
- * h5pset_shared_mesg_index_c
+ * h5pset_shared_mesg_index_c
* PURPOSE
- * Calls H5Pset_shared_mesg_index
+ * Calls H5Pset_shared_mesg_index
*
* INPUTS
*
- * fcpl_id - File creation property list identifier.
- * index_num - Index being configured.
- * mesg_type_flags - Types of messages that should be stored in this index.
- * min_mesg_size - Minimum message size.
+ * fcpl_id - File creation property list identifier.
+ * index_num - Index being configured.
+ * mesg_type_flags - Types of messages that should be stored in this index.
+ * min_mesg_size - Minimum message size.
*
* OUTPUTS
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * January, 2008
+ * January, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_shared_mesg_index_c(hid_t_f *fcpl_id, int_f *index_num, int_f *mesg_type_flags, int_f *min_mesg_size)
+h5pset_shared_mesg_index_c(hid_t_f *fcpl_id, int_f *index_num, int_f *mesg_type_flags, int_f *min_mesg_size)
/******/
{
int ret_value = -1;
@@ -4389,28 +4018,28 @@ nh5pset_shared_mesg_index_c(hid_t_f *fcpl_id, int_f *index_num, int_f *mesg_type
/****if* H5Pf/h5pget_attr_creation_order_c
* NAME
- * h5pget_attr_creation_order_c
+ * h5pget_attr_creation_order_c
* PURPOSE
- * Calls H5Pget_attr_creation_order
+ * Calls H5Pget_attr_creation_order
*
* INPUTS
*
- * ocpl_id - Object (group or dataset) creation property list identifier
+ * ocpl_id - Object (group or dataset) creation property list identifier
* OUTPUTS
*
- * crt_order_flags - Flags specifying whether to track and index attribute creation order
+ * crt_order_flags - Flags specifying whether to track and index attribute creation order
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * February, 2008
+ * February, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_attr_creation_order_c(hid_t_f *ocpl_id, int_f *crt_order_flags)
+h5pget_attr_creation_order_c(hid_t_f *ocpl_id, int_f *crt_order_flags)
/******/
{
int ret_value = -1;
@@ -4431,29 +4060,29 @@ nh5pget_attr_creation_order_c(hid_t_f *ocpl_id, int_f *crt_order_flags)
}
/****if* H5Pf/h5pset_libver_bounds_c
* NAME
- * h5pset_libver_bounds_c
+ * h5pset_libver_bounds_c
* PURPOSE
- * Calls H5Pset_libver_bounds
+ * Calls H5Pset_libver_bounds
*
* INPUTS
*
- * fapl_id - File access property list identifier
- * low - The earliest version of the library that will be used for writing objects.
- * high - The latest version of the library that will be used for writing objects.
+ * fapl_id - File access property list identifier
+ * low - The earliest version of the library that will be used for writing objects.
+ * high - The latest version of the library that will be used for writing objects.
* OUTPUTS
*
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * February 18, 2008
+ * February 18, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_libver_bounds_c(hid_t_f *fapl_id, int_f *low, int_f *high )
+h5pset_libver_bounds_c(hid_t_f *fapl_id, int_f *low, int_f *high )
/******/
{
int ret_value = -1;
@@ -4471,26 +4100,26 @@ nh5pset_libver_bounds_c(hid_t_f *fapl_id, int_f *low, int_f *high )
/****if* H5Pf/h5pset_link_creation_order_c
* NAME
- * h5pset_link_creation_order_c
+ * h5pset_link_creation_order_c
* PURPOSE
- * Calls H5Pset_link_creation_order
+ * Calls H5Pset_link_creation_order
*
* INPUTS
- * gcpl_id - Group creation property list identifier
- * crt_order_flags - Creation order flag(s)
+ * gcpl_id - Group creation property list identifier
+ * crt_order_flags - Creation order flag(s)
* OUTPUTS
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * February 18, 2008
+ * February 18, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_link_creation_order_c(hid_t_f *gcpl_id, int_f *crt_order_flags )
+h5pset_link_creation_order_c(hid_t_f *gcpl_id, int_f *crt_order_flags )
/******/
{
int ret_value = -1;
@@ -4507,25 +4136,25 @@ nh5pset_link_creation_order_c(hid_t_f *gcpl_id, int_f *crt_order_flags )
/****if* H5Pf/h5pget_link_phase_change_c
* NAME
- * h5pget_link_phase_change_c
+ * h5pget_link_phase_change_c
* PURPOSE
- * Calls H5Pget_link_phase_change
+ * Calls H5Pget_link_phase_change
*
* INPUTS
- * gcpl_id - Group creation property list identifier
- * Outputs max_compact - Maximum number of attributes to be stored in compact storage
- * min_dense - Minimum number of attributes to be stored in dense storage
+ * gcpl_id - Group creation property list identifier
+ * Outputs max_compact - Maximum number of attributes to be stored in compact storage
+ * min_dense - Minimum number of attributes to be stored in dense storage
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * February 20, 2008
+ * February 20, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_link_phase_change_c(hid_t_f *gcpl_id, int_f *max_compact, int_f *min_dense )
+h5pget_link_phase_change_c(hid_t_f *gcpl_id, int_f *max_compact, int_f *min_dense )
/******/
{
int ret_value = -1;
@@ -4547,27 +4176,27 @@ nh5pget_link_phase_change_c(hid_t_f *gcpl_id, int_f *max_compact, int_f *min_den
/****if* H5Pf/h5pget_obj_track_times_c
* NAME
- * h5pget_obj_track_times_c
+ * h5pget_obj_track_times_c
* PURPOSE
- * Call H5Pget_obj_track_times
+ * Call H5Pget_obj_track_times
*
* INPUTS
- * plist_id - property list id
+ * plist_id - property list id
* OUTPUTS
*
- * flag - TRUE/FALSE flag
+ * flag - TRUE/FALSE flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * February 22, 2008
+ * February 22, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_obj_track_times_c(hid_t_f *plist_id, int_f *flag)
+h5pget_obj_track_times_c(hid_t_f *plist_id, int_f *flag)
/******/
{
int ret_value = -1;
@@ -4589,25 +4218,25 @@ nh5pget_obj_track_times_c(hid_t_f *plist_id, int_f *flag)
/****if* H5Pf/h5pset_obj_track_times_c
* NAME
- * h5pset_obj_track_times_c
+ * h5pset_obj_track_times_c
* PURPOSE
- * Call H5Pset_obj_track_times
+ * Call H5Pset_obj_track_times
*
* INPUTS
- * plist_id - property list id
- * flag - TRUE/FALSE flag
+ * plist_id - property list id
+ * flag - TRUE/FALSE flag
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * February 22, 2008
+ * February 22, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_obj_track_times_c(hid_t_f *plist_id, int_f *flag)
+h5pset_obj_track_times_c(hid_t_f *plist_id, int_f *flag)
/******/
{
int ret_value = -1;
@@ -4629,28 +4258,28 @@ nh5pset_obj_track_times_c(hid_t_f *plist_id, int_f *flag)
/****if* H5Pf/h5pset_create_inter_group_c
* NAME
- * h5pset_create_inter_group_c
+ * h5pset_create_inter_group_c
* PURPOSE
- * Calls H5Pset_create_intermediate_group
+ * Calls H5Pset_create_intermediate_group
*
* INPUTS
*
* lcpl_id - Link creation property list identifier
- * crt_intermed_group - crt_intermed_group specifying whether
- * to create intermediate groups upon the
- * creation of an object
+ * crt_intermed_group - crt_intermed_group specifying whether
+ * to create intermediate groups upon the
+ * creation of an object
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * February 22, 2008
+ * February 22, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_create_inter_group_c(hid_t_f *lcpl_id, int_f *crt_intermed_group)
+h5pset_create_inter_group_c(hid_t_f *lcpl_id, int_f *crt_intermed_group)
/******/
{
int ret_value = -1;
@@ -4668,28 +4297,28 @@ nh5pset_create_inter_group_c(hid_t_f *lcpl_id, int_f *crt_intermed_group)
/****if* H5Pf/h5pget_link_creation_order_c
* NAME
- * h5pget_link_creation_order_c
+ * h5pget_link_creation_order_c
* PURPOSE
- * Calls H5Pget_link_creation_order
+ * Calls H5Pget_link_creation_order
*
* INPUTS
*
- * gcpl_id - Group creation property list identifier
+ * gcpl_id - Group creation property list identifier
* OUTPUTS
*
- * crt_order_flags - Creation order flag(s)
+ * crt_order_flags - Creation order flag(s)
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 3, 2008
+ * March 3, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_link_creation_order_c(hid_t_f *gcpl_id, int_f *crt_order_flags)
+h5pget_link_creation_order_c(hid_t_f *gcpl_id, int_f *crt_order_flags)
/******/
{
int ret_value = -1;
@@ -4711,30 +4340,30 @@ nh5pget_link_creation_order_c(hid_t_f *gcpl_id, int_f *crt_order_flags)
/****if* H5Pf/h5pset_char_encoding_c
* NAME
- * h5pset_char_encoding_c
+ * h5pset_char_encoding_c
* PURPOSE
* Calls H5Pset_char_encoding
*
* INPUTS
*
- * plist_id - Property list identifier
- * encoding - String encoding character set:
+ * plist_id - Property list identifier
+ * encoding - String encoding character set:
* H5T_CSET_ASCII_F -> US ASCII
* H5T_CSET_UTF8_F -> UTF-8 Unicode encoding
* OUTPUTS
* NONE
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 3, 2008
+ * March 3, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_char_encoding_c(hid_t_f *plist_id, int_f *encoding)
+h5pset_char_encoding_c(hid_t_f *plist_id, int_f *encoding)
/******/
{
int ret_value = -1;
@@ -4753,30 +4382,30 @@ nh5pset_char_encoding_c(hid_t_f *plist_id, int_f *encoding)
/****if* H5Pf/h5pget_char_encoding_c
* NAME
- * h5pget_char_encoding_c
+ * h5pget_char_encoding_c
* PURPOSE
* Calls H5Pget_char_encoding
*
* INPUTS
*
- * plist_id - Property list identifier
+ * plist_id - Property list identifier
* OUTPUTS
*
- * encoding - Encoding character set:
+ * encoding - Encoding character set:
* H5T_CSET_ASCII_F -> US ASCII
* H5T_CSET_UTF8_F -> UTF-8 Unicode encoding
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 3, 2008
+ * March 3, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_char_encoding_c(hid_t_f *plist_id, int_f *encoding)
+h5pget_char_encoding_c(hid_t_f *plist_id, int_f *encoding)
/******/
{
int ret_value = -1;
@@ -4796,30 +4425,30 @@ nh5pget_char_encoding_c(hid_t_f *plist_id, int_f *encoding)
/****if* H5Pf/h5pset_copy_object_c
* NAME
- * h5pset_copy_object_c
+ * h5pset_copy_object_c
* PURPOSE
* Calls H5Pset_copy_object
*
* INPUTS
*
- * ocp_plist_id - Object copy property list identifier
- * copy_options - Copy option(s) to be set
+ * ocp_plist_id - Object copy property list identifier
+ * copy_options - Copy option(s) to be set
*
* OUTPUTS
*
* NONE
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 3, 2008
+ * March 3, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_copy_object_c(hid_t_f *ocp_plist_id, int_f *copy_options)
+h5pset_copy_object_c(hid_t_f *ocp_plist_id, int_f *copy_options)
/******/
{
int ret_value = -1;
@@ -4836,29 +4465,29 @@ nh5pset_copy_object_c(hid_t_f *ocp_plist_id, int_f *copy_options)
/****if* H5Pf/h5pget_copy_object_c
* NAME
- * h5pget_copy_object_c
+ * h5pget_copy_object_c
* PURPOSE
* Calls H5Pget_copy_object
*
* INPUTS
*
- * ocp_plist_id - Object copy property list identifier
+ * ocp_plist_id - Object copy property list identifier
*
* OUTPUTS
*
- * copy_options - Copy option(s) to be get
+ * copy_options - Copy option(s) to be get
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 3, 2008
+ * March 3, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_copy_object_c(hid_t_f *ocp_plist_id, int_f *copy_options)
+h5pget_copy_object_c(hid_t_f *ocp_plist_id, int_f *copy_options)
/******/
{
int ret_value = -1;
@@ -4878,31 +4507,31 @@ nh5pget_copy_object_c(hid_t_f *ocp_plist_id, int_f *copy_options)
/****if* H5Pf/h5pget_data_transform_c
* NAME
- * h5pget_data_transform_c
+ * h5pget_data_transform_c
* PURPOSE
- * Calls H5Pget_data_transform
+ * Calls H5Pget_data_transform
* INPUTS
*
- * prp_id - property list identifier to query
- * expression_len - buffer size transorm expression
+ * prp_id - property list identifier to query
+ * expression_len - buffer size transorm expression
*
- * Output:
- * expression - buffer to hold transform expression
+ * Output:
+ * expression - buffer to hold transform expression
*
* RETURNS
*
- * Success: 0
+ * Success: 0
* Failure: -1
*
* AUTHOR
* M. Scot Breitenfeld
- * March 19, 2008
+ * March 19, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_data_transform_c(hid_t_f *plist_id, _fcd expression, int_f *expression_len, size_t_f *size)
+h5pget_data_transform_c(hid_t_f *plist_id, _fcd expression, int_f *expression_len, size_t_f *size)
/******/
{
char *c_expression = NULL; /* Buffer to hold C string */
@@ -4940,31 +4569,31 @@ done:
/****if* H5Pf/h5pset_data_transform_c
* NAME
- * h5pset_data_transform_c
+ * h5pset_data_transform_c
* PURPOSE
- * Calls H5Pset_data_transform
+ * Calls H5Pset_data_transform
* INPUTS
*
- * prp_id - property list identifier to query
- * expression - buffer to hold transform expression
- * expression_len - buffer size transorm expression
+ * prp_id - property list identifier to query
+ * expression - buffer to hold transform expression
+ * expression_len - buffer size transorm expression
*
- * Output:
+ * Output:
*
* RETURNS
*
- * Success: 0
+ * Success: 0
* Failure: -1
*
* AUTHOR
* M. Scot Breitenfeld
- * March 19, 2008
+ * March 19, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_data_transform_c(hid_t_f *plist_id, _fcd expression, int_f *expression_len)
+h5pset_data_transform_c(hid_t_f *plist_id, _fcd expression, int_f *expression_len)
/******/
{
char* c_expression = NULL; /* Buffer to hold C string */
@@ -4991,29 +4620,29 @@ done:
/****if* H5Pf/h5pget_local_heap_size_hint_c
* NAME
- * h5pget_local_heap_size_hint_c
+ * h5pget_local_heap_size_hint_c
* PURPOSE
- * Calls H5Pget_local_heap_size_hint
+ * Calls H5Pget_local_heap_size_hint
* INPUTS
*
- * gcpl_id - Group creation property list identifier
+ * gcpl_id - Group creation property list identifier
*
- * Output:
- * size_hint - Hint for size of local heap
+ * Output:
+ * size_hint - Hint for size of local heap
* RETURNS
*
- * Success: 0
+ * Success: 0
* Failure: -1
*
* AUTHOR
* M. Scot Breitenfeld
- * March 21, 2008
+ * March 21, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_local_heap_size_hint_c(hid_t_f *gcpl_id, size_t_f *size_hint)
+h5pget_local_heap_size_hint_c(hid_t_f *gcpl_id, size_t_f *size_hint)
/******/
{
int_f ret_value = -1; /* Return value */
@@ -5032,30 +4661,30 @@ nh5pget_local_heap_size_hint_c(hid_t_f *gcpl_id, size_t_f *size_hint)
/****if* H5Pf/h5pget_est_link_info_c
* NAME
- * h5pget_est_link_info_c
+ * h5pget_est_link_info_c
* PURPOSE
- * Calls H5Pget_est_link_info
+ * Calls H5Pget_est_link_info
* INPUTS
*
- * gcpl_id - Group creation property list identifier
+ * gcpl_id - Group creation property list identifier
*
- * Output:
- * est_num_entries - Estimated number of links to be inserted into group
- * est_name_len - Estimated average length of link names
+ * Output:
+ * est_num_entries - Estimated number of links to be inserted into group
+ * est_name_len - Estimated average length of link names
* RETURNS
*
- * Success: 0
+ * Success: 0
* Failure: -1
*
* AUTHOR
* M. Scot Breitenfeld
- * March 21, 2008
+ * March 21, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_est_link_info_c(hid_t_f *gcpl_id, int_f *est_num_entries, int_f *est_name_len)
+h5pget_est_link_info_c(hid_t_f *gcpl_id, int_f *est_num_entries, int_f *est_name_len)
/******/
{
int_f ret_value = -1; /* Return value */
@@ -5077,30 +4706,30 @@ nh5pget_est_link_info_c(hid_t_f *gcpl_id, int_f *est_num_entries, int_f *est_nam
/****if* H5Pf/h5pset_local_heap_size_hint_c
* NAME
- * h5pset_local_heap_size_hint_c
+ * h5pset_local_heap_size_hint_c
* PURPOSE
- * Calls H5Pset_local_heap_size_hint
+ * Calls H5Pset_local_heap_size_hint
* INPUTS
*
- * gcpl_id - Group creation property list identifier
- * size_hint - Hint for size of local heap
+ * gcpl_id - Group creation property list identifier
+ * size_hint - Hint for size of local heap
*
- * Output:
+ * Output:
*
* RETURNS
*
- * Success: 0
+ * Success: 0
* Failure: -1
*
* AUTHOR
* M. Scot Breitenfeld
- * March 21, 2008
+ * March 21, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_local_heap_size_hint_c(hid_t_f *gcpl_id, size_t_f *size_hint)
+h5pset_local_heap_size_hint_c(hid_t_f *gcpl_id, size_t_f *size_hint)
/******/
{
int_f ret_value = -1; /* Return value */
@@ -5117,30 +4746,30 @@ nh5pset_local_heap_size_hint_c(hid_t_f *gcpl_id, size_t_f *size_hint)
/****if* H5Pf/h5pset_est_link_info_c
* NAME
- * h5pset_est_link_info_c
+ * h5pset_est_link_info_c
* PURPOSE
- * Calls H5Pset_est_link_info
+ * Calls H5Pset_est_link_info
* INPUTS
*
- * gcpl_id - Group creation property list identifier
- * est_num_entries - Estimated number of links to be inserted into group
- * est_name_len - Estimated average length of link names
+ * gcpl_id - Group creation property list identifier
+ * est_num_entries - Estimated number of links to be inserted into group
+ * est_name_len - Estimated average length of link names
*
- * Output:
+ * Output:
* RETURNS
*
- * Success: 0
+ * Success: 0
* Failure: -1
*
* AUTHOR
* M. Scot Breitenfeld
- * March 21, 2008
+ * March 21, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_est_link_info_c(hid_t_f *gcpl_id, int_f *est_num_entries, int_f *est_name_len)
+h5pset_est_link_info_c(hid_t_f *gcpl_id, int_f *est_num_entries, int_f *est_name_len)
/******/
{
int_f ret_value = -1; /* Return value */
@@ -5157,26 +4786,26 @@ nh5pset_est_link_info_c(hid_t_f *gcpl_id, int_f *est_num_entries, int_f *est_nam
/****if* H5Pf/h5pset_link_phase_change_c
* NAME
- * h5pset_link_phase_change_c
+ * h5pset_link_phase_change_c
* PURPOSE
- * Calls H5Pset_link_phase_change
+ * Calls H5Pset_link_phase_change
*
* INPUTS
- * gcpl_id - Group creation property list identifier
- * max_compact - Maximum number of attributes to be stored in compact storage
- * min_dense - Minimum number of attributes to be stored in dense storage
- * Outputs
+ * gcpl_id - Group creation property list identifier
+ * max_compact - Maximum number of attributes to be stored in compact storage
+ * min_dense - Minimum number of attributes to be stored in dense storage
+ * Outputs
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 21, 2008
+ * March 21, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_link_phase_change_c(hid_t_f *gcpl_id, int_f *max_compact, int_f *min_dense )
+h5pset_link_phase_change_c(hid_t_f *gcpl_id, int_f *max_compact, int_f *min_dense )
/******/
{
int ret_value = -1;
@@ -5194,28 +4823,28 @@ nh5pset_link_phase_change_c(hid_t_f *gcpl_id, int_f *max_compact, int_f *min_den
/****if* H5Pf/h5pset_fapl_direct_c
* NAME
- * h5pset_fapl_direct_c
+ * h5pset_fapl_direct_c
* PURPOSE
- * Calls H5Pset_fapl_direct
+ * Calls H5Pset_fapl_direct
*
* INPUTS
*
- * fapl_id - File access property list identifier
- * alignment - Required memory alignment boundary
- * block_size - File system block size
- * cbuf_size - Copy buffer size
- * Outputs
+ * fapl_id - File access property list identifier
+ * alignment - Required memory alignment boundary
+ * block_size - File system block size
+ * cbuf_size - Copy buffer size
+ * Outputs
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 21, 2008
+ * March 21, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_fapl_direct_c(hid_t_f H5_ATTR_UNUSED *fapl_id, size_t_f H5_ATTR_UNUSED *alignment, size_t_f H5_ATTR_UNUSED *block_size, size_t_f H5_ATTR_UNUSED *cbuf_size)
+h5pset_fapl_direct_c(hid_t_f H5_ATTR_UNUSED *fapl_id, size_t_f H5_ATTR_UNUSED *alignment, size_t_f H5_ATTR_UNUSED *block_size, size_t_f H5_ATTR_UNUSED *cbuf_size)
/******/
{
int ret_value = -1;
@@ -5236,29 +4865,29 @@ nh5pset_fapl_direct_c(hid_t_f H5_ATTR_UNUSED *fapl_id, size_t_f H5_ATTR_UNUSED *
/****if* H5Pf/h5pget_fapl_direct_c
* NAME
- * h5pget_fapl_direct_c
+ * h5pget_fapl_direct_c
* PURPOSE
- * Calls H5Pget_fapl_direct
+ * Calls H5Pget_fapl_direct
*
* INPUTS
*
- * fapl_id - File access property list identifier
+ * fapl_id - File access property list identifier
* OUTPUTS
*
- * alignment - Required memory alignment boundary
- * block_size - File system block size
- * cbuf_size - Copy buffer size
+ * alignment - Required memory alignment boundary
+ * block_size - File system block size
+ * cbuf_size - Copy buffer size
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 21, 2008
+ * March 21, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_fapl_direct_c(hid_t_f H5_ATTR_UNUSED *fapl_id, size_t_f H5_ATTR_UNUSED *alignment, size_t_f H5_ATTR_UNUSED *block_size, size_t_f H5_ATTR_UNUSED *cbuf_size)
+h5pget_fapl_direct_c(hid_t_f H5_ATTR_UNUSED *fapl_id, size_t_f H5_ATTR_UNUSED *alignment, size_t_f H5_ATTR_UNUSED *block_size, size_t_f H5_ATTR_UNUSED *cbuf_size)
/******/
{
int ret_value = -1;
@@ -5285,27 +4914,27 @@ nh5pget_fapl_direct_c(hid_t_f H5_ATTR_UNUSED *fapl_id, size_t_f H5_ATTR_UNUSED *
/****if* H5Pf/h5pset_attr_phase_change_c
* NAME
- * h5pset_attr_phase_change_c
+ * h5pset_attr_phase_change_c
* PURPOSE
- * Calls H5Pset_attr_phase_change
+ * Calls H5Pset_attr_phase_change
*
* INPUTS
- * ocpl_id - Object (dataset or group) creation property list identifier
- * max_compact - Maximum number of attributes to be stored in compact storage
- * min_dense - Minimum number of attributes to be stored in dense storage
+ * ocpl_id - Object (dataset or group) creation property list identifier
+ * max_compact - Maximum number of attributes to be stored in compact storage
+ * min_dense - Minimum number of attributes to be stored in dense storage
* OUTPUTS
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 21, 2008
+ * March 21, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_attr_phase_change_c(hid_t_f *ocpl_id, int_f *max_compact, int_f *min_dense )
+h5pset_attr_phase_change_c(hid_t_f *ocpl_id, int_f *max_compact, int_f *min_dense )
/******/
{
int ret_value = -1;
@@ -5322,25 +4951,25 @@ nh5pset_attr_phase_change_c(hid_t_f *ocpl_id, int_f *max_compact, int_f *min_den
/****if* H5Pf/h5pset_nbit_c
* NAME
- * h5pset_nbit_c
+ * h5pset_nbit_c
* PURPOSE
- * Calls H5Pset_nbit
+ * Calls H5Pset_nbit
*
* INPUTS
- * plist_id - Dataset creation property list identifier
+ * plist_id - Dataset creation property list identifier
* OUTPUTS
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 21, 2008
+ * March 21, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pset_nbit_c(hid_t_f *plist_id )
+h5pset_nbit_c(hid_t_f *plist_id )
/******/
{
int ret_value = -1;
@@ -5373,7 +5002,7 @@ nh5pset_nbit_c(hid_t_f *plist_id )
* SOURCE
*/
int_f
-nh5pset_scaleoffset_c(hid_t_f *plist_id, int_f *scale_type, int_f *scale_factor )
+h5pset_scaleoffset_c(hid_t_f *plist_id, int_f *scale_type, int_f *scale_factor )
/******/
{
int ret_value = -1;
@@ -5408,7 +5037,7 @@ nh5pset_scaleoffset_c(hid_t_f *plist_id, int_f *scale_type, int_f *scale_factor
* SOURCE
*/
int_f
-nh5pset_nlinks_c(hid_t_f *lapl_id, size_t_f *nlinks)
+h5pset_nlinks_c(hid_t_f *lapl_id, size_t_f *nlinks)
/******/
{
int ret_value = -1;
@@ -5425,29 +5054,29 @@ nh5pset_nlinks_c(hid_t_f *lapl_id, size_t_f *nlinks)
/****if* H5Pf/h5pget_nlinks
* NAME
- * h5pget_nlinks
+ * h5pget_nlinks
* PURPOSE
- * Calls H5Pget_nlinks
+ * Calls H5Pget_nlinks
*
* INPUTS
*
- * lapl_id - File access property list identifier
+ * lapl_id - File access property list identifier
*
* OUTPUTS
*
- * nlinks - Maximum number of links to traverse
+ * nlinks - Maximum number of links to traverse
*
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * March 24, 2008
+ * March 24, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_nlinks_c(hid_t_f *lapl_id, size_t_f *nlinks)
+h5pget_nlinks_c(hid_t_f *lapl_id, size_t_f *nlinks)
/******/
{
int ret_value = -1;
@@ -5466,26 +5095,26 @@ nh5pget_nlinks_c(hid_t_f *lapl_id, size_t_f *nlinks)
/****if* H5Pf/h5pget_create_inter_group_c
* NAME
- * h5pget_create_inter_group_c
+ * h5pget_create_inter_group_c
* PURPOSE
- * Calls H5Pget_create_intermediate_group
+ * Calls H5Pget_create_intermediate_group
*
* INPUTS
*
* lcpl_id - Link creation property list identifier
- * crt_intermed_group - Specifying whether to create intermediate groups upon
- * the creation of an object
+ * crt_intermed_group - Specifying whether to create intermediate groups upon
+ * the creation of an object
* RETURNS
- * 0 on success, -1 on failure
+ * 0 on success, -1 on failure
* AUTHOR
* M. Scot Breitenfeld
- * April 4, 2008
+ * April 4, 2008
* HISTORY
*
* SOURCE
*/
int_f
-nh5pget_create_inter_group_c(hid_t_f *lcpl_id, int_f *crt_intermed_group)
+h5pget_create_inter_group_c(hid_t_f *lcpl_id, int_f *crt_intermed_group)
/******/
{
int ret_value = -1;
@@ -5505,22 +5134,22 @@ nh5pget_create_inter_group_c(hid_t_f *lcpl_id, int_f *crt_intermed_group)
}
/*----------------------------------------------------------------------------
- * Name: h5pset_chunk_cache_c
- * Purpose: Calls H5Pset_chunk_cache
- *
- * Inputs: dapl_id - Link creation property list identifier
- * rdcc_nslots -
- * rdcc_nbytes -
- * rdcc_w0 -
- *
- * Returns: 0 on success, -1 on failure
- * Programmer: M. Scot Breitenfeld
- * April 13, 2009
- * Modifications:
+ * Name: h5pset_chunk_cache_c
+ * Purpose: Calls H5Pset_chunk_cache
+ *
+ * Inputs: dapl_id - Link creation property list identifier
+ * rdcc_nslots -
+ * rdcc_nbytes -
+ * rdcc_w0 -
+ *
+ * Returns: 0 on success, -1 on failure
+ * Programmer: M. Scot Breitenfeld
+ * April 13, 2009
+ * Modifications:
*---------------------------------------------------------------------------*/
int_f
-nh5pset_chunk_cache_c(hid_t_f *dapl_id, size_t_f *rdcc_nslots, size_t_f *rdcc_nbytes, real_f *rdcc_w0)
+h5pset_chunk_cache_c(hid_t_f *dapl_id, size_t_f *rdcc_nslots, size_t_f *rdcc_nbytes, real_f *rdcc_w0)
{
int ret_value = -1;
@@ -5535,23 +5164,23 @@ nh5pset_chunk_cache_c(hid_t_f *dapl_id, size_t_f *rdcc_nslots, size_t_f *rdcc_nb
}
/*----------------------------------------------------------------------------
- * Name: h5pget_chunk_cache_c
- * Purpose: Calls H5Pget_chunk_cache
- *
- * Inputs: dapl_id - Link creation property list identifier
- * Outputs:
- * rdcc_nslots -
- * rdcc_nbytes -
- * rdcc_w0 -
- *
- * Returns: 0 on success, -1 on failure
- * Programmer: M. Scot Breitenfeld
- * April 13, 2009
- * Modifications:
+ * Name: h5pget_chunk_cache_c
+ * Purpose: Calls H5Pget_chunk_cache
+ *
+ * Inputs: dapl_id - Link creation property list identifier
+ * Outputs:
+ * rdcc_nslots -
+ * rdcc_nbytes -
+ * rdcc_w0 -
+ *
+ * Returns: 0 on success, -1 on failure
+ * Programmer: M. Scot Breitenfeld
+ * April 13, 2009
+ * Modifications:
*---------------------------------------------------------------------------*/
int_f
-nh5pget_chunk_cache_c(hid_t_f *dapl_id, size_t_f *rdcc_nslots, size_t_f *rdcc_nbytes, real_f *rdcc_w0)
+h5pget_chunk_cache_c(hid_t_f *dapl_id, size_t_f *rdcc_nslots, size_t_f *rdcc_nbytes, real_f *rdcc_w0)
{
int ret_value = -1;
size_t c_rdcc_nslots;
@@ -5572,18 +5201,18 @@ nh5pget_chunk_cache_c(hid_t_f *dapl_id, size_t_f *rdcc_nslots, size_t_f *rdcc_nb
}
/*----------------------------------------------------------------------------
- * Name: h5pset_file_image_c
- * Purpose: Calls H5Pset_file_image
+ * Name: h5pset_file_image_c
+ * Purpose: Calls H5Pset_file_image
*
- * Inputs:
+ * Inputs:
* fapl_id - File access property list identifier
* buf_ptr - Pointer to the initial file image,
- * or NULL if no initial file image is desired
+ * or NULL if no initial file image is desired
* buf_len - Size of the supplied buffer, or 0 (zero) if no initial image is desired
*
- * Returns: 0 on success, -1 on failure
- * Programmer: M. Scot Breitenfeld
- * February 19, 2012
+ * Returns: 0 on success, -1 on failure
+ * Programmer: M. Scot Breitenfeld
+ * February 19, 2012
*---------------------------------------------------------------------------*/
int_f
@@ -5601,19 +5230,19 @@ h5pset_file_image_c(hid_t_f *fapl_id, void *buf_ptr, size_t_f *buf_len)
}
/*----------------------------------------------------------------------------
- * Name: h5pget_file_image_c
- * Purpose: Calls H5Pget_file_image
+ * Name: h5pget_file_image_c
+ * Purpose: Calls H5Pget_file_image
*
- * Inputs:
+ * Inputs:
* fapl_id - File access property list identifier
- * Outputs:
+ * Outputs:
* buf_ptr - Pointer to the initial file image,
- * or NULL if no initial file image is desired
+ * or NULL if no initial file image is desired
* buf_len - Size of the supplied buffer, or 0 (zero) if no initial image is desired
*
- * Returns: 0 on success, -1 on failure
- * Programmer: M. Scot Breitenfeld
- * February 19, 2012
+ * Returns: 0 on success, -1 on failure
+ * Programmer: M. Scot Breitenfeld
+ * February 19, 2012
*---------------------------------------------------------------------------*/
int_f
@@ -5640,3 +5269,225 @@ h5pget_file_image_c(hid_t_f *fapl_id, void **buf_ptr, size_t_f *buf_len_ptr)
return ret_value;
}
+
+#ifdef H5_HAVE_PARALLEL
+/****if* H5Pf/h5pset_fapl_mpio_c
+ * NAME
+ * h5pset_fapl_mpio_c
+ * PURPOSE
+ * Call H5Pset_fapl_mpio to set mode for parallel I/O and the user
+ * supplied communicator and info object
+ * INPUTS
+ * prp_id - property list identifier
+ * comm - MPI communicator
+ * info - MPI info object
+ * RETURNS
+ * 0 on success, -1 on failure
+ * AUTHOR
+ * Elena Pourmal
+ * Thursday, October 26, 2000
+ * HISTORY
+ *
+ * SOURCE
+*/
+int_f
+h5pset_fapl_mpio_c(hid_t_f *prp_id, int_f* comm, int_f* info)
+/******/
+{
+ int ret_value = -1;
+ hid_t c_prp_id;
+ herr_t ret;
+ MPI_Comm c_comm;
+ MPI_Info c_info;
+ c_comm = MPI_Comm_f2c(*comm);
+ c_info = MPI_Info_f2c(*info);
+
+ /*
+ * Call H5Pset_mpi function.
+ */
+ c_prp_id = *prp_id;
+ ret = H5Pset_fapl_mpio(c_prp_id, c_comm, c_info);
+ if (ret < 0) return ret_value;
+ ret_value = 0;
+ return ret_value;
+}
+/****if* H5Pf/h5pget_fapl_mpio_c
+ * NAME
+ * h5pget_fapl_mpio_c
+ * PURPOSE
+ * Call H5Pget_fapl_mpio to retrieve communicator and info object
+ * INPUTS
+ * prp_id - property list identifier
+ * comm - buffer to return MPI communicator
+ * info - buffer to return MPI info object
+ * RETURNS
+ * 0 on success, -1 on failure
+ * AUTHOR
+ * Elena Pourmal
+ * Thursday, October 26, 2000
+ * HISTORY
+ *
+ * SOURCE
+*/
+int_f
+h5pget_fapl_mpio_c(hid_t_f *prp_id, int_f* comm, int_f* info)
+/******/
+{
+ int ret_value = -1;
+ hid_t c_prp_id;
+ herr_t ret;
+ MPI_Comm c_comm;
+ MPI_Info c_info;
+
+ /*
+ * Call H5Pget_mpi function.
+ */
+ c_prp_id = *prp_id;
+ ret = H5Pget_fapl_mpio(c_prp_id, &c_comm, &c_info);
+ if (ret < 0) return ret_value;
+ *comm = (int_f) MPI_Comm_c2f(c_comm);
+ *info = (int_f) MPI_Info_c2f(c_info);
+ ret_value = 0;
+ return ret_value;
+}
+/****if* H5Pf/h5pset_dxpl_mpio_c
+ * NAME
+ * h5pset_dxpl_mpio_c
+ * PURPOSE
+ * Call H5Pset_dxpl_mpio to set transfer mode of the dataset
+ * trasfer property list
+ * INPUTS
+ * prp_id - property list identifier
+ * data_xfer_mode - transfer mode
+ * RETURNS
+ * 0 on success, -1 on failure
+ * AUTHOR
+ * Elena Pourmal
+ * Thursday, October 26, 2000
+ * HISTORY
+ *
+ * SOURCE
+*/
+int_f
+h5pset_dxpl_mpio_c(hid_t_f *prp_id, int_f* data_xfer_mode)
+/******/
+{
+ int ret_value = -1;
+ hid_t c_prp_id;
+ herr_t ret;
+ H5FD_mpio_xfer_t c_data_xfer_mode;
+/*
+ switch (*data_xfer_mode) {
+
+ case H5FD_MPIO_INDEPENDENT_F:
+ c_data_xfer_mode = H5FD_MPIO_INDEPENDENT;
+ break;
+
+ case H5FD_MPIO_COLLECTIVE_F:
+ c_data_xfer_mode = H5FD_MPIO_COLLECTIVE;
+ break;
+ default:
+ return ret_value;
+ }
+*/
+ c_data_xfer_mode = (H5FD_mpio_xfer_t)*data_xfer_mode;
+ /*
+ * Call H5Pset_dxpl_mpio function.
+ */
+ c_prp_id = *prp_id;
+ ret = H5Pset_dxpl_mpio(c_prp_id, c_data_xfer_mode);
+ if (ret < 0) return ret_value;
+ ret_value = 0;
+ return ret_value;
+}
+
+/****if* H5Pf/h5pget_dxpl_mpio_c
+ * NAME
+ * h5pget_dxpl_mpio_c
+ * PURPOSE
+ * Call H5Pget_dxpl_mpio to get transfer mode of the dataset
+ * trasfer property list
+ * INPUTS
+ * prp_id - property list identifier
+ * data_xfer_mode - buffer to retrieve transfer mode
+ * RETURNS
+ * 0 on success, -1 on failure
+ * AUTHOR
+ * Elena Pourmal
+ * Thursday, June 15, 2000
+ * HISTORY
+ *
+ * SOURCE
+*/
+int_f
+h5pget_dxpl_mpio_c(hid_t_f *prp_id, int_f* data_xfer_mode)
+/******/
+{
+ int ret_value = -1;
+ hid_t c_prp_id;
+ herr_t ret;
+ H5FD_mpio_xfer_t c_data_xfer_mode;
+
+ /*
+ * Call H5Pget_xfer function.
+ */
+ c_prp_id = *prp_id;
+ ret = H5Pget_dxpl_mpio(c_prp_id, &c_data_xfer_mode);
+ if (ret < 0) return ret_value;
+ *data_xfer_mode = (int_f)c_data_xfer_mode;
+/*
+ switch (c_data_xfer_mode) {
+
+ case H5FD_MPIO_INDEPENDENT:
+ *data_xfer_mode = H5FD_MPIO_INDEPENDENT_F;
+ break;
+
+ case H5FD_MPIO_COLLECTIVE:
+ *data_xfer_mode = H5FD_MPIO_COLLECTIVE_F;
+ break;
+
+ default:
+ return ret_value;
+ }
+*/
+ ret_value = 0;
+ return ret_value;
+}
+
+/****if* H5Pf/h5pget_mpio_actual_io_mode_c
+ * NAME
+ * h5pget_mpio_actual_io_mode_c
+ * PURPOSE
+ * Calls H5Pget_mpio_actual_io_mode
+ *
+ * INPUTS
+ * dxpl_id - Dataset transfer property list identifier.
+ * OUTPUTS
+ * actual_io_mode - The type of I/O performed by this process.
+ *
+ * RETURNS
+ * 0 on success, -1 on failure
+ * AUTHOR
+ * M. Scot Breitenfeld
+ * July 27, 2012
+ * SOURCE
+*/
+int_f
+h5pget_mpio_actual_io_mode_c(hid_t_f *dxpl_id, int_f *actual_io_mode)
+/******/
+{
+ int ret_value = -1;
+ H5D_mpio_actual_io_mode_t c_actual_io_mode;
+
+ /*
+ * Call H5Pget_mpio_actual_io_mode_f function.
+ */
+ if( (H5Pget_mpio_actual_io_mode((hid_t)*dxpl_id, &c_actual_io_mode)) <0 )
+ return ret_value; /* error occurred */
+
+ *actual_io_mode =(int_f)c_actual_io_mode;
+
+ ret_value = 0;
+ return ret_value;
+}
+#endif /*H5_HAVE_PARALLEL*/