Module type Applicative.Basic3

module type Basic3 = sig .. end

include Functor.Basic3
val pure : 'a -> ('p, 'q, 'a) t
val ap : ('p, 'q, 'a -> 'b) t -> (unit -> ('p, 'q, 'a) t) -> ('p, 'q, 'b) t