Module Patterns.Non_empty_row
type 'a t = 'a * Typedtree.pattern listval of_initial :
Typedtree.pattern list ->
Typedtree.pattern Patterns.Non_empty_row.t'assert false' on empty rows
val map_first :
('a -> 'b) ->
'a Patterns.Non_empty_row.t ->
'b Patterns.Non_empty_row.t