FUNCTION constraints_geometry_shell_based_surface_model

(* SCHEMA technical_data_packaging; *)

  FUNCTION constraints_geometry_shell_based_surface_model(
               m: shell_based_surface_model
        ): BOOLEAN;

    LOCAL
      result : BOOLEAN := TRUE;
    END_LOCAL;
    REPEAT j := 1 TO SIZEOF(m.sbsm_boundary) BY 1;
      IF (NOT ('TECHNICAL_DATA_PACKAGING.OPEN_SHELL' IN TYPEOF(m.
          sbsm_boundary[j]))) AND (NOT (
          'TECHNICAL_DATA_PACKAGING.CLOSED_SHELL' IN TYPEOF(m.sbsm_boundary
          [j]))) THEN
        result := FALSE;
        RETURN(result);
      END_IF;
    END_REPEAT;
    RETURN(result);

  END_FUNCTION; -- constraints_geometry_shell_based_surface_model

Referenced By

Defintion constraints_geometry_shell_based_surface_model is references by the following definitions:

Definition	Type
shell_based_surface_model	ENTITY

[Top Level Definitions] [Exit]

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