mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-06-10 16:16:54 +08:00
27 lines
507 B
Plaintext
Executable File
27 lines
507 B
Plaintext
Executable File
-- File: StepBasic_Effectivity.cdl
|
|
-- Created: Tue Jun 30 15:14:58 1998
|
|
-- Author: Christian CAILLET
|
|
-- <cky@heliox.paris1.matra-dtv.fr>
|
|
---Copyright: Matra Datavision 1998
|
|
|
|
|
|
class Effectivity from StepBasic inherits TShared from MMgt
|
|
|
|
uses
|
|
HAsciiString from TCollection
|
|
|
|
is
|
|
|
|
Create returns mutable Effectivity;
|
|
|
|
Init (me : mutable; aid : HAsciiString);
|
|
|
|
Id (me) returns HAsciiString;
|
|
SetId (me : mutable; aid : HAsciiString);
|
|
|
|
fields
|
|
|
|
theid : HAsciiString;
|
|
|
|
end Effectivity;
|