val isIdent : char -> bool
val validHost : string -> bool
val validDomain : string -> bool
+ val yourDomain : string -> bool
+ val validUser : string -> bool
val ip : string Env.arg
val hasPriv : string -> bool
- val rmdom : string -> unit
+ val rmdom : string list -> unit
end