New file

1 files changed, 15 insertions, 0 deletions

diff --git a/isa/Example-Xsym.ML b/isa/Example-Xsym.ML
new file mode 100644
index 00000000..46f93938
--- /dev/null
+++ b/isa/Example-Xsym.ML
@@ -0,0 +1,15 @@
+(*
+    Example proof script for Isabelle Proof General.
+
+    $Id$
+
+    Just a version of Example.ML using XSymbol
+*)    
+
+Goal "A \\<and>  B \\<longrightarrow> B \\<and>  A";
+by (rtac impI 1);
+by (etac conjE 1);
+by (rtac conjI 1);
+by (assume_tac 1);
+by (assume_tac 1);
+qed "and_comms";