mirror of
https://github.com/anoma/juvix.git
synced 2024-12-15 10:03:22 +03:00
18 lines
243 B
Plaintext
18 lines
243 B
Plaintext
module Data.Bool;
|
|
|
|
open import Data.String;
|
|
|
|
type Bool :=
|
|
true : Bool
|
|
| false : Bool;
|
|
|
|
not : Bool → Bool;
|
|
not true := false;
|
|
not false := true;
|
|
|
|
boolToStr : Bool → String;
|
|
boolToStr true := "true";
|
|
boolToStr false := "false";
|
|
|
|
end;
|