ГОСТ Р 55346—2012
IF (bir>ding.formal_portport_of :=: functionjnterface.definition) THEN
RETURN (TRUE);
ELSE
RETURN (FALSE);
ENDJF;
END_FUNCTION;
FUNCTION determineactualportrole (p ; actual_fc>_port): port_data_relation;
IF (p.port_type = inpul) OR (p.portjype = control) OR (p.portjype = mechanism) THEN
RETURN (consumer);
ELSE
RETURN (producer);
ENDJF;
ENDJUNCTION;
FUNCTION determineformalportrole (p : formalJo_port): port_data_relation;
IF (p.portjype = input) OR (p.portjype = control) OR (p.portjype = mechanism) THEN
RETURN (producer);
ELSE
RETURN (consumer);
ENDJF;
ENDJUNCTION;
END_SCHEMA;
391