X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Frecord.ma;h=bc5d2e21777fbdbdb51d4e12a7e498bcf974ed5d;hb=68dcac85ab9510b2e3e272d964e3765cd116ddbb;hp=ed9ecfed89044bb99ba17cf90fcb14f411dab30e;hpb=55b82bd235d82ff7f0a40d980effe1efde1f5073;p=helm.git

diff --git a/helm/software/matita/tests/record.ma b/helm/software/matita/tests/record.ma
index ed9ecfed8..bc5d2e217 100644
--- a/helm/software/matita/tests/record.ma
+++ b/helm/software/matita/tests/record.ma
@@ -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