Over_divisible.Infixtype 'a t = 'a tThe type held by the Decidable.
val (>|<) : 'a t -> 'b t -> ('a, 'b) Preface_core.Shims.Either.t tInfix version of chosen.
val (^|^) : 'a t -> 'b t -> ('a, 'b) Preface_core.Shims.Either.t tRight-associative version of >|<.
include Preface_specs.Divisible.INFIX with type 'a t := 'a tinclude Preface_specs.Contravariant.INFIX with type 'a t := 'a t