X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FLAMBDA-TYPES%2FLevel-1%2Fproblems.ma~;fp=helm%2Fsoftware%2Fmatita%2Fcontribs%2FLAMBDA-TYPES%2FLevel-1%2Fproblems.ma~;h=c727f77db854e3449ae2463a6c46fa2ba497ed3e;hb=bfb39a9bcb10b87ab7d6e09928fb82d340d8feca;hp=0000000000000000000000000000000000000000;hpb=5a51f47aa1068c33d4118265a5bb97123cffa120;p=helm.git

diff --git a/helm/software/matita/contribs/LAMBDA-TYPES/Level-1/problems.ma~ b/helm/software/matita/contribs/LAMBDA-TYPES/Level-1/problems.ma~
new file mode 100644
index 000000000..c727f77db
--- /dev/null
+++ b/helm/software/matita/contribs/LAMBDA-TYPES/Level-1/problems.ma~
@@ -0,0 +1,32 @@
+(**************************************************************************)
+(*       ___                                                              *)
+(*      ||M||                                                             *)
+(*      ||A||       A project by Andrea Asperti                           *)
+(*      ||T||                                                             *)
+(*      ||I||       Developers:                                           *)
+(*      ||T||         The HELM team.                                      *)
+(*      ||A||         http://helm.cs.unibo.it                             *)
+(*      \   /                                                             *)
+(*       \ /        This file is distributed under the terms of the       *)
+(*        v         GNU General Public License Version 2                  *)
+(*                                                                        *)
+(**************************************************************************)
+
+(* Problematic objects for disambiguation/typechecking ********************)
+
+set "baseuri" "cic:/matita/LAMBDA-TYPES/Level-1/problems".
+
+include "LambdaDelta/theory.ma".
+
+(* Problem 1: disambiguation errors with these objects *)
+
+(*  iso_trans (in problems-1)
+ *  drop1_getl_trans (in problems-2)
+ *)
+
+(* Problem 2: assertion failure raised by type checker on this object *)
+
+inductive tau1 (g:G) (c:C) (t1:T): T \to Prop \def
+| tau1_tau0: \forall (t2: T).((tau0 g c t1 t2) \to (tau1 g c t1 t2))
+| tau1_sing: \forall (t: T).((tau1 g c t1 t) \to (\forall (t2: T).((tau0 g c 
+t t2) \to (tau1 g c t1 t2)))).