Curve Weights Positive |
This function checks whether the curve weights of a b-spline are positive.
NOTE Function adapted from curve_weights_positive defined in ISO 10303-42.
HISTORY New function in IFC2x
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;
References: IfcRationalBSplineCurveWithKnots