diff options
Diffstat (limited to 'examples/tutch/support')
-rw-r--r-- | examples/tutch/support/README | 1 | ||||
-rw-r--r-- | examples/tutch/support/hw3_6a.req | 1 | ||||
-rw-r--r-- | examples/tutch/support/hw3_6b.req | 1 | ||||
-rw-r--r-- | examples/tutch/support/hw3_6c.req | 1 | ||||
-rw-r--r-- | examples/tutch/support/sources.cm | 2 |
5 files changed, 6 insertions, 0 deletions
diff --git a/examples/tutch/support/README b/examples/tutch/support/README new file mode 100644 index 0000000..8c31e1a --- /dev/null +++ b/examples/tutch/support/README @@ -0,0 +1 @@ +Put any support files here. diff --git a/examples/tutch/support/hw3_6a.req b/examples/tutch/support/hw3_6a.req new file mode 100644 index 0000000..46dd588 --- /dev/null +++ b/examples/tutch/support/hw3_6a.req @@ -0,0 +1 @@ +proof apply : (!x:t.A(x) => B(x)) => (!x:t.A(x)) => (!x:t.B(x)); diff --git a/examples/tutch/support/hw3_6b.req b/examples/tutch/support/hw3_6b.req new file mode 100644 index 0000000..4598e5b --- /dev/null +++ b/examples/tutch/support/hw3_6b.req @@ -0,0 +1 @@ +proof instance : (!x:t.A(x)) & (?y:t.B(y)) => ?z:t.A(z); diff --git a/examples/tutch/support/hw3_6c.req b/examples/tutch/support/hw3_6c.req new file mode 100644 index 0000000..663513c --- /dev/null +++ b/examples/tutch/support/hw3_6c.req @@ -0,0 +1 @@ +proof frobenius : (R & ?x:t.Q(x)) <=> ?x:t.(R & Q(x)); diff --git a/examples/tutch/support/sources.cm b/examples/tutch/support/sources.cm new file mode 100644 index 0000000..fad8872 --- /dev/null +++ b/examples/tutch/support/sources.cm @@ -0,0 +1,2 @@ +(* Add any extra support SML files here *) +Group is |