Nonempty.Let_syntax
val map : ('a, 'e, 'f) t -> f:('a -> 'b) -> ('b, 'e, 'f) t
val both : ('a, 'e, 'f) t -> ('b, 'e, 'f) t -> ('a * 'b, 'e, 'f) t
module Let_syntax : sig ... end