ГОС! Р ИСО 10303-203-2003
mag2 * vec2.dircction_ratios|i|):
magmag + (rcs.dircction_ratios|i| * rcs.dircction_ratios|i|);
END_REPEAT :
IF mag >0 THEN
result :=■dummy_gri 11vcctor(rcs, SQRT(mag));
ELSE
result := dummy_gri 11vcctor(vccl. 0);
ENDJF:
END:
END IF;
RETURN (result);
END_FUNCTION; - - vcctor_difi’ercncc
END_SCHEMA; - - config_control_design
<*
208