Test.M
val let* : 'a Schema.Io.t -> ( 'a -> 'b Schema.Io.t ) -> 'b Schema.Io.t
val return : 'a -> 'a Schema.Io.t