Module type Async.S1

type 'a t
val invariant : 'a Async.inv -> 'a t Async.inv