X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fnlibrary%2Fdatatypes%2Fbool.ma;h=be42b597a5abd471a2000a85272ecb12d50d06fe;hb=a90c31c1b53222bd6d57360c5ba5c2d0fe7d5207;hp=eda979d69b3c1121e76dadec86b5c789f8559086;hpb=4377e950998c9c63937582952a79975947aa9a45;p=helm.git diff --git a/helm/software/matita/nlibrary/datatypes/bool.ma b/helm/software/matita/nlibrary/datatypes/bool.ma index eda979d69..be42b597a 100644 --- a/helm/software/matita/nlibrary/datatypes/bool.ma +++ b/helm/software/matita/nlibrary/datatypes/bool.ma @@ -14,9 +14,6 @@ include "logic/pts.ma". -ninductive bool: Type[0] ≝ true: bool | false: bool. - -ndefinition orb ≝ λa,b:bool. match a with [ true ⇒ true | _ ⇒ b ]. - -notation "a || b" left associative with precedence 30 for @{'orb $a $b}. -interpretation "orb" 'orb a b = (orb a b). \ No newline at end of file +ninductive bool: Type[0] ≝ + true: bool + | false: bool. \ No newline at end of file