COND_REWRITE1_TAC : thm_tactic
A |- !x11 ... . P1 ==> ... !xm1 ... . Pm ==> (!x ... . Q = R)
#LESS_MOD;; Theorem LESS_MOD autoloading from theory `arithmetic` ... LESS_MOD = |- !n k. k < n ==> (k MOD n = k) |- !n k. k < n ==> (k MOD n = k)
#g"2 MOD 3 = 2";; "2 MOD 3 = 2" () : void
#e(COND_REWRITE1_TAC LESS_MOD);; OK.. 2 subgoals "2 = 2" [ "2 < 3" ] "2 < 3" () : void