val sequence :
[ `One of 'aAsync_kernel.Deferred.t| `Two of 'aAsync_kernel.Deferred.t * 'aAsync_kernel.Deferred.t ]->[ `One of 'a| `Two of 'a * 'a ]Async_kernel.Deferred.t
val map :
[ `One of 'a| `Two of 'a * 'a ]->f:( 'a->'bAsync_kernel.Deferred.t )->[ `One of 'b| `Two of 'b * 'b ]Async_kernel.Deferred.t
val fold :
[ `One of 'a| `Two of 'a * 'a ]->init:'accum->f:( 'accum->'a->'accumAsync_kernel.Deferred.t )->'accumAsync_kernel.Deferred.t