FUNCTION valid_geometrically_bounded_wf_curve

(* SCHEMA integrated_cnc_schema; *)

FUNCTION valid_geometrically_bounded_wf_curve (
    crv : curve 
    ) : BOOLEAN;
    IF SIZEOF([ 'INTEGRATED_CNC_SCHEMA.POLYLINE', 
      'INTEGRATED_CNC_SCHEMA.B_SPLINE_CURVE', 
      'INTEGRATED_CNC_SCHEMA.ELLIPSE', 'INTEGRATED_CNC_SCHEMA.CIRCLE' ] * 
      TYPEOF(crv)) = 1 THEN
      RETURN (TRUE);
    ELSE
      IF 'INTEGRATED_CNC_SCHEMA.TRIMMED_CURVE' IN TYPEOF(crv) THEN
        IF SIZEOF([ 'INTEGRATED_CNC_SCHEMA.LINE', 
          'INTEGRATED_CNC_SCHEMA.PARABOLA', 
          'INTEGRATED_CNC_SCHEMA.HYPERBOLA' ] * TYPEOF(crv\trimmed_curve.
          basis_curve)) = 1 THEN
          RETURN (TRUE);
        ELSE
          RETURN (valid_geometrically_bounded_wf_curve(crv\trimmed_curve.
            basis_curve));
        END_IF;
      ELSE
        IF 'INTEGRATED_CNC_SCHEMA.OFFSET_CURVE_3D' IN TYPEOF(crv) THEN
          RETURN (valid_geometrically_bounded_wf_curve(crv\offset_curve_3d.
            basis_curve));
        ELSE
          IF 'INTEGRATED_CNC_SCHEMA.CURVE_REPLICA' IN TYPEOF(crv) THEN
            RETURN (valid_geometrically_bounded_wf_curve(crv\curve_replica.
              parent_curve));
          ELSE
            IF 'INTEGRATED_CNC_SCHEMA.COMPOSITE_CURVE' IN TYPEOF(crv) THEN
              RETURN (SIZEOF(QUERY (ccs <* crv\composite_curve.segments| 
                NOT valid_geometrically_bounded_wf_curve(ccs.parent_curve))
                ) = 0);
            END_IF;
          END_IF;
        END_IF;
      END_IF;
    END_IF;
    RETURN (FALSE);
END_FUNCTION; -- 10303-510: aic_geometrically_bounded_wireframe

Referenced By

Generated by STEP Tools^TM EXPRESS to HTML Converter
on 2010-01-12T10:42:26-02:00