sig
val
jsmarshal :
'
a
->
string
val
fresh_id : unit
->
string
end