Pickles_types.Or_infinity
type 'a t =
| Infinity
| Finite of 'a
t is the type of possibly infinite values
t
val finite_exn : 'a t -> 'a