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

This commit is contained in:
Leonardo de Moura 2015-02-13 10:09:18 -08:00
parent 80e1ac2c4f
commit 98960cbeda

View file

@ -993,7 +993,7 @@ class rewrite_fn {
expr M = m_g.mk_meta(m_ngen.next(), Pb); expr M = m_g.mk_meta(m_ngen.next(), Pb);
expr H; expr H;
if (has_dep_elim) { 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(), {l2}), A, b, mk_var(0));
expr P = mk_lambda("x", A, mk_lambda("H", Haeqx, Px)); expr P = mk_lambda("x", A, mk_lambda("H", Haeqx, Px));
H = mk_app({mk_constant(get_eq_rec_name(), {l1, l2}), A, b, P, M, a, Heq}); H = mk_app({mk_constant(get_eq_rec_name(), {l1, l2}), A, b, P, M, a, Heq});
} else { } else {