7fd59977 |
1 | -- File: StepShape_ToleranceValue.cdl |
2 | -- Created: Tue Apr 24 13:53:43 2001 |
3 | -- Author: Christian CAILLET |
4 | -- ckyd@photox.paris1.matra-dtv.fr> |
5 | ---Copyright: Matra Datavision 2001 |
6 | |
7 | class ToleranceValue from StepShape inherits TShared |
8 | |
9 | ---Purpose : Added for Dimensional Tolerances |
10 | |
11 | uses |
12 | MeasureWithUnit from StepBasic |
13 | |
14 | is |
15 | |
16 | Create returns mutable ToleranceValue; |
17 | |
18 | Init (me : mutable; lower_bound, upper_bound : MeasureWithUnit from StepBasic); |
19 | |
20 | LowerBound (me) returns MeasureWithUnit from StepBasic; |
21 | SetLowerBound (me : mutable; lower_bound : MeasureWithUnit from StepBasic); |
22 | |
23 | UpperBound (me) returns MeasureWithUnit from StepBasic; |
24 | SetUpperBound (me : mutable; upper_bound : MeasureWithUnit from StepBasic); |
25 | |
26 | fields |
27 | |
28 | theLowerBound : MeasureWithUnit from StepBasic; |
29 | theUpperBound : MeasureWithUnit from StepBasic; |
30 | |
31 | end ToleranceValue; |