|
FUNCTION consistent_geometric_reference (aspect : GENERIC, item : geometric_representation_item) : BOOLEAN; LOCAL srrs : STRING ; feacr : STRING ; aspect_type : SET [ 1 : ? ] OF STRING ; item_type : SET [ 1 : ? ] OF STRING ; END_LOCAL ; srrs := 'structural_response_representation_schema.' ; feacr := 'finite_element_analysis_control_and_result_schema.' ; aspect_type := TYPEOF ( aspect ) ; item_type := TYPEOF ( item ) ; IF ( 'geometric_model_schema.solid_model' IN item_type ) THEN IF ( ( srrs + 'element_volume' ) IN aspect_type ) THEN RETURN ( TRUE ) ; END_IF ; END_IF ; IF ( ( 'geometry_schema.surface' IN item_type ) OR ( 'topology_schema.face_surface' IN item_type ) ) THEN IF SIZEOF ( [ ( feacr + 'volume_3d_face' ) , ( feacr + 'volume_2d_face' ) , ( feacr + 'surface_3d_face' ) , ( feacr + 'surface_2d_face' ) ] * aspect_type ) = 1 THEN RETURN ( TRUE ) ; END_IF ; END_IF ; IF ( ( 'geometry_schema.curve' IN item_type ) OR ( 'topology_schema.edge_curve' IN item_type ) ) THEN IF SIZEOF ( [ ( feacr + 'volume_3d_edge' ) , ( feacr + 'volume_2d_edge' ) , ( feacr + 'surface_3d_edge' ) , ( feacr + 'surface_2d_edge' ) , ( srrs + 'curve_edge' ) ] * aspect_type ) = 1 THEN RETURN ( TRUE ) ; END_IF ; END_IF ; RETURN ( FALSE ) ; END_FUNCTION; -- consistent_geometric_reference |
|
public class FConsistent_geometric_reference public static Value run(SdaiContext _context, Value aspect, Value item) |