val
make_creator : name:((
t, string)
Fieldslib.Field.t -> 'acc__0 -> ('input__ -> string)
* 'acc__1) -> passwd:((
t, string)
Fieldslib.Field.t -> 'acc__1 -> ('input__ -> string)
* 'acc__2) -> gid:((
t, int)
Fieldslib.Field.t -> 'acc__2 -> ('input__ -> int)
* 'acc__3) -> mem:((
t, string array)
Fieldslib.Field.t -> 'acc__3 -> ('input__ -> string array)
* 'acc__4) -> 'acc__0 -> ('input__ ->
t)
* 'acc__4