(** (Nickname, username, hostname) tuple *) type nuhost = (string * string * string) val name : string ref val version : string val start_time : float val uppercase : string -> string val lowercase : string -> string val truncate : string -> int -> string