mirror of
https://github.com/anoma/juvix.git
synced 2024-12-15 01:52:11 +03:00
22 lines
354 B
Plaintext
22 lines
354 B
Plaintext
module Data.Bool;
|
|
inductive Bool {
|
|
true : Bool;
|
|
false : Bool;
|
|
};
|
|
|
|
not : Bool → Bool;
|
|
not true ≔ false;
|
|
not false ≔ true;
|
|
|
|
-- infixr 2 ||;
|
|
-- || : Bool → Bool → Bool;
|
|
-- || false a ≔ a;
|
|
-- || true _ ≔ true;
|
|
|
|
-- infixr 2 &&;
|
|
-- && : Bool → Bool → Bool;
|
|
-- && false _ ≔ false;
|
|
-- && true a ≔ a;
|
|
|
|
end;
|