module Direct: sig .. end
val iter : Procfs.Process.t ->
       pid:((Procfs.Process.t, Core.Std.Pid.t) Fieldslib.Field.t ->
            Procfs.Process.t -> Core.Std.Pid.t -> unit) ->
       cmdline:((Procfs.Process.t, string) Fieldslib.Field.t ->
                Procfs.Process.t -> string -> unit) ->
       cwd:((Procfs.Process.t, string option) Fieldslib.Field.t ->
            Procfs.Process.t -> string option -> unit) ->
       environ:((Procfs.Process.t, string option) Fieldslib.Field.t ->
                Procfs.Process.t -> string option -> unit) ->
       exe:((Procfs.Process.t, string option) Fieldslib.Field.t ->
            Procfs.Process.t -> string option -> unit) ->
       root:((Procfs.Process.t, string option) Fieldslib.Field.t ->
             Procfs.Process.t -> string option -> unit) ->
       limits:((Procfs.Process.t, Procfs.Process.Limits.t option) Fieldslib.Field.t ->
               Procfs.Process.t -> Procfs.Process.Limits.t option -> unit) ->
       stat:((Procfs.Process.t, Procfs.Process.Stat.t) Fieldslib.Field.t ->
             Procfs.Process.t -> Procfs.Process.Stat.t -> unit) ->
       statm:((Procfs.Process.t, Procfs.Process.Statm.t) Fieldslib.Field.t ->
              Procfs.Process.t -> Procfs.Process.Statm.t -> unit) ->
       status:((Procfs.Process.t, Procfs.Process.Status.t) Fieldslib.Field.t ->
               Procfs.Process.t -> Procfs.Process.Status.t -> unit) ->
       task_stats:((Procfs.Process.t, Procfs.Process.Stat.t Core.Std.Pid.Map.t)
                   Fieldslib.Field.t ->
                   Procfs.Process.t ->
                   Procfs.Process.Stat.t Core.Std.Pid.Map.t -> unit) ->
       top_command:((Procfs.Process.t, string) Fieldslib.Field.t ->
                    Procfs.Process.t -> string -> unit) ->
       fds:((Procfs.Process.t, Procfs.Process.Fd.t list option) Fieldslib.Field.t ->
            Procfs.Process.t -> Procfs.Process.Fd.t list option -> unit) ->
       oom_adj:((Procfs.Process.t, int) Fieldslib.Field.t ->
                Procfs.Process.t -> int -> unit) ->
       oom_score:((Procfs.Process.t, int) Fieldslib.Field.t ->
                  Procfs.Process.t -> int -> unit) ->
       unit
val fold : Procfs.Process.t ->
       init:'acc__ ->
       pid:('acc__ ->
            (Procfs.Process.t, Core.Std.Pid.t) Fieldslib.Field.t ->
            Procfs.Process.t -> Core.Std.Pid.t -> 'acc__) ->
       cmdline:('acc__ ->
                (Procfs.Process.t, string) Fieldslib.Field.t ->
                Procfs.Process.t -> string -> 'acc__) ->
       cwd:('acc__ ->
            (Procfs.Process.t, string option) Fieldslib.Field.t ->
            Procfs.Process.t -> string option -> 'acc__) ->
       environ:('acc__ ->
                (Procfs.Process.t, string option) Fieldslib.Field.t ->
                Procfs.Process.t -> string option -> 'acc__) ->
       exe:('acc__ ->
            (Procfs.Process.t, string option) Fieldslib.Field.t ->
            Procfs.Process.t -> string option -> 'acc__) ->
       root:('acc__ ->
             (Procfs.Process.t, string option) Fieldslib.Field.t ->
             Procfs.Process.t -> string option -> 'acc__) ->
       limits:('acc__ ->
               (Procfs.Process.t, Procfs.Process.Limits.t option) Fieldslib.Field.t ->
               Procfs.Process.t -> Procfs.Process.Limits.t option -> 'acc__) ->
       stat:('acc__ ->
             (Procfs.Process.t, Procfs.Process.Stat.t) Fieldslib.Field.t ->
             Procfs.Process.t -> Procfs.Process.Stat.t -> 'acc__) ->
       statm:('acc__ ->
              (Procfs.Process.t, Procfs.Process.Statm.t) Fieldslib.Field.t ->
              Procfs.Process.t -> Procfs.Process.Statm.t -> 'acc__) ->
       status:('acc__ ->
               (Procfs.Process.t, Procfs.Process.Status.t) Fieldslib.Field.t ->
               Procfs.Process.t -> Procfs.Process.Status.t -> 'acc__) ->
       task_stats:('acc__ ->
                   (Procfs.Process.t, Procfs.Process.Stat.t Core.Std.Pid.Map.t)
                   Fieldslib.Field.t ->
                   Procfs.Process.t ->
                   Procfs.Process.Stat.t Core.Std.Pid.Map.t -> 'acc__) ->
       top_command:('acc__ ->
                    (Procfs.Process.t, string) Fieldslib.Field.t ->
                    Procfs.Process.t -> string -> 'acc__) ->
       fds:('acc__ ->
            (Procfs.Process.t, Procfs.Process.Fd.t list option) Fieldslib.Field.t ->
            Procfs.Process.t -> Procfs.Process.Fd.t list option -> 'acc__) ->
       oom_adj:('acc__ ->
                (Procfs.Process.t, int) Fieldslib.Field.t ->
                Procfs.Process.t -> int -> 'acc__) ->
       oom_score:('acc__ ->
                  (Procfs.Process.t, int) Fieldslib.Field.t ->
                  Procfs.Process.t -> int -> 'acc__) ->
       'acc__