sig
  type file_format = Bin | Cbn | Txt | Asc
  exception Unknown_format
  val format_list : (Generic_io.file_format * string) list
  val format_to_id : Generic_io.file_format -> string
  val id_to_format : string -> Generic_io.file_format
  val in_from_channel :
    ?header:bool ->
    ?fmt:Generic_io.file_format -> Pervasives.in_channel -> Fragments.io_in
  val out_from_channel :
    ?header:bool ->
    ?fmt:Generic_io.file_format -> Pervasives.out_channel -> Fragments.io_out
  val save_to_file :
    ?header:bool ->
    ?fmt:Generic_io.file_format -> 'Io.literate -> '-> string -> unit
  val save_to_channel :
    ?header:bool ->
    ?fmt:Generic_io.file_format ->
    'Io.literate -> '-> Pervasives.out_channel -> unit
  val load_from_file : 'Io.literate -> string -> 'a
  val load_from_channel :
    ?header:bool ->
    ?fmt:Generic_io.file_format ->
    'Io.literate -> Pervasives.in_channel -> 'a
  val to_string :
    ?header:bool ->
    ?fmt:Generic_io.file_format -> 'Io.literate -> '-> string
  val from_string :
    ?header:bool ->
    ?fmt:Generic_io.file_format ->
    ?offset:int -> 'Io.literate -> string -> 'a
  val in_from_string :
    ?header:bool ->
    ?fmt:Generic_io.file_format -> ?offset:int -> string -> Fragments.io_in
end