IfcLoopHeadToTail

标签：FUNCTION END ALoop IfcLoopHeadToTail EdgeList TRUE

IfcLoopHeadToTail

功能定义

如果对于输入边循环的边，每条边的结束顶点与其后续边的开始顶点相同，则此函数返回TRUE。

 

IFC2x2中的新功能

 

 

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;

 

 

##################

标签：FUNCTION,END,ALoop,IfcLoopHeadToTail,EdgeList,TRUE
From： https://www.cnblogs.com/herd/p/16990681.html