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)