aboutsummaryrefslogtreecommitdiffhomepage
path: root/library/decl_kinds.mli
diff options
context:
space:
mode:
Diffstat (limited to 'library/decl_kinds.mli')
-rw-r--r--library/decl_kinds.mli10
1 files changed, 10 insertions, 0 deletions
diff --git a/library/decl_kinds.mli b/library/decl_kinds.mli
index 7aa1df0c9..e42cb9621 100644
--- a/library/decl_kinds.mli
+++ b/library/decl_kinds.mli
@@ -82,3 +82,13 @@ val string_of_definition_kind :
val strength_of_global : global_reference -> locality
val string_of_strength : locality -> string
+
+(* About recursive power of type declarations *)
+
+type recursivity_kind =
+ | Finite (* = inductive *)
+ | CoFinite (* = coinductive *)
+ | BiFinite (* = non-recursive, like in "Record" definitions *)
+
+(* helper, converts to "finiteness flag" booleans *)
+val recursivity_flag_of_kind : recursivity_kind -> bool