DISJ_CASES_TAC : thm_tactic
A ?- t ============================ DISJ_CASES_TAC (A |- u \/ v) A u {u} ?- t A u {v}?- t
- DISJ_CASES_TAC th ([],Term`(P:num -> bool) m`); ([([`m = 0`], `P m`), ([`?n. m = SUC n`], `P m`)], fn) : tactic_result