diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-01-29 16:01:32 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-01-29 16:01:32 +0000 |
| commit | d211f51ea3bf9417422e2bf74ed5dfc1e886ef83 (patch) | |
| tree | 9d068e6de66b9659dc41e0a7afa76b0e238b744e | |
| parent | fef94502b2ffd2012abcf1a0315b000e9a0951ad (diff) | |
Ajout syntaxe concrète Proposition, synonyme de Lemma
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@7944 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | library/decl_kinds.ml | 4 | ||||
| -rw-r--r-- | parsing/g_vernac.ml4 | 1 |
2 files changed, 4 insertions, 1 deletions
diff --git a/library/decl_kinds.ml b/library/decl_kinds.ml index c6879575d..c33738644 100644 --- a/library/decl_kinds.ml +++ b/library/decl_kinds.ml @@ -24,6 +24,7 @@ type theorem_kind = | Fact | Remark | Property + | Proposition | Corollary type definition_object_kind = @@ -80,8 +81,9 @@ let string_of_theorem_kind = function | Lemma -> "Lemma" | Fact -> "Fact" | Remark -> "Remark" - | Corollary -> "Corollary" | Property -> "Property" + | Proposition -> "Proposition" + | Corollary -> "Corollary" let string_of_definition_kind (l,boxed,d) = match (l,d) with diff --git a/parsing/g_vernac.ml4 b/parsing/g_vernac.ml4 index 480ce24e7..ad3cc5b36 100644 --- a/parsing/g_vernac.ml4 +++ b/parsing/g_vernac.ml4 @@ -135,6 +135,7 @@ GEXTEND Gram | IDENT "Fact" -> Fact | IDENT "Remark" -> Remark | IDENT "Corollary" -> Corollary + | IDENT "Proposition" -> Proposition | IDENT "Property" -> Property ] ] ; def_token: |