equal
deleted
inserted
replaced
1697 |
1697 |
1698 setup {* |
1698 setup {* |
1699 CodeUnit.add_const_alias @{thm equals_eq} |
1699 CodeUnit.add_const_alias @{thm equals_eq} |
1700 #> CodeName.setup |
1700 #> CodeName.setup |
1701 #> CodeTarget.setup |
1701 #> CodeTarget.setup |
1702 #> Nbe.setup @{sort eq} [(@{const_name eq_class.eq}, @{const_name "op ="})] |
1702 #> Nbe.setup |
1703 *} |
1703 *} |
1704 |
1704 |
1705 lemma [code func]: |
1705 lemma [code func]: |
1706 shows "False \<and> x \<longleftrightarrow> False" |
1706 shows "False \<and> x \<longleftrightarrow> False" |
1707 and "True \<and> x \<longleftrightarrow> x" |
1707 and "True \<and> x \<longleftrightarrow> x" |