sig
  val ( >|= ) : ('a, 'err) CCError.t -> ('a -> 'b) -> ('b, 'err) CCError.t
  val ( >>= ) :
    ('a, 'err) CCError.t ->
    ('a -> ('b, 'err) CCError.t) -> ('b, 'err) CCError.t
  val ( <*> ) :
    ('a -> 'b, 'err) CCError.t ->
    ('a, 'err) CCError.t -> ('b, 'err) CCError.t
end