X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Ftest_instance.ma;h=82432b7c686a67b3930126aa24ee0bcc41d28324;hb=de4483296d06aac3df4da10d5401b1f97c4350ab;hp=cb3aa3fb2df53fe2c7462c9a696e8def64a06bd8;hpb=157f12c3cb9cc4ed5ba9d1e46c64a593c7fd9481;p=helm.git diff --git a/helm/matita/tests/test_instance.ma b/helm/matita/tests/test_instance.ma index cb3aa3fb2..82432b7c6 100644 --- a/helm/matita/tests/test_instance.ma +++ b/helm/matita/tests/test_instance.ma @@ -1,4 +1,16 @@ -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. + + +λA:Set.λR:A\to A\to Prop.∀x:A.∀y:A.(R x y)\to ∀z:A.(R x z)\to ∃u:A.(R y u)∧(R z u) + +\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) + +\lambda A:Set. \lambda R:A\to A\to Prop. confluence A R. + +\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). + +