module Bool:sig..end
type 'a boolean =
| |
And of |
| |
Or of |
| |
Not of |
| |
Atom of |
| |
True |
| |
False |
val eval : ('a -> bool) -> 'a boolean -> boolval iter : ('a -> unit) -> 'a boolean -> unitval map : ('a -> 'b) -> 'a boolean -> 'b boolean