Sourceval delay : ?loc:Loc.t -> (unit -> 'a) -> ('a, [ `thunk ]) t Sourceval force : ('a, 'b) t -> ('a, 'b) t Sourceval map : ('a -> 'b) -> ('a, 'c) t -> ('b, 'c) t Sourceval map_with_loc : (?loc:Loc.t -> 'a -> 'b) -> ('a, 'c) t -> ('b, 'c) t Sourceval with_val : ('a -> 'b) -> ('a, 'c) t -> 'b Sourceval with_loc_val : (?loc:Loc.t -> 'a -> 'b) -> ('a, 'c) t -> 'b