sig
  exception Error
  val read : string -> (String.t, String.t, String.t) Mtt.mtt
end