Comp.Copattern_objecttype t = | Raw_observation of {location : Beluga_syntax.Syncom.Location.t;observation : Beluga_syntax.Syncom.Qualified_identifier.t;}| Raw_pattern of {location : Beluga_syntax.Syncom.Location.t;pattern : Pattern_object.t;}