LOCAL srrs : STRING  ; feacr : STRING  ; aspect_type : SET  [ 1 : ? ] OF  STRING  ; element_type : SET [ 1 : ? ] OF STRING ; END_LOCAL ; srrs := 'structural_response_representation_schema.' ; feacr := 'finite_element_analysis_control_and_result_schema.' ; aspect_type := TYPEOF  ( aspect ) ; element_type := TYPEOF ( element ) ; IF  ( ( srrs + 'element_representation' ) IN  element_type ) THEN  IF  ( ( srrs + 'element_volume' ) IN  aspect_type ) THEN  RETURN  ( TRUE  ) ; END_IF  ; END_IF  ; IF  ( ( srrs + 'volume_3d_element_representation' ) IN  element_type ) THEN  IF  ( ( ( feacr + 'volume_3d_face' ) IN  aspect_type ) OR  ( ( feacr + 'volume_3d_edge' ) IN  aspect_type ) ) THEN  RETURN  ( TRUE  ) ; END_IF  ; END_IF  ; IF  ( ( ( srrs + 'axisymmetric_volume_2d_element_representation' ) IN  element_type ) OR  ( ( srrs + 'plane_volume_2d_element_representation' ) IN  element_type ) ) THEN  IF  ( ( ( feacr + 'volume_2d_face' ) IN  aspect_type ) OR  ( ( feacr + 'volume_2d_edge' ) IN  aspect_type ) ) THEN  RETURN  ( TRUE  ) ; END_IF  ; END_IF  ; IF  ( ( srrs + 'surface_3d_element_representation' ) IN  element_type ) THEN  IF  ( ( ( feacr + 'surface_3d_face' ) IN  aspect_type ) OR  ( ( feacr + 'surface_3d_edge' ) IN  aspect_type ) ) THEN  RETURN  ( TRUE  ) ; END_IF  ; END_IF  ; IF  ( ( ( srrs + 'axisymmetric_surface_2d_element_representation' ) IN  element_type ) OR  ( ( srrs + 'plane_surface_2d_element_representation' ) IN  element_type ) ) THEN  IF  ( ( ( feacr + 'surface_2d_face' ) IN  aspect_type ) OR  ( ( feacr + 'surface_2d_edge' ) IN  aspect_type ) ) THEN  RETURN  ( TRUE  ) ; END_IF  ; END_IF  ; IF  ( ( ( srrs + 'curve_3d_element_representation' ) IN  element_type ) OR  ( ( srrs + 'axisymmetric_curve_2d_element_representation' ) IN  element_type ) OR ( ( srrs + 'plane_curve_2d_element_representation' ) IN  element_type ) ) THEN  IF ( ( srrs + 'curve_edge' ) IN aspect_type ) THEN RETURN  ( TRUE ) ; END_IF  ; END_IF ; RETURN ( FALSE ) ;