Module Disjunction.Abstract0

module Abstract0: sig .. end

val is_disjunction : 'a Abstract0.t -> bool

Return true iff the argument value is a disjunction value

val of_disjunction : 'a Disjunction.t Abstract0.t -> 'b Abstract0.t

Make a disjunction value generic

val to_disjunction : 'a Abstract0.t -> 'b Disjunction.t Abstract0.t

Instanciate the type of a disjunction value. Raises Failure if the argument value is not a disjunction value