FUNCTION valid_geometrically_bounded_wf_point

(* SCHEMA associative_draughting; *)

  FUNCTION valid_geometrically_bounded_wf_point(
               pnt: point;
               schma: STRING
      ): BOOLEAN;
    IF (schma + '.CARTESIAN_POINT') IN TYPEOF(pnt) THEN
      RETURN(TRUE);
    ELSE
      IF (schma + '.POINT_ON_CURVE') IN TYPEOF(pnt) THEN
        RETURN(valid_geometrically_bounded_wf_curve(pnt\point_on_curve.
            basis_curve,schma));
      ELSE
        IF (schma + '.POINT_REPLICA') IN TYPEOF(pnt) THEN
          RETURN(valid_geometrically_bounded_wf_point(pnt\point_replica.
              parent_pt,schma));
        END_IF;
      END_IF;
    END_IF;
    RETURN(FALSE);

  END_FUNCTION; -- valid_geometrically_bounded_wf_point

Referenced By

Defintion valid_geometrically_bounded_wf_point is references by the following definitions:

Definition	Type
geometrically_bounded_wireframe_shape_representation	ENTITY

[Top Level Definitions] [Exit]

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