The FORTRAN 90 API to HDF5
h5a: Attributes

 

 


 

 

FORTRAN interface:   h5aclose_f

          SUBROUTINE h5aclose_f(attr_id, hdferr) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(OUT) :: attr_id  ! Attribute identifier 
            INTEGER, INTENT(OUT) :: hdferr       ! Error code
                                                 ! 0 on success and -1 on failure
          END SUBROUTINE h5aclose_f

 

 


 

 

FORTRAN interface:   h5acreate_f

          SUBROUTINE h5acreate_f(obj_id, name, type_id, space_id, attr_id, &
                                 hdferr, creation_prp) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(IN) :: obj_id    ! Object identifier 
            CHARACTER(LEN=*), INTENT(IN) :: name    ! Attribute name
            INTEGER(HID_T), INTENT(IN) :: type_id   ! Attribute datatype identifier 
            INTEGER(HID_T), INTENT(IN) :: space_id  ! Attribute dataspace identifier
            INTEGER(HID_T), INTENT(OUT) :: attr_id  ! Attribute identifier 
            INTEGER, INTENT(OUT) :: hdferr       ! Error code:
                                                 ! 0 on success and -1 on failure
            INTEGER(HID_T), OPTIONAL, INTENT(IN) :: creation_prp
                                                 ! Attribute creation property 
                                                 ! list identifier 
          END SUBROUTINE h5acreate_f

 

 


 

 

FORTRAN interface:   h5adelete_f

          SUBROUTINE h5adelete_f(obj_id, name, hdferr) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(IN) :: obj_id    ! Object identifier 
            CHARACTER(LEN=*), INTENT(IN) :: name    ! Attribute name
            INTEGER, INTENT(OUT) :: hdferr       ! Error code
                                                 ! 0 on success and -1 on failure
          END SUBROUTINE h5adelete_f

 

 


 

 

FORTRAN interface:   h5aget_name_f

          SUBROUTINE h5aget_name_f(attr_id, size, buf, hdferr) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(IN) :: attr_id  ! Attribute identifier 
            INTEGER, INTENT(IN) :: size            ! Buffer size 
            CHARACTER(LEN=*), INTENT(OUT) :: buf   ! Buffer to hold attribute name
            INTEGER, INTENT(OUT) :: hdferr       ! Error code : name length  
                                                 ! on success and -1 on failure
          END SUBROUTINE h5aget_name_f

 

 


 

 

FORTRAN interface:   h5aget_num_attrs_f

          SUBROUTINE h5aget_num_attrs_f(obj_id, attr_num, hdferr) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(IN) :: obj_id  ! Object identifier 
            INTEGER, INTENT(OUT) :: attr_num      ! Number of attributes of the
                                                  ! object
            INTEGER, INTENT(OUT) :: hdferr       ! Error code
                                                 ! 0 on success and -1 on failure
          END SUBROUTINE h5aget_num_attrs_f

 

 


 

 

FORTRAN interface:   h5aget_space_f

          SUBROUTINE h5aget_space_f(attr_id, space_id, hdferr) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(IN) :: attr_id  ! Attribute identifier 
            INTEGER(HID_T), INTENT(OUT) :: space_id ! Attribute dataspace identifier
            INTEGER, INTENT(OUT) :: hdferr       ! Error code
                                                 ! 0 on success and -1 on failure
          END SUBROUTINE h5aget_space_f

 

 


 

 

FORTRAN interface:   h5aget_type_f

          SUBROUTINE h5aget_type_f(attr_id, type_id, hdferr) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(IN) :: attr_id  ! Attribute identifier 
            INTEGER(HID_T), INTENT(OUT) :: type_id ! Attribute datatype identifier
            INTEGER, INTENT(OUT) :: hdferr       ! Error code
                                                 ! 0 on success and -1 on failure
          END SUBROUTINE h5aget_type_f

 

 


 

 

FORTRAN interface:   h5aopen_idx_f

          SUBROUTINE h5aopen_idx_f(obj_id, index, attr_id, hdferr) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(IN) :: obj_id    ! Object identifier 
            INTEGER, INTENT(IN) :: index            ! Attribute index 
            INTEGER(HID_T), INTENT(OUT) :: attr_id  ! Attribute identifier 
            INTEGER, INTENT(OUT) :: hdferr       ! Error code
                                                 ! 0 on success and -1 on failure
          END SUBROUTINE h5aopen_idx_f

 

 


 

 

FORTRAN interface:   h5aopen_name_f

          SUBROUTINE h5aopen_name_f(obj_id, name, attr_id, hdferr) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(IN) :: obj_id    ! Object identifier 
            CHARACTER(LEN=*), INTENT(IN) :: name    ! Attribute name
            INTEGER(HID_T), INTENT(OUT) :: attr_id  ! Attribute identifier 
            INTEGER, INTENT(OUT) :: hdferr       ! Error code
                                                 ! 0 on success and -1 on failure
          END SUBROUTINE h5aopen_name_f

 

 


 

 

FORTRAN interface:   h5aread_f

          SUBROUTINE h5aread_f(attr_id, memtype_id,  buf, hdferr) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
            INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
                                                     ! identifier  (in memory)
            TYPE(VOID), INTENT(OUT) :: buf            ! Attribute data 
            INTEGER, INTENT(OUT) :: hdferr       ! Error code
                                                 ! 0 on success and -1 on failure
          END SUBROUTINE h5aread_f

 

 


 

 

FORTRAN interface:   h5awrite_f

          SUBROUTINE h5awrite_f(attr_id, memtype_id,  buf, hdferr) 
            IMPLICIT NONE
            INTEGER(HID_T), INTENT(IN) :: attr_id   ! Attribute identifier 
            INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype 
                                                     ! identifier  (in memory)
            TYPE(VOID), INTENT(IN) :: buf            ! Attribute data 
            INTEGER, INTENT(OUT) :: hdferr       ! Error code
                                                 ! 0 on success and -1 on failure
          END SUBROUTINE h5awrite_f

 

 


HDF Help Desk
Last modified: 20 October 1999
Describes HDF5 Release 1.5, Unreleased Development Branch