FUNCTION valid_faceted_wire_composition

(* SCHEMA building_design_schema; *)

  FUNCTION valid_faceted_wire_composition(
               sw_element: curve
      ): BOOLEAN;
    IF 'BUILDING_DESIGN_SCHEMA.POLYLINE' IN TYPEOF(sw_element) THEN
      RETURN(TRUE);
    ELSE
      IF 'BUILDING_DESIGN_SCHEMA.TRIMMED_CURVE' IN TYPEOF(sw_element)
           THEN
        IF SIZEOF(['BUILDING_DESIGN_SCHEMA.LINE',
            'BUILDING_DESIGN_SCHEMA.CONIC'] * TYPEOF(sw_element\
            trimmed_curve.basis_curve)) = 1 THEN
          RETURN(TRUE);
        ELSE
          RETURN(valid_faceted_wire_composition(sw_element\trimmed_curve.
              basis_curve));
        END_IF;
      ELSE
        IF 'BUILDING_DESIGN_SCHEMA.COMPOSITE_CURVE' IN TYPEOF(sw_element)
             THEN
          RETURN(SIZEOF(QUERY ( ccs <* sw_element\composite_curve.segments
               | (NOT valid_faceted_wire_composition(ccs.parent_curve)) )) 
              = 0);
        END_IF;
      END_IF;
    END_IF;
    RETURN(FALSE);

  END_FUNCTION; -- valid_faceted_wire_composition

Referenced By

Defintion valid_faceted_wire_composition is references by the following definitions:

Definition	Type
faceted_wire_shape_representation	ENTITY
valid_advanced_wire_composition	FUNCTION

[Top Level Definitions] [Exit]

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