class type od_Ice_Object = object .. end
object
end
method facets : unit Pervasives.ref
unit Pervasives.ref
