MODULE AXISGROUP_INTERFACE USE, INTRINSIC :: ISO_C_BINDING INTERFACE ! Ne pas appeler directement/Interface FORTRAN 2003 <-> C99 SUBROUTINE cxios_axisgroup_handle_create(ret, idt, idt_size) BIND(C) USE ISO_C_BINDING INTEGER (kind = C_INTPTR_T) :: ret CHARACTER(kind = C_CHAR) , DIMENSION(*) :: idt INTEGER (kind = C_INT) , VALUE :: idt_size END SUBROUTINE cxios_axisgroup_handle_create SUBROUTINE cxios_axisgroup_valid_id(ret, idt, idt_size) BIND(C) USE ISO_C_BINDING LOGICAL (kind = C_BOOL) :: ret CHARACTER(kind = C_CHAR) , DIMENSION(*) :: idt INTEGER (kind = C_INT) , VALUE :: idt_size END SUBROUTINE cxios_axisgroup_valid_id END INTERFACE END MODULE AXISGROUP_INTERFACE