src/StepShape/StepShape_PrecisionQualifier.cdl

   1 -- File:        StepShape_PrecisionQualifier.cdl
   2 -- Created:     Tue Apr 24 14:12:24 2001
   3 -- Author:      Christian CAILLET
   4 --              <cky@photox.paris1.matra-dtv.fr>
   5 ---Copyright:    Matra Datavision 2001
   6
   7
   8 class PrecisionQualifier  from StepShape    inherits TShared
   9
  10     ---Purpose : Added for Dimensional Tolerances
  11
  12 uses
  13     Integer
  14
  15 is
  16
  17     Create returns mutable PrecisionQualifier;
  18
  19     Init (me : mutable; precision_value : Integer);
  20
  21     PrecisionValue (me) returns Integer;
  22     SetPrecisionValue (me : mutable; precision_value : Integer);
  23
  24 fields
  25
  26     thePrecisionValue : Integer;
  27
  28 end PrecisionQualifier;