IfcCurveWeightsPositive

此函数检查b样条曲线的曲线权重是否为正。
注：函数根据ISO 10303-42中定义的曲线权重正值进行调整。
IFC2x中增加的新函数

EXPRESS Specification

FUNCTION IfcCurveWeightsPositive
( B: IfcRationalBSplineCurveWithKnots)
: BOOLEAN;

  LOCAL
    Result : BOOLEAN := TRUE;
  END_LOCAL;

  REPEAT i := 0 TO B.UpperIndexOnControlPoints;
    IF B.Weights[i] <= 0.0  THEN
      Result := FALSE;
      RETURN(Result);
    END_IF;
  END_REPEAT;
  RETURN(Result); 
END_FUNCTION;