sig
  type t = Mixfix | Prefix | Sexpr
  val to_string : Pretty.Mode.t -> string
  val of_string : string -> Pretty.Mode.t
end