sig
  type 'a elem
  type initial
  val reader :
    unit ->
    Pervasives.in_channel -> AnyShtream.ELEM.initial AnyShtream.ELEM.elem
  val of_string :
    unit -> string -> AnyShtream.ELEM.initial AnyShtream.ELEM.elem
  val string_of : unit -> 'a AnyShtream.ELEM.elem -> string
end