Module type Sigs.SCHED

type +'a s
type t
val inj : 'a s -> ('a, t) io
val prj : ('a, t) io -> 'a s