sig val prompt : string -> string val password : string -> string option val confirm : string -> string -> bool end