val pp_option : 'a Fmt.t -> 'a option Fmt.t
val pp_list : ?sep:unit Fmt.t -> 'a Fmt.t -> 'a list Fmt.t
type assert_annot = {
label : string;
existentials : (string * GilType.t option) list;
}
val pp_assert_annot :
?post:('a, 'b, 'c, 'd, 'd, 'a) Stdlib.format6 ->
Stdlib.Format.formatter ->
assert_annot ->
unit
module CUnOp : sig ... end
module CNOp : sig ... end
module CSVal : sig ... end
module CExpr : sig ... end
module CLCmd : sig ... end
module CPred : sig ... end
module CSpec : sig ... end
module CProg : sig ... end