MODULE FILEGROUP_INTERFACE
   USE, INTRINSIC :: ISO_C_BINDING
   
   INTERFACE ! Ne pas appeler directement/Interface FORTRAN 2003 <-> C99
   
      SUBROUTINE xios_set_filegroup_name(filegroup_hdl, name ,name_size) BIND(C)
         USE ISO_C_BINDING
         INTEGER  (kind = C_INTPTR_T), VALUE        :: filegroup_hdl
         CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: name
         INTEGER  (kind = C_INT)     , VALUE        :: name_size
      END SUBROUTINE xios_set_filegroup_name

      SUBROUTINE xios_set_filegroup_description(filegroup_hdl, description ,description_size) BIND(C)
         USE ISO_C_BINDING
         INTEGER  (kind = C_INTPTR_T), VALUE        :: filegroup_hdl
         CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: description
         INTEGER  (kind = C_INT)     , VALUE        :: description_size
      END SUBROUTINE xios_set_filegroup_description
      
      SUBROUTINE xios_set_filegroup_name_suffix(filegroup_hdl, name_suffix ,name_suffix_size) BIND(C)
         USE ISO_C_BINDING
         INTEGER  (kind = C_INTPTR_T), VALUE        :: filegroup_hdl
         CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: name_suffix
         INTEGER  (kind = C_INT)     , VALUE        :: name_suffix_size
      END SUBROUTINE xios_set_filegroup_name_suffix

      SUBROUTINE xios_set_filegroup_output_freq(filegroup_hdl, output_freq ,output_freq_size) BIND(C)
         USE ISO_C_BINDING
         INTEGER  (kind = C_INTPTR_T), VALUE        :: filegroup_hdl
         CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: output_freq
         INTEGER  (kind = C_INT)     , VALUE        :: output_freq_size
      END SUBROUTINE xios_set_filegroup_output_freq

      SUBROUTINE xios_set_filegroup_output_level(filegroup_hdl, output_level) BIND(C)
         USE ISO_C_BINDING
         INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
         INTEGER (kind = C_INT)     , VALUE :: output_level
      END SUBROUTINE xios_set_filegroup_output_level

      SUBROUTINE xios_set_filegroup_enabled(filegroup_hdl, enabled) BIND(C)
         USE ISO_C_BINDING
         INTEGER (kind = C_INTPTR_T), VALUE :: filegroup_hdl
         LOGICAL (kind = C_BOOL)    , VALUE :: enabled
      END SUBROUTINE xios_set_filegroup_enabled
      
      SUBROUTINE xios_filegroup_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 xios_filegroup_handle_create

   END INTERFACE
   
END MODULE FILEGROUP_INTERFACE