FUNCTION valid_geometrically_bounded_wf_curve

(* SCHEMA AUTOMOTIVE_DESIGN; *)

 
FUNCTION valid_geometrically_bounded_wf_curve(crv : curve) : BOOLEAN;
  IF SIZEOF(['AUTOMOTIVE_DESIGN.POLYLINE', 
  'AUTOMOTIVE_DESIGN.B_SPLINE_CURVE', 'AUTOMOTIVE_DESIGN.ELLIPSE', 
  'AUTOMOTIVE_DESIGN.CIRCLE'] * TYPEOF(crv)) = 1 THEN
    RETURN (TRUE);
  ELSE
    IF 'AUTOMOTIVE_DESIGN.TRIMMED_CURVE' IN TYPEOF(crv) THEN
      IF SIZEOF(['AUTOMOTIVE_DESIGN.LINE', 'AUTOMOTIVE_DESIGN.PARABOLA', 
      'AUTOMOTIVE_DESIGN.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 'AUTOMOTIVE_DESIGN.OFFSET_CURVE_3D' IN TYPEOF(crv) THEN
        RETURN (valid_geometrically_bounded_wf_curve(crv\offset_curve_3d.
        basis_curve));
      ELSE
        IF 'AUTOMOTIVE_DESIGN.CURVE_REPLICA' IN TYPEOF(crv) THEN
          RETURN (valid_geometrically_bounded_wf_curve(crv\curve_replica.
          parent_curve));
        ELSE
          IF 'AUTOMOTIVE_DESIGN.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; (* declared in: aic_geometrically_bounded_wireframe *)

Referenced By

Generated by STEP Tools® EXPRESS to HTML Converter
2012-03-27T17:16:12-04:00