-module(gleam@bool_test).
-compile(no_auto_import).

-export([negate_test/0, nor_test/0, nand_test/0, exclusive_or_test/0, exclusive_nor_test/0, compare_test/0, max_test/0, min_test/0, to_int_test/0]).

-spec negate_test() -> gleam@should:expectation().
negate_test() ->
    gleam@should:be_false(gleam@bool:negate(true)),
    gleam@should:be_true(gleam@bool:negate(false)).

-spec nor_test() -> gleam@should:expectation().
nor_test() ->
    gleam@should:be_true(gleam@bool:nor(false, false)),
    gleam@should:be_false(gleam@bool:nor(false, true)),
    gleam@should:be_false(gleam@bool:nor(true, false)),
    gleam@should:be_false(gleam@bool:nor(true, true)).

-spec nand_test() -> gleam@should:expectation().
nand_test() ->
    gleam@should:be_true(gleam@bool:nand(false, false)),
    gleam@should:be_true(gleam@bool:nand(false, true)),
    gleam@should:be_true(gleam@bool:nand(true, false)),
    gleam@should:be_false(gleam@bool:nand(true, true)).

-spec exclusive_or_test() -> gleam@should:expectation().
exclusive_or_test() ->
    gleam@should:be_false(gleam@bool:exclusive_or(true, true)),
    gleam@should:be_false(gleam@bool:exclusive_or(false, false)),
    gleam@should:be_true(gleam@bool:exclusive_or(true, false)),
    gleam@should:be_true(gleam@bool:exclusive_or(false, true)).

-spec exclusive_nor_test() -> gleam@should:expectation().
exclusive_nor_test() ->
    gleam@should:be_true(gleam@bool:exclusive_nor(false, false)),
    gleam@should:be_false(gleam@bool:exclusive_nor(false, true)),
    gleam@should:be_false(gleam@bool:exclusive_nor(true, false)),
    gleam@should:be_true(gleam@bool:exclusive_nor(true, true)).

-spec compare_test() -> gleam@should:expectation().
compare_test() ->
    gleam@should:equal(gleam@bool:compare(true, true), eq),
    gleam@should:equal(gleam@bool:compare(true, false), gt),
    gleam@should:equal(gleam@bool:compare(false, false), eq),
    gleam@should:equal(gleam@bool:compare(false, true), lt).

-spec max_test() -> gleam@should:expectation().
max_test() ->
    gleam@should:equal(gleam@bool:max(true, true), true),
    gleam@should:equal(gleam@bool:max(true, false), true),
    gleam@should:equal(gleam@bool:max(false, false), false),
    gleam@should:equal(gleam@bool:max(false, true), true).

-spec min_test() -> gleam@should:expectation().
min_test() ->
    gleam@should:equal(gleam@bool:min(true, true), true),
    gleam@should:equal(gleam@bool:min(true, false), false),
    gleam@should:equal(gleam@bool:min(false, false), false),
    gleam@should:equal(gleam@bool:min(false, true), false).

-spec to_int_test() -> gleam@should:expectation().
to_int_test() ->
    gleam@should:equal(gleam@bool:to_int(true), 1),
    gleam@should:equal(gleam@bool:to_int(false), 0).