ASM_REWRITE_TAC : thm list -> tactic
- let val asm = [Term `P x`] val goal = Term `P x = Q x` in ASM_REWRITE_TAC[] (asm, goal) end; val it = ([([`P x`], `Q x`)], fn) : tactic_result - let val asm = [Term `~P x`] val goal = Term `P x = Q x` in ASM_REWRITE_TAC[] (asm, goal) end; val it = ([([`~P x`], `~Q x`)], fn) : tactic_result