diff options
| -rw-r--r-- | isa/Example.ML | 13 | ||||
| -rw-r--r-- | isa/Example.thy (renamed from isa/example.thy) | 2 | ||||
| -rw-r--r-- | isa/example.ML | 14 |
3 files changed, 14 insertions, 15 deletions
diff --git a/isa/Example.ML b/isa/Example.ML new file mode 100644 index 00000000..929c7ad8 --- /dev/null +++ b/isa/Example.ML @@ -0,0 +1,13 @@ +(* + Example proof script for Isabelle Proof General. + + $Id$ +*) + +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"; diff --git a/isa/example.thy b/isa/Example.thy index 37c21578..84a71f31 100644 --- a/isa/example.thy +++ b/isa/Example.thy @@ -7,4 +7,4 @@ *) -example = Main +Example = Main diff --git a/isa/example.ML b/isa/example.ML deleted file mode 100644 index 41ea20be..00000000 --- a/isa/example.ML +++ /dev/null @@ -1,14 +0,0 @@ -(* - Example proof script for Isabelle Proof General. - - $Id$ -*) - -Goal "(A & B)-->(B & A)"; -br impI 1; -br conjI 1; -be conjE 1; -ba 1; -be conjE 1; -ba 1; -qed "and_comms"; |