module type NoWrap =T
with type 'a t = 'a and type 'a tlist = 'a list and type (-'a, 'b) ft = 'a -> 'b
type 'a
t
val return : 'a -> 'a t
type (-'a, 'b)
ft
val fmap : ('a, 'b) ft -> 'a t -> 'b t
type 'a
tlist
val nil : unit -> 'a tlist
val singleton : 'a t -> 'a tlist
val cons : 'a t -> 'a tlist -> 'a tlist
val append : 'a tlist -> 'a tlist -> 'a tlist
val map : ('a, 'b) ft -> 'a tlist -> 'b tlist