src/HOL/Nitpick_Examples/Datatype_Nits.thy
changeset 62597 b3f2b8c906a6
parent 58889 5b7a9633cfa8
child 63167 0909deb8059b
equal deleted inserted replaced
62596:cf79f8866bc3 62597:b3f2b8c906a6
    11 imports Main
    11 imports Main
    12 begin
    12 begin
    13 
    13 
    14 nitpick_params [verbose, card = 1-8, max_potential = 0,
    14 nitpick_params [verbose, card = 1-8, max_potential = 0,
    15                 sat_solver = MiniSat_JNI, max_threads = 1, timeout = 240]
    15                 sat_solver = MiniSat_JNI, max_threads = 1, timeout = 240]
       
    16 
       
    17 datatype nibble = Nibble0 | Nibble1 | Nibble2 | Nibble3
       
    18   | Nibble4 | Nibble5 | Nibble6 | Nibble7
       
    19   | Nibble8 | Nibble9 | NibbleA | NibbleB
       
    20   | NibbleC | NibbleD | NibbleE | NibbleF
    16 
    21 
    17 primrec rot where
    22 primrec rot where
    18 "rot Nibble0 = Nibble1" | "rot Nibble1 = Nibble2" | "rot Nibble2 = Nibble3" |
    23 "rot Nibble0 = Nibble1" | "rot Nibble1 = Nibble2" | "rot Nibble2 = Nibble3" |
    19 "rot Nibble3 = Nibble4" | "rot Nibble4 = Nibble5" | "rot Nibble5 = Nibble6" |
    24 "rot Nibble3 = Nibble4" | "rot Nibble4 = Nibble5" | "rot Nibble5 = Nibble6" |
    20 "rot Nibble6 = Nibble7" | "rot Nibble7 = Nibble8" | "rot Nibble8 = Nibble9" |
    25 "rot Nibble6 = Nibble7" | "rot Nibble7 = Nibble8" | "rot Nibble8 = Nibble9" |