src/HOL/ex/Case_Product.thy
author wenzelm
Wed Jun 22 10:09:20 2016 +0200 (2016-06-22)
changeset 63343 fb5d8a50c641
parent 61343 5b5656a63bd6
child 65563 e83c9e94e891
permissions -rw-r--r--
bundle lifting_syntax;
     1 (*  Title:      HOL/ex/Case_Product.thy
     2     Author:     Lars Noschinski
     3     Copyright   2011 TU Muenchen
     4 *)
     5 
     6 section \<open>Examples for the 'case_product' attribute\<close>
     7 
     8 theory Case_Product
     9 imports Main
    10 begin
    11 
    12 text \<open>
    13   The {@attribute case_product} attribute combines multiple case distinction
    14   lemmas into a single case distinction lemma by building the product of all
    15   these case distinctions.
    16 \<close>
    17 
    18 lemmas nat_list_exhaust = nat.exhaust[case_product list.exhaust]
    19 
    20 text \<open>
    21   The attribute honors preconditions
    22 \<close>
    23 
    24 lemmas trancl_acc_cases= trancl.cases[case_product acc.cases]
    25 
    26 text \<open>
    27   Also, case names are generated based on the old names
    28 \<close>
    29 
    30 end