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