module Corpus: sig .. end
sig
end
type t =
|
Default
Domain
(*
*)
User
val to_string : t -> string
t -> string
val of_string : string -> t
string -> t