michael/lean2
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix(library/tactic/rewrite_tactic): bug in rewrite hypothesis in HoTT mode

Browse source
This commit is contained in:
Leonardo de Moura 2015-04-30 15:30:25 -07:00
parent 59b11c815c
commit 936e024128
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/library/tactic/rewrite_tactic.cpp
View file

@ -1208,7 +1208,7 @@ class rewrite_fn {
level l2 = sort_level(m_tc->ensure_type(A).first);
expr H;
if (has_dep_elim) {
expr Haeqx = mk_app(mk_constant(get_eq_name(), {l1}), A, b, mk_var(0));
expr Haeqx = mk_app(mk_constant(get_eq_name(), {l1}), A, a, mk_var(0));
expr P = mk_lambda("x", A, mk_lambda("H", Haeqx, Px));
H = mk_app({mk_constant(get_eq_rec_name(), {l1, l2}), A, a, P, hyp, b, Heq});
} else {