1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
|
// File: RWStepBasic_RWEulerAngles.cxx
// Created: Thu Dec 12 15:38:06 2002
// Author: data exchange team
// Generator: ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V1.2
// Copyright: Open CASCADE 2002
#include <RWStepBasic_RWEulerAngles.ixx>
#include <TColStd_HArray1OfReal.hxx>
#include <Standard_Real.hxx>
//=======================================================================
//function : RWStepBasic_RWEulerAngles
//purpose :
//=======================================================================
RWStepBasic_RWEulerAngles::RWStepBasic_RWEulerAngles ()
{
}
//=======================================================================
//function : ReadStep
//purpose :
//=======================================================================
void RWStepBasic_RWEulerAngles::ReadStep (const Handle(StepData_StepReaderData)& data,
const Standard_Integer num,
Handle(Interface_Check)& ach,
const Handle(StepBasic_EulerAngles) &ent) const
{
// Check number of parameters
if ( ! data->CheckNbParams(num,1,ach,"euler_angles") ) return;
// Own fields of EulerAngles
Handle(TColStd_HArray1OfReal) aAngles;
Standard_Integer sub1 = 0;
if ( data->ReadSubList (num, 1, "angles", ach, sub1) ) {
Standard_Integer nb0 = data->NbParams(sub1);
aAngles = new TColStd_HArray1OfReal (1, nb0);
Standard_Integer num2 = sub1;
for ( Standard_Integer i0=1; i0 <= nb0; i0++ ) {
Standard_Real anIt0;
data->ReadReal (num2, i0, "real", ach, anIt0);
aAngles->SetValue(i0, anIt0);
}
}
// Initialize entity
ent->Init(aAngles);
}
//=======================================================================
//function : WriteStep
//purpose :
//=======================================================================
void RWStepBasic_RWEulerAngles::WriteStep (StepData_StepWriter& SW,
const Handle(StepBasic_EulerAngles) &ent) const
{
// Own fields of EulerAngles
SW.OpenSub();
for (Standard_Integer i0=1; i0 <= ent->Angles()->Length(); i0++ ) {
Standard_Real Var0 = ent->Angles()->Value(i0);
SW.Send (Var0);
}
SW.CloseSub();
}
//=======================================================================
//function : Share
//purpose :
//=======================================================================
void RWStepBasic_RWEulerAngles::Share (const Handle(StepBasic_EulerAngles) &ent,
Interface_EntityIterator& iter) const
{
// Own fields of EulerAngles
}
|
