diff options
author | Amin Timany <amintimany@gmail.com> | 2017-05-02 19:53:05 +0200 |
---|---|---|
committer | Emilio Jesus Gallego Arias <e+git@x80.org> | 2017-06-16 04:51:17 +0200 |
commit | d6898781f9cd52ac36a4891d7b169ddab7b8af50 (patch) | |
tree | 880ef0bcad043f083a6157644d10e068b8185b4c /checker/inductive.ml | |
parent | 4bf85270a36a0a3f9517d8bce92d843f882af00a (diff) |
Correct coqchk reduction
Diffstat (limited to 'checker/inductive.ml')
-rw-r--r-- | checker/inductive.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/checker/inductive.ml b/checker/inductive.ml index f890adba9..30c5f878a 100644 --- a/checker/inductive.ml +++ b/checker/inductive.ml @@ -56,7 +56,7 @@ let inductive_params (mib,_) = mib.mind_nparams let inductive_instance mib = if mib.mind_polymorphic then - UContext.instance mib.mind_universes + UContext.instance (UInfoInd.univ_context mib.mind_universes) else Instance.empty (************************************************************************) |