package traverse

  1. Overview
  2. Docs
type ('a, 'a_t, 'result, 'is_empty) t =
  1. | O : ('a, 'a_t, 'a_t, [ `Empty ]) t
  2. | S : ('a, 'a_t, 'result, _) t -> ('a, 'a_t, 'a -> 'result, [ `Not_empty ]) t