aboutsummaryrefslogtreecommitdiff
path: root/etc/isa/completed-proof.ML
diff options
context:
space:
mode:
authorMakarius Wenzel2008-06-14 17:16:23 +0000
committerMakarius Wenzel2008-06-14 17:16:23 +0000
commit41fc4493a96c8a66971d293b557ba9903bf9c053 (patch)
tree574f9c8f375204cc2ef11e1c04e53f21cfae079d /etc/isa/completed-proof.ML
parentfaea8019ff496be6b5bf49f8257117fb1bddacef (diff)
obsolete;
Diffstat (limited to 'etc/isa/completed-proof.ML')
-rw-r--r--etc/isa/completed-proof.ML43
1 files changed, 0 insertions, 43 deletions
diff --git a/etc/isa/completed-proof.ML b/etc/isa/completed-proof.ML
deleted file mode 100644
index 70cc8e18..00000000
--- a/etc/isa/completed-proof.ML
+++ /dev/null
@@ -1,43 +0,0 @@
-(* Test of completed proof behaviour: even if qed command is missing,
- PG should close of the proof as a goalsave.
-
- Issue with Isabelle2002: Goals.disable_pr prevents
- proof-shell-proof-completed being set because "No Subgoals!" is not
- displayed. This means that processing file in one go here (or C-c
- C-RET at val_) does not work properly.
-*)
-
-(* default proof-completed-proof-behaviour for isa is 'closeany.
- Also should test this file with 'closegoal, 'extend.
-
- (setq proof-completed-proof-behaviour 'closeany)
- : close on any command after proof completed seen
- (setq proof-completed-proof-behaviour 'closegoal)
- : close when next goal is seen
- (setq proof-completed-proof-behaviour 'extend)
- : continually extend region after proof completed, until next goal.
-
- *)
-
-Goal "A & B --> B & A";
- by (rtac impI 1);
- by (etac conjE 1);
- by (rtac conjI 1);
- by (assume_tac 1);
- by (assume_tac 1);
- (* qed "and_comms"; *)
-
-val _ = ();
-val _ = ();
-
-Goal "A & B --> B & A";
- by (rtac impI 1);
- by (etac conjE 1);
- by (rtac conjI 1);
- by (assume_tac 1);
- by (assume_tac 1);
- qed "and_comms";
-
-
-
-