LOCAL rh_set : SET  OF  round_hole := [ ] ; pdr_set : SET  OF  property_definition_representation ; pdr_set1 : SET  OF  property_definition_representation ; ri_set : SET OF representation_item ; END_LOCAL ; REPEAT  i := 1 TO  HIINDEX  ( sar_instance_set ) ; IF  ( SIZEOF ( [ 'automotive_design.instanced_feature' , 'automotive_design.round_hole' ] * TYPEOF  ( sar_instance_set [ i ] . related_shape_aspect ) ) >= 2 ) THEN  rh_set := rh_set + sar_instance_set [ i ] . related_shape_aspect ; END_IF  ; IF  ( 'automotive_design.placed_feature' IN  TYPEOF  ( sar_instance_set [ i ] ) ) THEN  pdr_set := get_shape_aspect_property_definition_representations ( sar_instance_set [ i ] . related_shape_aspect ) ; REPEAT  j := 1 TO  HIINDEX  ( pdr_set ) ; IF  ( ( pdr_set [ j ] . used_representation . name = 'feature definition placement' ) AND  ( 'automotive_design.shape_representation' IN  TYPEOF  ( pdr_set [ j ] . used_representation ) ) ) THEN  ri_set := pdr_set [ j ] . used_representation . items ; REPEAT  k := 1 TO  HIINDEX  ( ri_set ) ; IF  ( ( 'automotive_design.mapped_item' IN  TYPEOF  ( ri_set [ k ] ) ) AND ( 'automotive_design.' + 'shape_representation_with_parameters' IN  TYPEOF  ( ri_set [ k ] \ mapped_item . mapping_source . mapped_representation ) ) ) THEN  pdr_set1 := bag_to_set ( USEDIN ( ri_set [ k ] \ mapped_item . mapping_source . mapped_representation , 'automotive_design.property_definition_representation.' + 'used_representation' ) ) ; REPEAT l := 1 TO HIINDEX ( pdr_set1 ) ; IF ( 'automotive_design.round_hole' IN TYPEOF ( pdr_set1 [ l ] . definition . definition ) ) THEN rh_set := rh_set + pdr_set1 [ l ] . definition . definition ; END_IF  ; END_REPEAT  ; END_IF  ; END_REPEAT  ; END_IF  ; END_REPEAT  ; END_IF ; END_REPEAT ; RETURN ( rh_set ) ;