Module Fields

val names : string list

val shell : (t, string) Fieldslib.Field.t

val dir : (t, string) Fieldslib.Field.t

val gecos : (t, string) Fieldslib.Field.t

val gid : (t, int) Fieldslib.Field.t

val uid : (t, int) Fieldslib.Field.t

val passwd : (t, string) Fieldslib.Field.t

val name : (t, string) Fieldslib.Field.t

val fold : init:'acc__ -> name:('acc__ -> (t, string) Fieldslib.Field.t -> 'acc__) -> passwd:('acc__ -> (t, string) Fieldslib.Field.t -> 'acc__) -> uid:('acc__ -> (t, int) Fieldslib.Field.t -> 'acc__) -> gid:('acc__ -> (t, int) Fieldslib.Field.t -> 'acc__) -> gecos:('acc__ -> (t, string) Fieldslib.Field.t -> 'acc__) -> dir:('acc__ -> (t, string) Fieldslib.Field.t -> 'acc__) -> shell:('acc__ -> (t, string) Fieldslib.Field.t -> 'acc__) -> 'acc__

val make_creator : name:((t, string) Fieldslib.Field.t -> 'compile_acc__ -> ('input__ -> string) * 'compile_acc__) -> passwd:((t, string) Fieldslib.Field.t -> 'compile_acc__ -> ('input__ -> string) * 'compile_acc__) -> uid:((t, int) Fieldslib.Field.t -> 'compile_acc__ -> ('input__ -> int) * 'compile_acc__) -> gid:((t, int) Fieldslib.Field.t -> 'compile_acc__ -> ('input__ -> int) * 'compile_acc__) -> gecos:((t, string) Fieldslib.Field.t -> 'compile_acc__ -> ('input__ -> string) * 'compile_acc__) -> dir:((t, string) Fieldslib.Field.t -> 'compile_acc__ -> ('input__ -> string) * 'compile_acc__) -> shell:((t, string) Fieldslib.Field.t -> 'compile_acc__ -> ('input__ -> string) * 'compile_acc__) -> 'compile_acc__ -> ('input__ -> t) * 'compile_acc__

val create : name:string -> passwd:string -> uid:int -> gid:int -> gecos:string -> dir:string -> shell:string -> t

val map : name:((t, string) Fieldslib.Field.t -> string) -> passwd:((t, string) Fieldslib.Field.t -> string) -> uid:((t, int) Fieldslib.Field.t -> int) -> gid:((t, int) Fieldslib.Field.t -> int) -> gecos:((t, string) Fieldslib.Field.t -> string) -> dir:((t, string) Fieldslib.Field.t -> string) -> shell:((t, string) Fieldslib.Field.t -> string) -> t

val iter : name:((t, string) Fieldslib.Field.t -> unit) -> passwd:((t, string) Fieldslib.Field.t -> unit) -> uid:((t, int) Fieldslib.Field.t -> unit) -> gid:((t, int) Fieldslib.Field.t -> unit) -> gecos:((t, string) Fieldslib.Field.t -> unit) -> dir:((t, string) Fieldslib.Field.t -> unit) -> shell:((t, string) Fieldslib.Field.t -> unit) -> unit

val for_all : name:((t, string) Fieldslib.Field.t -> bool) -> passwd:((t, string) Fieldslib.Field.t -> bool) -> uid:((t, int) Fieldslib.Field.t -> bool) -> gid:((t, int) Fieldslib.Field.t -> bool) -> gecos:((t, string) Fieldslib.Field.t -> bool) -> dir:((t, string) Fieldslib.Field.t -> bool) -> shell:((t, string) Fieldslib.Field.t -> bool) -> bool

val exists : name:((t, string) Fieldslib.Field.t -> bool) -> passwd:((t, string) Fieldslib.Field.t -> bool) -> uid:((t, int) Fieldslib.Field.t -> bool) -> gid:((t, int) Fieldslib.Field.t -> bool) -> gecos:((t, string) Fieldslib.Field.t -> bool) -> dir:((t, string) Fieldslib.Field.t -> bool) -> shell:((t, string) Fieldslib.Field.t -> bool) -> bool

val to_list : name:((t, string) Fieldslib.Field.t -> 'elem__) -> passwd:((t, string) Fieldslib.Field.t -> 'elem__) -> uid:((t, int) Fieldslib.Field.t -> 'elem__) -> gid:((t, int) Fieldslib.Field.t -> 'elem__) -> gecos:((t, string) Fieldslib.Field.t -> 'elem__) -> dir:((t, string) Fieldslib.Field.t -> 'elem__) -> shell:((t, string) Fieldslib.Field.t -> 'elem__) -> 'elem__ list

val map_poly : ([< ], t, 'x0) Fieldslib.Field.user -> 'x0 list