module type PROPERTY = sig .. end
sig
end
type property
val bottom : property
property
val equal : property -> property -> bool
property -> property -> bool
val is_maximal : property -> bool
property -> bool