module type APPLICATIVE = sig .. end
sig
end
type +'a t
+'a
include CCCat.FUNCTOR
val pure : 'a -> 'a t
'a -> 'a t
val (<*>) : ('a -> 'b) t -> 'a t -> 'b t
('a -> 'b) t -> 'a t -> 'b t