aboutsummaryrefslogtreecommitdiffhomepage
path: root/isar/Example-Tokens.thy
diff options
context:
space:
mode:
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