blob: bcdc6f93a74ce3ea0dc1071aaeaec1dd50b82ce6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
(* $Id$ *)
(*i*)
open Pp
open Names
open Term
(*i*)
val gencompr : path_kind -> Coqast.t -> std_ppcmds
val gentermpr : path_kind -> 'a assumptions -> constr -> std_ppcmds
val gentacpr : Coqast.t -> std_ppcmds
val print_arguments : bool ref
val print_casts : bool ref
val print_emacs : bool ref
val with_implicits : ('a -> 'b) -> 'a -> 'b
|