X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Ftest_instance.ma;h=4f868039aaaece2484554230c56cc9ed767d99d4;hb=349a0e23813a7f33853e1f8fe48230276ac22934;hp=cb3aa3fb2df53fe2c7462c9a696e8def64a06bd8;hpb=35be38f22657bf00344e34fe75d7f3a5283832c1;p=helm.git

diff --git a/helm/matita/tests/test_instance.ma b/helm/matita/tests/test_instance.ma
index cb3aa3fb2..4f868039a 100644
--- a/helm/matita/tests/test_instance.ma
+++ b/helm/matita/tests/test_instance.ma
@@ -1,4 +1,14 @@
-instance \lambda A:Set.\lambda P:A \to A \to Prop.\forall x:A. P x x.
-instance \lambda A:Set.\lambda P:A \to A \to Prop.\forall x,y:A. P x y \to P y x.
-instance \lambda A:Set.\lambda P:A \to A \to Prop.\forall x,y,z:A. P x y \to P y z \to P y z.
-instance \lambda A:Set.\lambda f:A \to A \to A. \forall x,y:A. f x y = f  y x.
\ No newline at end of file
+whelp instance \lambda A:Set.\lambda P:A \to A \to Prop.\forall x:A. P x x.
+whelp instance \lambda A:Set.\lambda P:A \to A \to Prop.\forall x,y:A. P x y \to P y x.
+whelp instance \lambda A:Set.\lambda P:A \to A \to Prop.\forall x,y,z:A. P x y \to P y z \to P y z.
+whelp instance \lambda A:Set.\lambda f:A \to A \to A. \forall x,y:A. f x y = f  y x.
+whelp instance \lambda A:Set.\lambda r : A \to A \to Prop. \forall x,y,z:A. r x y \to r y z \to r x z.
+
+
+whelp instance \lambda A:Set.\lambda R:A \to A \to Prop.\forall x:A.\forall y:A.(R x y) \to \forall z:A.(R x z) \to \exists u:A.(R y u) \land (R z u).
+
+whelp instance λA:Set.λR:A→A→Prop.∀x:A.∀y:A.(R x y)→∀z:A.(R x z)→∃u:A.(R y u)∧(R z u).
+
+whelp instance \lambda A:Set. \lambda R:A\to A\to Prop. confluence A R.
+
+whelp instance \lambda A:Set. \lambda f:A\to A\to A. \lambda g:A\to A\to A.  \forall x,y,z : A . f x (g y z) = g (f x y ) (f x z).