]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/tests/ng_commands.ma
Stupid typing error fixed.
[helm.git] / helm / software / matita / tests / ng_commands.ma
index 755921938d15cb7b6113b2885606fe5a9c1413c8..cbb73844d98b7d4fe55d8327d4ac9d57919930d1 100644 (file)
@@ -56,5 +56,5 @@ and nmzero (m:mat 0 (dt ?)) : nnat 0 (dt ?) ≝
  match m return ? with
  [ mS n ⇒ nnzero n ].
 
-nrecord pair (n: nat) (x: dt n) (label: Type): Type ≝
- { lbl:label; l: pair label; r: pair label}.
\ No newline at end of file
+nrecord pair (n: nat) (x: DT n) (label: Type): Type ≝
+ { lbl:label; l: pair n x label; r: pair n x label}.
\ No newline at end of file