module Bounded_bool: Bounded with type a = bool
Bounded
with type a = bool
type a
val min_bound : a
a
val max_bound : a