0024057: Eliminate compiler warning C4100 in MSVC++ with warning level 4
[occt.git] / src / IGESAppli / IGESAppli_FiniteElement.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_FiniteElement.ixx>
24#include <Standard_DimensionMismatch.hxx>
25#include <IGESAppli.hxx>
26
b311480e 27IGESAppli_FiniteElement::IGESAppli_FiniteElement () { }
7fd59977 28
29
30 void IGESAppli_FiniteElement::Init
31 (const Standard_Integer aType,
32 const Handle(IGESAppli_HArray1OfNode)& allNodes,
33 const Handle(TCollection_HAsciiString)& aName)
34{
35 if (allNodes->Lower() != 1)
36 Standard_DimensionMismatch::Raise("IGESAppli_FiniteElement : Init");
37 theTopology = aType;
38 theNodes = allNodes;
39 theName = aName;
40 InitTypeAndForm(136,0);
41}
42
43 Standard_Integer IGESAppli_FiniteElement::Topology () const
44{
45 return theTopology;
46}
47
48 Handle(IGESAppli_Node) IGESAppli_FiniteElement::Node
49 (const Standard_Integer Index) const
50{
51 return theNodes->Value(Index);
52}
53
54 Handle(TCollection_HAsciiString) IGESAppli_FiniteElement::Name () const
55{
56 return theName;
57}
58
59 Standard_Integer IGESAppli_FiniteElement::NbNodes () const
60{
61 return theNodes->Length();
62}