<pre><code class="language-c">hid_t H5Tget_super( hid_t dtype_id )</code></pre>

<pre><code class="language-fortran">SUBROUTINE h5tget_super_f(type_id, base_type_id, hdferr) 
  IMPLICIT NONE
  INTEGER(HID_T), INTENT(IN) :: type_id  ! Datatype identifier 
  INTEGER(HID_T), INTENT(OUT) :: type_id ! Base datatype identifier 
  INTEGER, INTENT(OUT) :: hdferr         ! Error code
END SUBROUTINE h5tget_super_f</code></pre>