]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/contribs/CoRN-Decl/model/structures/Zsec.ma
few more files, one diverges
[helm.git] / helm / software / matita / contribs / CoRN-Decl / model / structures / Zsec.ma
index 5c2fd5547d7c600ba215962a3d37358dd9701f91..b7aa226b1e3cf59977007a73a1d124a0fb99f70a 100644 (file)
@@ -16,7 +16,7 @@
 
 set "baseuri" "cic:/matita/CoRN-Decl/model/structures/Zsec".
 
-include "CoRN_notation.ma".
+include "CoRN.ma".
 
 (* $Id: Zsec.v,v 1.5 2004/04/06 15:46:05 lcf Exp $ *)
 
@@ -35,6 +35,10 @@ We define the apartness as the negation of the Leibniz equality:
 
 inline "cic:/CoRN/model/structures/Zsec/ap_Z.con".
 
+(* NOTATION
+Infix "{#Z}" := ap_Z (no associativity, at level 90).
+*)
+
 (*#* Some properties of apartness:
 *)
 
@@ -70,7 +74,7 @@ inline "cic:/CoRN/model/structures/Zsec/Zpos.con".
 
 (* begin hide *)
 
-coercion "cic:/matita/CoRN-Decl/model/structures/Zsec/Zpos.con" 0 (* compounds *).
+coercion cic:/Coq/ZArith/BinInt/Z.ind#xpointer(1/1/2) 0 (* compounds *).
 
 (* end hide *)