Module Ppred

val pr_with_occurrences : ('a -> Pp.t) -> (string -> Pp.t) -> 'a Locus.with_occurrences -> Pp.t
val pr_short_red_flag : ('a -> Pp.t) -> 'a Genredexpr.glob_red_flag -> Pp.t
val pr_red_flag : ('a -> Pp.t) -> 'a Genredexpr.glob_red_flag -> Pp.t
val pr_red_expr : (('a -> Pp.t) * ('a -> Pp.t) * ('b -> Pp.t) * ('c -> Pp.t)) -> (string -> Pp.t) -> ('a, 'b, 'c) Genredexpr.red_expr_gen -> Pp.t
val pr_red_expr_env : 'env -> 'sigma -> (('env -> 'sigma -> 'a -> Pp.t) * ('env -> 'sigma -> 'a -> Pp.t) * ('b -> Pp.t) * ('env -> 'sigma -> 'c -> Pp.t)) -> (string -> Pp.t) -> ('a, 'b, 'c) Genredexpr.red_expr_gen -> Pp.t

Compared to pr_red_expr, this immediately applied the tuple elements to the extra arguments.