FUNCTION get_pctd
(ac : Assembly_component; ajb : SET [0:?] OF Assembly_joint) : SET [0:?] OF Part_connected_terminals_definition;
LOCAL cf : LIST[1:2] OF component_feature := [ajb[1].assembly_feature_1, ajb[1].assembly_feature_2]; pctd : SET OF part_connected_terminals_definition := []; END_LOCAL;
REPEAT i := 1 TO 2 BY 1; IF ac :=: cf[i].associated_component THEN IF ('PHYSICAL_NODE_REQUIREMENT_TO_IMPLEMENTING_COMPONENT_ALLOCATION_ARM.PART_TERMINAL' IN TYPEOF(cf[i].definition)) THEN pctd := cf[i].definition.connection_requirement; RETURN(pctd); ELSE RETURN(pctd); END_IF; ELSE RETURN(pctd); END_IF; END_REPEAT; RETURN(?); END_FUNCTION; -- get_pctd
|