FUNCTION path_reversed
(* SCHEMA integrated_cnc_schema; *)
FUNCTION path_reversed (
a_path : path
) : oriented_path;
LOCAL
the_reverse : oriented_path;
END_LOCAL;
IF 'INTEGRATED_CNC_SCHEMA.ORIENTED_PATH' IN TYPEOF(a_path) THEN
the_reverse := dummy_tri || path(list_of_topology_reversed(a_path.
edge_list)) || oriented_path(a_path\oriented_path.path_element, NOT
a_path\oriented_path.orientation);
ELSE
the_reverse := dummy_tri || path(list_of_topology_reversed(a_path.
edge_list)) || oriented_path(a_path, FALSE);
END_IF;
RETURN (the_reverse);
END_FUNCTION; -- 10303-42: topology_schema
Referenced By
Defintion path_reversed is references by the following definitions:
[Top Level Definitions] Generated by STEP ToolsTM EXPRESS to HTML Converter
on 2010-01-12T10:42:26-02:00