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