1 // Created on: 2002-12-12
2 // Created by: data exchange team
3 // Copyright (c) 2002-2014 OPEN CASCADE SAS
5 // This file is part of Open CASCADE Technology software library.
7 // This library is free software; you can redistribute it and/or modify it under
8 // the terms of the GNU Lesser General Public License version 2.1 as published
9 // by the Free Software Foundation, with special exception defined in the file
10 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 // distribution for complete text of the license and disclaimer of any warranty.
13 // Alternatively, this file may be used under the terms of Open CASCADE
14 // commercial license or contractual agreement.
16 // Generator: ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V1.2
18 #include <Interface_Check.hxx>
19 #include <Interface_EntityIterator.hxx>
20 #include <RWStepBasic_RWThermodynamicTemperatureUnit.hxx>
21 #include <StepBasic_DimensionalExponents.hxx>
22 #include <StepBasic_ThermodynamicTemperatureUnit.hxx>
23 #include <StepData_StepReaderData.hxx>
24 #include <StepData_StepWriter.hxx>
26 //=======================================================================
27 //function : RWStepBasic_RWThermodynamicTemperatureUnit
29 //=======================================================================
30 RWStepBasic_RWThermodynamicTemperatureUnit::RWStepBasic_RWThermodynamicTemperatureUnit ()
34 //=======================================================================
37 //=======================================================================
39 void RWStepBasic_RWThermodynamicTemperatureUnit::ReadStep (const Handle(StepData_StepReaderData)& data,
40 const Standard_Integer num,
41 Handle(Interface_Check)& ach,
42 const Handle(StepBasic_ThermodynamicTemperatureUnit) &ent) const
44 // Check number of parameters
45 if ( ! data->CheckNbParams(num,1,ach,"thermodynamic_temperature_unit") ) return;
47 // Inherited fields of NamedUnit
49 Handle(StepBasic_DimensionalExponents) aNamedUnit_Dimensions;
50 data->ReadEntity (num, 1, "named_unit.dimensions", ach, STANDARD_TYPE(StepBasic_DimensionalExponents), aNamedUnit_Dimensions);
53 ent->Init(aNamedUnit_Dimensions);
56 //=======================================================================
57 //function : WriteStep
59 //=======================================================================
61 void RWStepBasic_RWThermodynamicTemperatureUnit::WriteStep (StepData_StepWriter& SW,
62 const Handle(StepBasic_ThermodynamicTemperatureUnit) &ent) const
65 // Inherited fields of NamedUnit
67 SW.Send (ent->StepBasic_NamedUnit::Dimensions());
70 //=======================================================================
73 //=======================================================================
75 void RWStepBasic_RWThermodynamicTemperatureUnit::Share (const Handle(StepBasic_ThermodynamicTemperatureUnit) &ent,
76 Interface_EntityIterator& iter) const
79 // Inherited fields of NamedUnit
81 iter.AddItem (ent->StepBasic_NamedUnit::Dimensions());