class type ['a] out = object .. end
['a]
object
end
method _get_value : 'a
'a
method _set_value : 'a -> unit
'a -> unit