val iter_set : Ojs.t -> string -> ('a -> Ojs.t) -> 'a option -> unittype 'a or_undefined = 'a optionval or_undefined_of_js : (Ojs.t -> 'a) -> Ojs.t -> 'a optionval or_undefined_to_js : ('a -> Ojs.t) -> 'a option -> Ojs.ttype 'a maybe_list = 'a listval maybe_list_of_js : (Ojs.t -> 'a) -> Ojs.t -> 'a listval maybe_list_to_js : ('a -> Ojs.t) -> 'a list -> Ojs.tmodule Dict : sig ... end