diff options
| author | herbelin | 2001-09-09 15:19:10 +0000 |
|---|---|---|
| committer | herbelin | 2001-09-09 15:19:10 +0000 |
| commit | 57836d30da692ebbe79c4f3644803c8fa3ec34cc (patch) | |
| tree | 726d7a74162b6d38d1cc5267a4f9aa1732c0c25e /kernel/term.ml | |
| parent | 2ec6a91a4270d2941cee84f67599a3d28285833f (diff) | |
Suppression de Type_1, inutile, et non prévu dans le modèle des univers algébriques
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1937 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/term.ml')
| -rw-r--r-- | kernel/term.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/kernel/term.ml b/kernel/term.ml index c6022b999c..1637fcafba 100644 --- a/kernel/term.ml +++ b/kernel/term.ml @@ -1059,9 +1059,8 @@ let mkType u = mkSort (Type u) let prop = Prop Null and spec = Prop Pos -and types = Type dummy_univ +and types = Type implicit_univ (* For eliminations *) and type_0 = Type prop_univ -and type_1 = Type prop_univ_univ (* Constructs the term t1::t2, i.e. the term t1 casted with the type t2 *) (* (that means t2 is declared as the type of t1) *) |