FUNCTION IfcLoopHeadToTail

(* SCHEMA IFC2X2_FINAL; *)

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;

Referenced By

Defintion IfcLoopHeadToTail is references by the following definitions:

Definition	Type
IfcEdgeLoop	ENTITY

[Top Level Definitions] [Exit]

Generated by STEP Tools® EXPRESS to HTML Converter
2012-03-27T17:20:56-04:00