FUNCTION valid_wireframe_edge_curve
(* SCHEMA associative_draughting; *)
FUNCTION valid_wireframe_edge_curve(
crv: curve;
schma: STRING
): BOOLEAN;
IF SIZEOF([schma + '.LINE',schma + '.CIRCLE',schma + '.ELLIPSE',schma
+ '.PARABOLA',schma + '.HYPERBOLA',schma + '.B_SPLINE_CURVE',schma
+ '.POLYLINE'] * TYPEOF(crv)) = 1 THEN
RETURN(TRUE);
ELSE
IF (schma + '.CURVE_REPLICA') IN TYPEOF(crv) THEN
RETURN(valid_wireframe_edge_curve(crv\curve_replica.parent_curve,
schma));
ELSE
IF (schma + '.OFFSET_CURVE_3D') IN TYPEOF(crv) THEN
RETURN(valid_wireframe_edge_curve(crv\offset_curve_3d.
basis_curve,schma));
END_IF;
END_IF;
END_IF;
RETURN(FALSE);
END_FUNCTION; -- valid_wireframe_edge_curve
Referenced By
Defintion valid_wireframe_edge_curve is references by the following definitions:
[Top Level Definitions] [Exit]Generated by STEP Tools® EXPRESS to HTML Converter
2012-03-27T17:14:12-04:00