X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Fng_commands.ma;h=2241043a9fe05d09f723d02ba1f0ef54c3714bdc;hb=e880d6eab5e1700f4a625ddcd7d0fa8f0cce2dcc;hp=755921938d15cb7b6113b2885606fe5a9c1413c8;hpb=f2d0f4e55ea0f3a953982bee62d9ad98876e4aa8;p=helm.git

diff --git a/helm/software/matita/tests/ng_commands.ma b/helm/software/matita/tests/ng_commands.ma
index 755921938..2241043a9 100644
--- a/helm/software/matita/tests/ng_commands.ma
+++ b/helm/software/matita/tests/ng_commands.ma
@@ -12,7 +12,7 @@
 (*                                                                        *)
 (**************************************************************************)
 
-include "nat/plus.ma".
+include "ng_pts.ma".
 
 ndefinition thesis0: ∀A:Type.Type ≝ λA. A → A.
 
@@ -30,6 +30,8 @@ naxiom NP: Prop.
 
 ndefinition Q: Prop ≝ NP.
 
+include "nat/nat.ma".
+
 nlet rec nzero (n:nat) : nat ≝
  match n with
   [ O ⇒ O
@@ -56,5 +58,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}.