aboutsummaryrefslogtreecommitdiffhomepage
path: root/isar/Example-Tokens.thy
diff options
context:
space:
mode:
authorGravatar David Aspinall <da@inf.ed.ac.uk>2009-12-03 00:26:21 +0000
committerGravatar David Aspinall <da@inf.ed.ac.uk>2009-12-03 00:26:21 +0000
commit304cf41b762c57bda2f1176fc8c366e9801015d2 (patch)
treeb157287d714c3e04420cba21be1442246752d555 /isar/Example-Tokens.thy
parente19e6d8c98141f52852eb84eb222a524a82481e2 (diff)
Change of type for proof-script-span-context-menu-extensions
Diffstat (limited to 'isar/Example-Tokens.thy')
-rw-r--r--isar/Example-Tokens.thy11
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