0024428: Implementation of LGPL license
[occt.git] / src / GeomToIGES / GeomToIGES_GeomEntity.cxx
CommitLineData
b311480e 1// Created on: 1995-09-13
2// Created by: Marie Jose MARTZ
3// Copyright (c) 1995-1999 Matra Datavision
973c2be1 4// Copyright (c) 1999-2014 OPEN CASCADE SAS
b311480e 5//
973c2be1 6// This file is part of Open CASCADE Technology software library.
b311480e 7//
973c2be1 8// This library is free software; you can redistribute it and / or modify it
9// under the terms of the GNU Lesser General Public version 2.1 as published
10// by the Free Software Foundation, with special exception defined in the file
11// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12// distribution for complete text of the license and disclaimer of any warranty.
b311480e 13//
973c2be1 14// Alternatively, this file may be used under the terms of Open CASCADE
15// commercial license or contractual agreement.
b311480e 16
7fd59977 17//rln 06.01.98 new method SetUnit
18
19
20#include <GeomToIGES_GeomEntity.ixx>
21
22#include <IGESData_IGESModel.hxx>
23
24
25//=======================================================================
26//function : GeomToIGES_GeomEntity
27//purpose :
28//=======================================================================
29
30GeomToIGES_GeomEntity::GeomToIGES_GeomEntity()
31{
32}
33
34
35//=======================================================================
36//function : GeomToIGES_GeomEntity
37//purpose :
38//=======================================================================
39
40GeomToIGES_GeomEntity::GeomToIGES_GeomEntity
41(const GeomToIGES_GeomEntity& other)
42{
43 TheUnitFactor = other.GetUnit();
44 TheModel = other.GetModel();
45}
46
47
48//=======================================================================
49//function : SetModel
50//purpose :
51//=======================================================================
52void GeomToIGES_GeomEntity::SetModel(const Handle(IGESData_IGESModel)& model)
53{
54 TheModel = model;
55 Standard_Real unitfactor = TheModel->GlobalSection().UnitValue();
56 TheUnitFactor = unitfactor;
57}
58
59
60//=======================================================================
61//function : GetModel
62//purpose :
63//=======================================================================
64Handle(IGESData_IGESModel) GeomToIGES_GeomEntity::GetModel() const
65{
66 return TheModel;
67}
68
69
70//=======================================================================
71//function : GetUnit
72//purpose :
73//=======================================================================
74void GeomToIGES_GeomEntity::SetUnit(const Standard_Real unit)
75{
76 TheUnitFactor = unit;
77}
78
79//=======================================================================
80//function : GetUnit
81//purpose :
82//=======================================================================
83Standard_Real GeomToIGES_GeomEntity::GetUnit() const
84{
85 return TheUnitFactor;
86}
87
88