0024057: Eliminate compiler warning C4100 in MSVC++ with warning level 4
[occt.git] / src / IGESAppli / IGESAppli_NodalConstraint.cxx
CommitLineData
b311480e 1// Created by: CKY / Contract Toubro-Larsen
2// Copyright (c) 1993-1999 Matra Datavision
3// Copyright (c) 1999-2012 OPEN CASCADE SAS
4//
5// The content of this file is subject to the Open CASCADE Technology Public
6// License Version 6.5 (the "License"). You may not use the content of this file
7// except in compliance with the License. Please obtain a copy of the License
8// at http://www.opencascade.org and read it completely before using this file.
7fd59977 9//
b311480e 10// The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
11// main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
7fd59977 12//
b311480e 13// The Original Code and all software distributed under the License is
14// distributed on an "AS IS" basis, without warranty of any kind, and the
15// Initial Developer hereby disclaims all such warranties, including without
16// limitation, any warranties of merchantability, fitness for a particular
17// purpose or non-infringement. Please see the License for the specific terms
18// and conditions governing the rights and limitations under the License.
19
20//--------------------------------------------------------------------
7fd59977 21//--------------------------------------------------------------------
22
23#include <IGESAppli_NodalConstraint.ixx>
24#include <Standard_DimensionMismatch.hxx>
25
26
b311480e 27IGESAppli_NodalConstraint::IGESAppli_NodalConstraint () { }
7fd59977 28
29
30 void IGESAppli_NodalConstraint::Init
31 (const Standard_Integer aType,
32 const Handle(IGESAppli_Node)& aNode,
33 const Handle(IGESDefs_HArray1OfTabularData)& allTabData)
34{
35 if (allTabData->Lower() != 1)
36 Standard_DimensionMismatch::Raise("IGESAppli_NodalConstraint : Init");
37 theType = aType;
38 theNode = aNode;
39 theTabularDataProps = allTabData;
40 InitTypeAndForm(418,0);
41}
42
43 Standard_Integer IGESAppli_NodalConstraint::NbCases () const
44{
45 return theTabularDataProps->Length();
46}
47
48 Standard_Integer IGESAppli_NodalConstraint::Type () const
49{
50 return theType;
51}
52
53 Handle(IGESAppli_Node) IGESAppli_NodalConstraint::NodeEntity () const
54{
55 return theNode;
56}
57
58 Handle(IGESDefs_TabularData) IGESAppli_NodalConstraint::TabularData
59 (const Standard_Integer Index) const
60{
61 return theTabularDataProps->Value(Index);
62}