compare_bool = fn (A, B) {
    io.format("~p and ~p = ~p~n", [A, B, A and B])
    io.format("~p or ~p = ~p~n", [A, B, A or B])
    io.format("not ~p = ~p~n", [A, not A])
    io.format("~p xor ~p = ~p~n", [A, B, A xor B])
    io.format("~n")
}

@public
run = fn () {
    compare_bool(true, true)
    compare_bool(true, false)
    compare_bool(false, true)
    compare_bool(false, false)
}