- Timestamp:
- 07/06/11 13:55:03 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XMLIO_V2/dev/dev_rv/src4/xmlio/fortran/filegroup_interface.f90
r242 r249 36 36 LOGICAL (kind = C_BOOL) :: enabled 37 37 END SUBROUTINE xios_set_filegroup_enabled 38 38 39 SUBROUTINE xios_filegroup_handle_create(ret, idt, idt_size) BIND(C) 40 import C_CHAR, C_INTPTR_T, C_INT 41 INTEGER (kind = C_INTPTR_T) :: ret 42 CHARACTER(kind = C_CHAR) , DIMENSION(*) :: idt 43 INTEGER (kind = C_INT) , VALUE :: idt_size 44 END SUBROUTINE xios_filegroup_handle_create 45 39 46 END INTERFACE 40 47
Note: See TracChangeset
for help on using the changeset viewer.