diff options
Diffstat (limited to 'contrib/funind/recdef.ml')
| -rw-r--r-- | contrib/funind/recdef.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/funind/recdef.ml b/contrib/funind/recdef.ml index 13989f03b..6227f92d7 100644 --- a/contrib/funind/recdef.ml +++ b/contrib/funind/recdef.ml @@ -1157,7 +1157,7 @@ let rec introduce_all_values_eq cont_tac functional termine [] -> let heq2 = next_global_ident_away true heq_id ids in tclTHENLIST - [forward None (IntroIdentifier heq2) + [forward None (dummy_loc,IntroIdentifier heq2) (mkApp(mkVar heq1, [|f_S(f_S(mkVar pmax))|])); simpl_iter (onHyp heq2); unfold_in_hyp [((true,[1]), evaluable_of_global_reference |