]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/tests/record.ma
new semantics for 'by t'
[helm.git] / helm / software / matita / tests / record.ma
index ed9ecfed89044bb99ba17cf90fcb14f411dab30e..24bed8ade8da8dc9158fc5523bc2bee7d2b337a3 100644 (file)
@@ -12,7 +12,7 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/tests/record/".
+
 
 record empty : Type \def {}.
 
@@ -37,3 +37,8 @@ record paperino: Prop \def {
   pippo : paolo \to paolo;
   piero : True
 }.
+
+(* the following test used to show the following bug: the left
+   parameter A in the type of t was not unified with the left
+   parameter A in the type of the constructor of the record *)
+record t (A:Type) : Type := { f : A }.
\ No newline at end of file