equal
deleted
inserted
replaced
3 *) |
3 *) |
4 |
4 |
5 section {* The datatype of finite lists *} |
5 section {* The datatype of finite lists *} |
6 |
6 |
7 theory List |
7 theory List |
8 imports Sledgehammer Code_Numeral Lifting_Set Lifting_Option Lifting_Product |
8 imports Sledgehammer Code_Numeral Lifting_Set |
9 begin |
9 begin |
10 |
10 |
11 datatype (set: 'a) list = |
11 datatype (set: 'a) list = |
12 Nil ("[]") |
12 Nil ("[]") |
13 | Cons (hd: 'a) (tl: "'a list") (infixr "#" 65) |
13 | Cons (hd: 'a) (tl: "'a list") (infixr "#" 65) |