diff options
| author |  barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-09-03 17:14:02 +0000 |
|---|---|---|
| committer | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-09-03 17:14:02 +0000 |
| commit | 85fb5f33b1cac28e1fe4f00741c66f6f58109f84 (patch) | |
| tree | 4913998a925cb148c74a607bf7523ae1d28853ce /pretyping/termops.mli | |
| parent | 31ebb89fe48efe92786b1cddc3ba62e7dfc4e739 (diff) | |
premiere reorganisation de l\'unification
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6057 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/termops.mli')
| -rw-r--r-- | pretyping/termops.mli | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/pretyping/termops.mli b/pretyping/termops.mli index 255e8a056..8ce7b39dc 100644 --- a/pretyping/termops.mli +++ b/pretyping/termops.mli @@ -20,10 +20,14 @@ open Environ val new_univ : unit -> Univ.universe val new_sort_in_family : sorts_family -> sorts -(* iterators on terms *) +(* printers *) val print_sort : sorts -> std_ppcmds val print_sort_family : sorts_family -> std_ppcmds +(* debug printer: do not use to display terms to the casual user... *) val print_constr : constr -> std_ppcmds +val set_print_constr : (constr -> std_ppcmds) -> unit + +(* iterators on terms *) val prod_it : init:types -> (name * types) list -> types val lam_it : init:constr -> (name * types) list -> constr val rel_vect : int -> int -> constr array |