X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground_1%2Fplist%2Fprops.ma;h=f80d0b0e9de06fbbd5fb2ddb2c45eea45dad9511;hb=57ae1762497a5f3ea75740e2908e04adb8642cc2;hp=990397229d24a9e0b09a4fadee0c628b4970f842;hpb=88a68a9c334646bc17314d5327cd3b790202acd6;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/ground_1/plist/props.ma b/matita/matita/contribs/lambdadelta/ground_1/plist/props.ma
index 990397229..f80d0b0e9 100644
--- a/matita/matita/contribs/lambdadelta/ground_1/plist/props.ma
+++ b/matita/matita/contribs/lambdadelta/ground_1/plist/props.ma
@@ -14,9 +14,9 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Ground-1/plist/defs.ma".
+include "ground_1/plist/defs.ma".
 
-theorem papp_ss:
+lemma papp_ss:
  \forall (is1: PList).(\forall (is2: PList).(eq PList (papp (Ss is1) (Ss 
 is2)) (Ss (papp is1 is2))))
 \def
@@ -28,7 +28,4 @@ nat).(\lambda (p: PList).(\lambda (H: ((\forall (is2: PList).(eq PList (papp
 (Ss (papp p is2)) (\lambda (p0: PList).(eq PList (PCons n (S n0) p0) (PCons n 
 (S n0) (Ss (papp p is2))))) (refl_equal PList (PCons n (S n0) (Ss (papp p 
 is2)))) (papp (Ss p) (Ss is2)) (H is2))))))) is1).
-(* COMMENTS
-Initial nodes: 151
-END *)