FUNCTION path_head_to_tail

(* SCHEMA integrated_cnc_schema; *)

FUNCTION path_head_to_tail (
    a_path : path 
    ) : LOGICAL;
  LOCAL
    n : INTEGER;
    p : LOGICAL := TRUE;
  END_LOCAL;
    n := SIZEOF(a_path.edge_list);
    REPEAT i := 2 TO n;
      p := p AND (a_path.edge_list[(i - 1)].edge_end :=: a_path.edge_list[i
        ].edge_start);
    END_REPEAT;
    RETURN (p);
END_FUNCTION; -- 10303-42: topology_schema

Referenced By

Defintion path_head_to_tail is references by the following definitions:

Definition	Type
path	ENTITY

[Top Level Definitions]

Generated by STEP Tools^TM EXPRESS to HTML Converter
on 2010-01-12T10:42:26-02:00