Read HDF5 data with fortran

From: Hubert (hta_at_simtech.nl)
Date: 11/27/03


Date: 27 Nov 2003 08:43:20 -0800

I have an HDF-file with the following information in it:
   GROUP "NC_DIMS" {
      ATTRIBUTE "comment" {
         DATATYPE H5T_STRING {
               STRSIZE 32;
               STRPAD H5T_STR_NULLTERM;
               CSET H5T_CSET_ASCII;
               CTYPE H5T_C_S1;
            }
         DATASPACE SCALAR
         DATA {
            "This contains the dim-constants"
         }
      }
      DATATYPE "DimInfoObjectType" H5T_COMPOUND {
         H5T_STRING {
            STRSIZE 64;
            STRPAD H5T_STR_NULLTERM;
            CSET H5T_CSET_ASCII;
            CTYPE H5T_C_S1;
         } "name";
         H5T_STD_I32LE "unlimited";
         H5T_STD_U32LE "current_size";
         H5T_STD_U32LE "max_size";
      }
      DATASET "M" {
         DATATYPE "/NC_DIMS/DimInfoObjectType"
         DATASPACE SIMPLE { ( 1 ) / ( 1 ) }
         DATA {
            {
               "M",
               0,
               57,
               57
            }
         }
      }
      DATASET "N" {
         DATATYPE "/NC_DIMS/DimInfoObjectType"
         DATASPACE SIMPLE { ( 1 ) / ( 1 ) }
         DATA {
            {
               "N",
               0,
               34,
               34
            }
         }
      }
      DATASET "NV" {
         DATATYPE "/NC_DIMS/DimInfoObjectType"
         DATASPACE SIMPLE { ( 1 ) / ( 1 ) }
         DATA {
            {
               "NV",
               0,
               4,
               4
            }
         }
      }
      DATASET "T" {
         DATATYPE "/NC_DIMS/DimInfoObjectType"
         DATASPACE SIMPLE { ( 1 ) / ( 1 ) }
         DATA {
            {
               "T",
               1,
               7,
               7
            }
         }
      }
   }

Now I want to read value 57 from this HDF-file.
First I start to make a program in FORTRAN
I use the subroutine:
   CALL h5open_f(error)
to Initialize FORTRAN interface
but I don't know how to continue.
Who can help me?

Hubert