module T: sig .. end
sig
end
type 'f functorial = {
'f
fmap : 'a 'b. ('a -> 'b) -> ('a, 'f) App.T.app -> ('b, 'f) App.T.app;
'a 'b. ('a -> 'b) -> ('a, 'f) App.T.app -> ('b, 'f) App.T.app