WithResult.Apply
type t('a)
= t('a)
let map: ('a => 'b) => t('a) => t('b);
let apply: t(('a => 'b)) => t('a) => t('b);