diff options
| author | Amin Timany | 2017-06-14 16:32:47 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2017-06-16 04:51:20 +0200 |
| commit | a4969591f391d857a9efd038338e1a80fc68950b (patch) | |
| tree | 3cefd837747d96401f9800d63ff8f2c27a07ed57 /kernel | |
| parent | 5fb30d6c06d47a8e6c4200cdd0ba9067be7cfe2f (diff) | |
A short cleanup
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/declarations.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/kernel/declarations.ml b/kernel/declarations.ml index f3b7ae2b24..21651b3e21 100644 --- a/kernel/declarations.ml +++ b/kernel/declarations.ml @@ -169,7 +169,7 @@ type one_inductive_body = { mind_reloc_tbl : Cbytecodes.reloc_table; } -type abstrac_inductive_universes = +type abstract_inductive_universes = | Monomorphic_ind of Univ.universe_context | Polymorphic_ind of Univ.abstract_universe_context | Cumulative_ind of Univ.abstract_cumulativity_info @@ -192,7 +192,7 @@ type mutual_inductive_body = { mind_params_ctxt : Context.Rel.t; (** The context of parameters (includes let-in declaration) *) - mind_universes : abstrac_inductive_universes; (** Information about monomorphic/polymorphic/cumulative inductives and their universes *) + mind_universes : abstract_inductive_universes; (** Information about monomorphic/polymorphic/cumulative inductives and their universes *) mind_private : bool option; (** allow pattern-matching: Some true ok, Some false blocked *) |