0022627: Change OCCT memory management defaults
[occt.git] / src / IGESBasic / IGESBasic_SingularSubfigure.cxx
1 //--------------------------------------------------------------------
2 //
3 //  File Name : IGESBasic_SingularSubfigure.cxx
4 //  Date      :
5 //  Author    : CKY / Contract Toubro-Larsen
6 //  Copyright : MATRA-DATAVISION 1993
7 //
8 //--------------------------------------------------------------------
9
10 #include <IGESBasic_SingularSubfigure.ixx>
11 #include <gp_GTrsf.hxx>
12
13
14     IGESBasic_SingularSubfigure::IGESBasic_SingularSubfigure ()    {  }
15
16
17     void  IGESBasic_SingularSubfigure::Init
18   (const Handle(IGESBasic_SubfigureDef)& aSubfigureDef,
19    const gp_XYZ& aTranslation, const Standard_Boolean hasScale,
20    const Standard_Real aScale)
21 {
22   theSubfigureDef = aSubfigureDef;
23   theTranslation  = aTranslation;
24   hasScaleFactor  = hasScale;
25   theScaleFactor  = aScale;
26   InitTypeAndForm(408,0);
27 }
28
29     Handle(IGESBasic_SubfigureDef) IGESBasic_SingularSubfigure::Subfigure () const
30 {
31   return theSubfigureDef;
32 }
33
34     gp_XYZ  IGESBasic_SingularSubfigure::Translation () const
35 {
36   return theTranslation;
37 }
38
39     Standard_Boolean  IGESBasic_SingularSubfigure::HasScaleFactor () const
40 {
41   return hasScaleFactor;
42 }
43
44     Standard_Real  IGESBasic_SingularSubfigure::ScaleFactor () const
45 {
46   return theScaleFactor;
47 }
48
49     gp_XYZ  IGESBasic_SingularSubfigure::TransformedTranslation () const
50 {
51   gp_XYZ tmp = theTranslation;
52   if (HasTransf()) Location().Transforms(tmp);
53   return tmp;
54 }