Module Jkind0.Violation
module Sub_failure_reason : sig ... endtype violation = | Not_a_subjkind : (Allowance.allowed * 'r1) Types.jkind * ('l * 'r2) Types.jkind * Sub_failure_reason.t list -> violation| No_intersection : 'd Types.jkind * ('l * Allowance.allowed) Types.jkind -> violation