diff options
| author |  David Aspinall <da@inf.ed.ac.uk> | 2003-02-18 01:04:15 +0000 |
|---|---|---|
| committer | David Aspinall <da@inf.ed.ac.uk> | 2003-02-18 01:04:15 +0000 |
| commit | 63c2385e812fbe3c32071e2c2a01270f09b38e3b (patch) | |
| tree | 9428efec73c93dd1bbb65893281cf0298549a356 /etc/isar/MultipleModes.thy | |
| parent | 6fdb0edaba66fe8efe8441e10811ac526bcddd1a (diff) | |
New files.
Diffstat (limited to 'etc/isar/MultipleModes.thy')
| -rw-r--r-- | etc/isar/MultipleModes.thy | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/etc/isar/MultipleModes.thy b/etc/isar/MultipleModes.thy new file mode 100644 index 00000000..af36ed51 --- /dev/null +++ b/etc/isar/MultipleModes.thy @@ -0,0 +1,24 @@ +header {* Some tests for \textbf{multiple modes!!} *} + +theory Example = Main: + +text {* Proper proof text -- \textit{naive version}. *} + +theorem and_comms: "A & B --> B & A" +proof + assume "A & B" + then show "B & A" + proof + assume B and A + then + show ?thesis .. + qed +qed + +ML_setup {* + fun fact 0 = 1 + | fact n = n * (fact (n-1)) + + val x = 7; +*} + |