diff options
Diffstat (limited to 'pretyping/indrec.ml')
| -rw-r--r-- | pretyping/indrec.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/indrec.ml b/pretyping/indrec.ml index a5c4ecd3b..8904e2b7b 100644 --- a/pretyping/indrec.ml +++ b/pretyping/indrec.ml @@ -432,7 +432,7 @@ let mis_make_indrec env sigma listdepkind mib = mis_make_case_com dep env sigma indi (mibi,mipi) kind in (* Body of mis_make_indrec *) - List.tabulate make_one_rec nrec + List.init nrec make_one_rec (**********************************************************************) (* This builds elimination predicate for Case tactic *) |