type 'a gen
type 'a obs
type 'a shr
type 'a t
val gen : 'a gen ‑> 'a t gen
val obs : 'a obs ‑> 'a t obs
val shrinker : 'a shr ‑> 'a t shr