]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/matita/library/datatypes/bool.ma
More notation (up to where the open bugs allow me to put it without adding
[helm.git] / helm / matita / library / datatypes / bool.ma
index 8267aa7f63fcb692311dc916f8f325471805952d..cac5ebbe97c2fdad3b421bd98d522c0525c4e413 100644 (file)
@@ -24,6 +24,7 @@ definition notb : bool \to bool \def
  [ true \Rightarrow false
  | false \Rightarrow true ].
 
+(*CSC: the URI must disappear: there is a bug now *)
 interpretation "boolean not" 'not x = (cic:/matita/datatypes/bool/notb.con x).
 
 definition andb : bool \to bool \to bool\def
@@ -33,6 +34,7 @@ definition andb : bool \to bool \to bool\def
        match b2 with [true \Rightarrow true | false \Rightarrow false]
  | false \Rightarrow false ].
 
+(*CSC: the URI must disappear: there is a bug now *)
 interpretation "boolean and" 'and x y = (cic:/matita/datatypes/bool/andb.con x y).
 
 definition orb : bool \to bool \to bool\def
@@ -42,6 +44,7 @@ definition orb : bool \to bool \to bool\def
        match b2 with [true \Rightarrow true | false \Rightarrow false]
  | false \Rightarrow false ].
 
+(*CSC: the URI must disappear: there is a bug now *)
 interpretation "boolean or" 'or x y = (cic:/matita/datatypes/bool/orb.con x y).
 
 definition if_then_else : bool \to Prop \to Prop \to Prop \def