Module Email_or_phone.Almost
type tval of_json : Deriving_Json_lexer.lexbuf -> tval json : t Deriving_Json.ttype y = [ | `Email| `Phone| `Almost_phone| `Almost_email| `Invalid
]val y_of_json_with_tag :
Deriving_Json_lexer.lexbuf ->
[ `NCst of int | `Cst of int ] ->
yval y_recognize : [ `NCst of int | `Cst of int ] -> boolval y_of_json : Deriving_Json_lexer.lexbuf -> yval y_json : y Deriving_Json.tval to_string : t -> stringval of_string : only_mail:bool -> string -> t