module Bounded_open_flag: Bounded with type a = Pervasives.open_flag
Bounded
with type a = Pervasives.open_flag
type a
val min_bound : a
a
val max_bound : a