equal
deleted
inserted
replaced
3 *) |
3 *) |
4 |
4 |
5 header {* Implementation of natural numbers by target-language integers *} |
5 header {* Implementation of natural numbers by target-language integers *} |
6 |
6 |
7 theory Code_Target_Nat |
7 theory Code_Target_Nat |
8 imports Code_Abstract_Nat Code_Numeral_Types |
8 imports Code_Abstract_Nat |
9 begin |
9 begin |
10 |
10 |
11 subsection {* Implementation for @{typ nat} *} |
11 subsection {* Implementation for @{typ nat} *} |
12 |
12 |
13 lift_definition Nat :: "integer \<Rightarrow> nat" |
13 lift_definition Nat :: "integer \<Rightarrow> nat" |