FUNCTION valid_wireframe_edge_curve
(* SCHEMA ship_structures_schema; *)
FUNCTION valid_wireframe_edge_curve(
crv: curve
): BOOLEAN;
IF SIZEOF(['SHIP_STRUCTURES_SCHEMA.LINE',
'SHIP_STRUCTURES_SCHEMA.CONIC',
'SHIP_STRUCTURES_SCHEMA.B_SPLINE_CURVE',
'SHIP_STRUCTURES_SCHEMA.POLYLINE'] * TYPEOF(crv)) = 1 THEN
RETURN(TRUE);
ELSE
IF 'SHIP_STRUCTURES_SCHEMA.CURVE_REPLICA' IN TYPEOF(crv) THEN
RETURN(valid_wireframe_edge_curve(crv\curve_replica.parent_curve));
ELSE
IF 'SHIP_STRUCTURES_SCHEMA.OFFSET_CURVE_3D' IN TYPEOF(crv) THEN
RETURN(valid_wireframe_edge_curve(crv\offset_curve_3d.
basis_curve));
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:17:03-04:00