]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/library/nat/plus.ma
update in groud_2 and models
[helm.git] / helm / software / matita / library / nat / plus.ma
index e8b5f6d29e258cee77866c26a470f6cc4119bef5..d0038bac46f5c5cdebd51de3c2fc4152d6606072 100644 (file)
@@ -12,8 +12,6 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/nat/plus".
-
 include "nat/nat.ma".
 
 let rec plus n m \def 
@@ -21,8 +19,7 @@ let rec plus n m \def
  [ O \Rightarrow m
  | (S p) \Rightarrow S (plus p m) ].
 
-(*CSC: the URI must disappear: there is a bug now *)
-interpretation "natural plus" 'plus x y = (cic:/matita/nat/plus/plus.con x y).
+interpretation "natural plus" 'plus x y = (plus x y).
 
 theorem plus_n_O: \forall n:nat. n = n+O.
 intros.elim n.