diff options
author | David Aspinall <da@inf.ed.ac.uk> | 2009-12-03 00:26:21 +0000 |
---|---|---|
committer | David Aspinall <da@inf.ed.ac.uk> | 2009-12-03 00:26:21 +0000 |
commit | 304cf41b762c57bda2f1176fc8c366e9801015d2 (patch) | |
tree | b157287d714c3e04420cba21be1442246752d555 /isar/Example-Tokens.thy | |
parent | e19e6d8c98141f52852eb84eb222a524a82481e2 (diff) |
Change of type for proof-script-span-context-menu-extensions
Diffstat (limited to 'isar/Example-Tokens.thy')
-rw-r--r-- | isar/Example-Tokens.thy | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/isar/Example-Tokens.thy b/isar/Example-Tokens.thy index 6d2f69ec..8856eba4 100644 --- a/isar/Example-Tokens.thy +++ b/isar/Example-Tokens.thy @@ -13,21 +13,12 @@ theory "Example-Xsym" imports Main begin text {* Proper proof text -- \<^bitalic>naive version\<^eitalic>. *} -theorem and_comms: "\<phi> \<and> \<psi> \<longrightarrow> \<psi> \<and> \<phi>" -proof - assume "\<phi> \<and> \<psi>" - then show "\<psi> \<and> \<phi>" - proof - assume \<psi> and \<phi> - then show ?thesis .. - qed -qed - text {* \<^bbold>Unstructured\<^ebold> proof script. *} theorem "\<phi>\<^isub>\<alpha> \<and> \<phi>\<^isub>\<beta> \<longrightarrow> \<phi>\<^isub>\<beta> \<and> \<phi>\<^isub>\<alpha>" apply (rule impI) apply (erule conjE) + apply (rule conjI) apply assumption apply assumption |