type t = {
  passwdlength : int;
  numbers : int;
  specials : int;
  capitals : int;
}
val init : ?max:int -> ?nums:int -> ?spec:int -> ?caps:int -> unit -> t
val passwdgen : t -> string