diff options
| author | herbelin | 2000-06-29 11:13:03 +0000 |
|---|---|---|
| committer | herbelin | 2000-06-29 11:13:03 +0000 |
| commit | 2271d217280ac72632fa84574e5a7429a0394278 (patch) | |
| tree | f7736e0b8a8ef1a26d3ff129a2c14102d93fedfd /kernel/term.mli | |
| parent | 303a9cded85aa89c15d620d7a11e850c2ada7b37 (diff) | |
Ajout make_typed_lazy
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@528 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/term.mli')
| -rw-r--r-- | kernel/term.mli | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/kernel/term.mli b/kernel/term.mli index bfeccb0c72..7e2e916def 100644 --- a/kernel/term.mli +++ b/kernel/term.mli @@ -63,6 +63,7 @@ type typed_type type typed_term = typed_type judge val make_typed : constr -> sorts -> typed_type +val make_typed_lazy : constr -> (constr -> sorts) -> typed_type val typed_app : (constr -> constr) -> typed_type -> typed_type val typed_combine : (constr -> constr -> constr) -> (sorts -> sorts -> sorts) @@ -283,8 +284,6 @@ val is_small : sorts -> bool (* true for \textsf{Prop} and \textsf{Set} *) (* Destructs a casted term *) val destCast : constr -> constr * constr -val cast_type : constr -> constr (* 2nd proj *) -val cast_term : constr -> constr (* 1st proj *) val isCast : constr -> bool (* Removes recursively the casts around a term i.e. |