FUNCTION constraints_composite_curve_on_surface
(* SCHEMA STRUCTURAL_FRAME_SCHEMA; *)
FUNCTION constraints_composite_curve_on_surface
(c: composite_curve_on_surface) : BOOLEAN;
LOCAL
n_segments : INTEGER := SIZEOF(c.segments);
END_LOCAL;
REPEAT k := 1 TO n_segments;
IF (NOT('STRUCTURAL_FRAME_SCHEMA.PCURVE' IN
TYPEOF(c\composite_curve.segments[k].parent_curve))) AND
(NOT('STRUCTURAL_FRAME_SCHEMA.SURFACE_CURVE' IN
TYPEOF(c\composite_curve.segments[k].parent_curve))) AND
(NOT('STRUCTURAL_FRAME_SCHEMA.COMPOSITE_CURVE_ON_SURFACE' IN
TYPEOF(c\composite_curve.segments[k].parent_curve))) THEN
RETURN (FALSE);
END_IF;
END_REPEAT;
RETURN(TRUE);
END_FUNCTION; (* STEP Part 42 (unchanged in 2nd edition) *)
Referenced By
Defintion constraints_composite_curve_on_surface is references by the following definitions:
[Top Level Definitions] [Exit]Generated by STEP Tools® EXPRESS to HTML Converter
2023-03-25T00:11:39-04:00