FUNCTION basis_surface_check

(* SCHEMA associative_draughting; *)

  FUNCTION basis_surface_check(
               surf: surface
      ): BOOLEAN;
    IF 'ASSOCIATIVE_DRAUGHTING.ELEMENTARY_SURFACE' IN TYPEOF(surf) THEN
      RETURN(TRUE);
    ELSE
      IF 'ASSOCIATIVE_DRAUGHTING.SWEPT_SURFACE' IN TYPEOF(surf) THEN
        RETURN(basis_curve_check(surf\swept_surface.swept_curve));
      ELSE
        IF ('ASSOCIATIVE_DRAUGHTING.OFFSET_SURFACE' IN TYPEOF(surf)) AND (
            surf\offset_surface.self_intersect = FALSE) THEN
          RETURN(basis_surface_check(surf\offset_surface.basis_surface));
        ELSE
          IF 'ASSOCIATIVE_DRAUGHTING.SURFACE REPLICA' IN TYPEOF(surf)
               THEN
            RETURN(basis_surface_check(surf\surface_replica.parent_surface));
          ELSE
            IF ('ASSOCIATIVE_DRAUGHTING.B_SPLINE_SURFACE' IN TYPEOF(surf)) 
                AND (surf\b_spline_surface.self_intersect = FALSE) THEN
              RETURN(TRUE);
            END_IF;
          END_IF;
        END_IF;
      END_IF;
    END_IF;
    RETURN(FALSE);

  END_FUNCTION; -- basis_surface_check

Referenced By

Defintion basis_surface_check is references by the following definitions:

Definition	Type
basis_curve_check	FUNCTION
manifold_surface_shape_representation	ENTITY

[Top Level Definitions] [Exit]

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