diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-10-06 16:08:20 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-10-06 16:08:20 +0000 |
commit | 970b4b750486ad8544b5d0a3b2246282690e6c98 (patch) | |
tree | d8aeeee6133883547e7e30246fcc544e32ae9746 /kernel/inductive.mli | |
parent | ca91e3c69ba2dfed3f8fd24f721873f5d0cd2004 (diff) |
Correction incompatibilites dans la fn des types des inductifs
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@673 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/inductive.mli')
-rw-r--r-- | kernel/inductive.mli | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/kernel/inductive.mli b/kernel/inductive.mli index 3b45dad0b..727ccf409 100644 --- a/kernel/inductive.mli +++ b/kernel/inductive.mli @@ -42,15 +42,15 @@ val mis_typepath : inductive_instance -> section_path val mis_is_recursive_subset : int list -> inductive_instance -> bool val mis_is_recursive : inductive_instance -> bool val mis_consnames : inductive_instance -> identifier array -val mis_typed_arity : inductive_instance -> typed_type val mis_inductive : inductive_instance -> inductive -val mis_arity : inductive_instance -> constr +val mis_nf_arity : inductive_instance -> typed_type +val mis_user_arity : inductive_instance -> typed_type val mis_params_ctxt : inductive_instance -> rel_context val mis_sort : inductive_instance -> sorts val mis_type_mconstruct : int -> inductive_instance -> typed_type (* The ccl of constructor is pre-normalised in the following functions *) -val mis_lc : inductive_instance -> constr array +val mis_nf_lc : inductive_instance -> constr array val mis_type_mconstructs : inductive_instance -> constr array * constr array (*s [inductive_family] = [inductive_instance] applied to global parameters *) |