<pre><code class="language-fortran">Fortran90 Interface: h5sis_simple_f
SUBROUTINE h5sis_simple_f(space_id, flag, hdferr)
IMPLICIT NONE
INTEGER(HID_T), INTENT(IN) :: space_id ! Dataspace identifier
LOGICAL, INTENT(OUT) :: flag ! Flag, indicates if dataspace
! is simple or not:
! TRUENon-negative
or FALSE
INTEGER, INTENT(OUT) :: hdferr ! Error code
END SUBROUTINE h5sis_simple_f
</code></pre> |