IfcMlsTotalThickness

函数语义定义计算材质图层集的总厚度。

 

EXPRESS Specification

复制代码
FUNCTION IfcMlsTotalThickness
(LayerSet : IfcMaterialLayerSet) : IfcLengthMeasure;
  LOCAL
    Max : IfcLengthMeasure := LayerSet.MaterialLayers[1].LayerThickness;    
  END_LOCAL;

  IF SIZEOF(LayerSet.MaterialLayers) > 1 THEN
    REPEAT i := 2 TO HIINDEX(LayerSet.MaterialLayers);
       Max := Max + LayerSet.MaterialLayers[i].LayerThickness;
    END_REPEAT;
  END_IF;
  RETURN (Max);
END_FUNCTION;
复制代码

 

posted @   西北逍遥  阅读(68)  评论(0编辑  收藏  举报
点击右上角即可分享
微信分享提示