Module Deriving_Bounded.Bounded_unit

type a = unit
val min_bound : a
val max_bound : a