type js := t
type t
val t_to_js : t -> js
val t_of_js : js -> t