函数获取IfcPhysicalQuantity的集合。它遍历IfcPhysicalQuantity的名称attibute并验证没有名称出现两次。
IFC2x4中的新函数
EXPRESS Specification
FUNCTION IfcUniqueQuantityNames
(Properties : SET [1:?] OF IfcPhysicalQuantity)
:LOGICAL;
LOCAL
Names : SET OF IfcLabel := [];
END_LOCAL;
REPEAT i:=1 TO HIINDEX(Properties);
Names := Names + Properties[i].Name;
END_REPEAT;
RETURN (SIZEOF(Names) = SIZEOF(Properties));
END_FUNCTION;