sig
module List = ListLabels
module String = StringLabels
val ( |> ) : 'a -> ('a -> 'b) -> 'b
val return : 'a -> ('a, 'b) Sosa.result
val fail : 'a -> ('b, 'a) Sosa.result
val bind :
[< `Error of 'a | `Ok of 'b ] ->
('b -> ('c, 'a) Sosa.result) -> ('c, 'a) Sosa.result
val ( >>= ) :
[< `Error of 'a | `Ok of 'b ] ->
('b -> ('c, 'a) Sosa.result) -> ('c, 'a) Sosa.result
val dbg :
('a, Pervasives.out_channel, unit, unit, unit, unit) Pervasives.format6 ->
'a
module Core_list_map :
sig
val map_slow : 'a list -> f:('a -> 'b) -> 'b list
val count_map : f:('a -> 'b) -> 'a list -> int -> 'b list
val map : 'a list -> f:('a -> 'b) -> 'b list
val mapi_slow : 'a list -> f:(int -> 'a -> 'b) -> i:int -> 'b list
val count_mapi : f:(int -> 'a -> 'b) -> 'a list -> int -> 'b list
val mapi : 'a list -> f:(int -> 'a -> 'b) -> 'b list
val map2_slow : 'a list -> 'b list -> f:('a -> 'b -> 'c) -> 'c list
val count_map2_exn :
f:('a -> 'b -> 'c) -> 'a list -> 'b list -> int -> 'c list
val map2_exn : 'a list -> 'b list -> f:('a -> 'b -> 'c) -> 'c list
end
end