aboutsummaryrefslogtreecommitdiff
path: root/library/decl_kinds.mli
diff options
context:
space:
mode:
authormsozeau2011-04-13 14:26:59 +0000
committermsozeau2011-04-13 14:26:59 +0000
commitd98dfbcae463f8d699765e2d7004becd7714d6cf (patch)
tree976e3e3ae284485cabd567d7c3504bc7b8817554 /library/decl_kinds.mli
parent5113afbb6e8c1f9122b37c37b0561c529c406256 (diff)
Add [Polymorphic] flag for defs
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13988 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'library/decl_kinds.mli')
-rw-r--r--library/decl_kinds.mli10
1 files changed, 6 insertions, 4 deletions
diff --git a/library/decl_kinds.mli b/library/decl_kinds.mli
index 88ef763c95..1e4ad07e83 100644
--- a/library/decl_kinds.mli
+++ b/library/decl_kinds.mli
@@ -15,6 +15,8 @@ type locality =
| Local
| Global
+type polymorphic = bool
+
type theorem_kind =
| Theorem
| Lemma
@@ -48,9 +50,9 @@ type assumption_object_kind = Definitional | Logical | Conjectural
Logical | Hypothesis | Axiom
*)
-type assumption_kind = locality * assumption_object_kind
+type assumption_kind = locality * polymorphic * assumption_object_kind
-type definition_kind = locality * definition_object_kind
+type definition_kind = locality * polymorphic * definition_object_kind
(** Kinds used in proofs *)
@@ -58,7 +60,7 @@ type goal_object_kind =
| DefinitionBody of definition_object_kind
| Proof of theorem_kind
-type goal_kind = locality * goal_object_kind
+type goal_kind = locality * polymorphic * goal_object_kind
(** Kinds used in library *)
@@ -72,7 +74,7 @@ type logical_kind =
val logical_kind_of_goal_kind : goal_object_kind -> logical_kind
val string_of_theorem_kind : theorem_kind -> string
val string_of_definition_kind :
- locality * definition_object_kind -> string
+ locality * polymorphic * definition_object_kind -> string
(** About locality *)