FUNCTION check_text_alignment

(* SCHEMA associative_draughting; *)

  FUNCTION check_text_alignment(
               ct: composite_text
      ): BOOLEAN;
    LOCAL
      a : SET OF text_alignment := [];
      i : INTEGER;
    END_LOCAL;
    REPEAT i := 1 TO HIINDEX(ct.collected_text) BY 1;
      a := a + [ct.collected_text[i]\text_literal.alignment];
    END_REPEAT;
    RETURN(SIZEOF(a) = 1);

  END_FUNCTION; -- check_text_alignment

Referenced By

Defintion check_text_alignment is references by the following definitions:

Definition	Type
draughting_annotation_occurrence	ENTITY

[Top Level Definitions] [Exit]

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