PROVE : thm list -> term -> thm
- PROVE [] (concl SKOLEM_THM);
Meson search level: ........
> val it = |- !P. (!x. ?y. P x y) = ?f. !x. P x (f x) : thm
- let open arithmeticTheory
in
PROVE [ADD_ASSOC, ADD_SYM, ADD_CLAUSES]
(Term `x + 0 + y + z = y + (z + x)`)
end;
Meson search level: ............
> val it = |- x + 0 + y + z = y + (z + x) : thm
Unlike MESON_TAC, PROVE can handle terms with conditionals.