FUNCTION mixed_loop_type_set

(* SCHEMA step_merged_ap_schema; *)
-- DIFF IN AP214
-- DIFF IN AP203e2
-- DIFF IN AP238 STEP-NC
-- DIFF IN AP224
-- DIFF IN AP232
FUNCTION mixed_loop_type_set
      (l : SET [0:?] OF loop ) : LOGICAL;
   LOCAL
      poly_loop_type : LOGICAL;
   END_LOCAL;
      IF SIZEOF(l) <= 1 THEN
         RETURN (TRUE);
      END_IF;
      poly_loop_type := 'STEP_MERGED_AP_SCHEMA.POLY_LOOP' IN TYPEOF(l[1]);
      REPEAT i := 2 TO SIZEOF(l);
         IF ('STEP_MERGED_AP_SCHEMA.POLY_LOOP' IN TYPEOF(l[i])) <> poly_loop_type THEN
            RETURN (FALSE);
         END_IF;
      END_REPEAT;
      RETURN (FALSE);
END_FUNCTION;

Referenced By

Defintion mixed_loop_type_set is references by the following definitions:
DefinitionType
 face ENTITY
 subface ENTITY
 wire_shell ENTITY


[Top Level Definitions] [Exit]

Generated by STEP Tools® EXPRESS to HTML Converter
2020-07-28T17:02:20-04:00