sig   val copy : (< .. > as 'a) -> 'a   external id : < .. > -> int = "%field1"   val new_method : string -> CamlinternalOO.tag   val public_method_label : string -> CamlinternalOO.tag end