fix(library/fo_unify): bug at function that extracts the lhs and rhs of homogeneous/heterogeneous equality

For homogeneous equality, arg #1 is the Type of the lhs/rhs.

Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
This commit is contained in:
Leonardo de Moura 2013-12-20 14:14:15 -08:00
parent 7772c16033
commit 1ed4aa391c

View file

@ -29,7 +29,7 @@ static expr_pair eq_heq_args(expr const & e) {
if (is_eq(e)) if (is_eq(e))
return expr_pair(eq_lhs(e), eq_rhs(e)); return expr_pair(eq_lhs(e), eq_rhs(e));
else else
return expr_pair(arg(e, 1), arg(e, 2)); return expr_pair(arg(e, 2), arg(e, 3));
} }
optional<substitution> fo_unify(expr e1, expr e2) { optional<substitution> fo_unify(expr e1, expr e2) {