FUNCTION nmsf_surface_check

(* SCHEMA Ship_arrangement_schema; *)



   FUNCTION nmsf_surface_check
      (surf : surface ) : BOOLEAN;
      IF 'SHIP_ARRANGEMENT_SCHEMA.ELEMENTARY_SURFACE' IN TYPEOF(surf) THEN
         RETURN (TRUE);
      ELSE
         IF 'SHIP_ARRANGEMENT_SCHEMA.SWEPT_SURFACE' IN TYPEOF(surf) THEN
            RETURN (nmsf_curve_check(surf\swept_surface.swept_curve));
         ELSE
            IF ('SHIP_ARRANGEMENT_SCHEMA.OFFSET_SURFACE' IN TYPEOF(surf)) AND (surf\offset_surface.self_intersect = FALSE) OR (surf\offset_surface.self_intersect = UNKNOWN) THEN
               RETURN (nmsf_surface_check(surf\offset_surface.basis_surface));
            ELSE
               IF 'SHIP_ARRANGEMENT_SCHEMA.SURFACE_REPLICA' IN TYPEOF(surf) THEN
                  RETURN (nmsf_surface_check(surf\surface_replica.parent_surface));
               ELSE
                  IF ('SHIP_ARRANGEMENT_SCHEMA.B_SPLINE_SURFACE' IN TYPEOF(surf)) AND (surf\b_spline_surface.self_intersect = FALSE) OR (surf\b_spline_surface.self_intersect = UNKNOWN) THEN
                     RETURN (TRUE);
                  END_IF;
               END_IF;
            END_IF;
         END_IF;
      END_IF;
      RETURN (FALSE);
   END_FUNCTION;

Referenced By

Defintion nmsf_surface_check is references by the following definitions:

Definition	Type
nmsf_curve_check	FUNCTION
non_manifold_surface_shape_representation	ENTITY

[Top Level Definitions] [Exit]

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