ONCE_ASM_REWRITE_TAC : (thm list -> tactic)
- ONCE_ASM_REWRITE_TAC [] ([Term` (a:'a) = b`, Term `(b:'a) = c`], Term `P (a:'a): bool`); > val it = ([([`a = b`, `b = c`], `P b`)], fn) : (term list * term) list * (thm list -> thm)
- (ONCE_ASM_REWRITE_TAC [] THEN ONCE_ASM_REWRITE_TAC []) ([Term`(a:'a) = b`, Term`(b:'a) = c`], Term `P (a:'a): bool`); > val it = ([([`a = b`, `b = c`], `P c`)], fn) : (term list * term) list * (thm list -> thm)