equal
deleted
inserted
replaced
460 apply (simp (no_asm)) |
460 apply (simp (no_asm)) |
461 done |
461 done |
462 |
462 |
463 |
463 |
464 declare split_paired_All [simp del] split_paired_Ex [simp del] |
464 declare split_paired_All [simp del] split_paired_Ex [simp del] |
465 declare split_if [split del] split_if_asm [split del] |
465 declare if_split [split del] if_split_asm [split del] |
466 option.split [split del] option.split_asm [split del] |
466 option.split [split del] option.split_asm [split del] |
467 setup \<open>map_theory_simpset (fn ctxt => ctxt delloop "split_all_tac")\<close> |
467 setup \<open>map_theory_simpset (fn ctxt => ctxt delloop "split_all_tac")\<close> |
468 setup \<open>map_theory_claset (fn ctxt => ctxt delSWrapper "split_all_tac")\<close> |
468 setup \<open>map_theory_claset (fn ctxt => ctxt delSWrapper "split_all_tac")\<close> |
469 |
469 |
470 inductive |
470 inductive |