Module Base_quickcheck__.Observer0
val opaque : _ tval create : ('a -> size:Base.int -> hash:Base.Hash.state -> Base.Hash.state) -> 'a tval observe : 'a t -> 'a -> size:Base.int -> hash:Base.Hash.state -> Base.Hash.state