IfcLoopHeadToTail

Semantic definitions at the function

Function Definition

This function returns TRUE if for the edges of the input edge loop the end vertex of each edge is the same as the start vertex of its successor.

HISTORY New function in IFC2x2

Formal representations

EXPRESS Specification

FUNCTION IfcLoopHeadToTail
(ALoop : IfcEdgeLoop) : LOGICAL;
   LOCAL
     N : INTEGER;
     P : LOGICAL := TRUE;
   END_LOCAL;

     N := SIZEOF (ALoop.EdgeList);
     REPEAT i := 2 TO N;
       P := P AND (ALoop.EdgeList[i-1].EdgeEnd :=:
                   ALoop.EdgeList[i].EdgeStart);
     END_REPEAT;
     RETURN (P);
END_FUNCTION;