-// Copyright (C) 2007-2010 CEA/DEN, EDF R&D, OPEN CASCADE
+// Copyright (C) 2007-2012 CEA/DEN, EDF R&D, OPEN CASCADE
//
-// Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
-// CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
+// Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
+// CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
//
-// This library is free software; you can redistribute it and/or
-// modify it under the terms of the GNU Lesser General Public
-// License as published by the Free Software Foundation; either
-// version 2.1 of the License.
+// This library is free software; you can redistribute it and/or
+// modify it under the terms of the GNU Lesser General Public
+// License as published by the Free Software Foundation; either
+// version 2.1 of the License.
//
-// This library is distributed in the hope that it will be useful,
-// but WITHOUT ANY WARRANTY; without even the implied warranty of
-// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
-// Lesser General Public License for more details.
+// This library is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+// Lesser General Public License for more details.
//
-// You should have received a copy of the GNU Lesser General Public
-// License along with this library; if not, write to the Free Software
-// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+// You should have received a copy of the GNU Lesser General Public
+// License along with this library; if not, write to the Free Software
+// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
//
-// See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
+// See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
//
#include "DriverUNV_R_SMDS_Mesh.h"
#include "utilities.h"
+#include "UNV164_Structure.hxx"
#include "UNV2411_Structure.hxx"
#include "UNV2412_Structure.hxx"
#include "UNV2417_Structure.hxx"
+#include "UNV2420_Structure.hxx"
#include "UNV_Utilities.hxx"
#include <Basics_Utils.hxx>
#ifdef _DEBUG_
-static int MYDEBUG = 0;
+static int MYDEBUG = 1;
#else
static int MYDEBUG = 0;
#endif
+namespace
+{
+ /*!
+ * \brief Move node coordinates to the global Cartesian CS
+ */
+ void transformNodes( UNV2411::TDataSet::const_iterator fromNode,
+ UNV2411::TDataSet::const_iterator endNode,
+ const UNV2420::TRecord & csRecord )
+ {
+ const int csLabel = fromNode->exp_coord_sys_num;
+
+ UNV2411::TDataSet::const_iterator nodeIt;
+
+ // apply Transformation Matrix
+ if ( !csRecord.isIdentityMatrix() )
+ {
+ for ( nodeIt = fromNode; nodeIt != endNode; ++nodeIt )
+ {
+ const UNV2411::TRecord& nodeRec = *nodeIt;
+ if ( nodeRec.exp_coord_sys_num == csLabel )
+ csRecord.ApplyMatrix( (double*) nodeRec.coord );
+ }
+ }
+
+ // transform from Cylindrical CS
+ if ( csRecord.coord_sys_type == UNV2420::Cylindrical )
+ {
+ for ( nodeIt = fromNode; nodeIt != endNode; ++nodeIt )
+ {
+ const UNV2411::TRecord& nodeRec = *nodeIt;
+ if ( nodeRec.exp_coord_sys_num == csLabel )
+ csRecord.FromCylindricalCS( (double*) nodeRec.coord );
+ }
+ }
+ // transform from Spherical CS
+ else if ( csRecord.coord_sys_type == UNV2420::Spherical )
+ {
+ for ( nodeIt = fromNode; nodeIt != endNode; ++nodeIt )
+ {
+ const UNV2411::TRecord& nodeRec = *nodeIt;
+ if ( nodeRec.exp_coord_sys_num == csLabel )
+ csRecord.FromSphericalCS( (double*) nodeRec.coord );
+ }
+ }
+ }
+}
DriverUNV_R_SMDS_Mesh::~DriverUNV_R_SMDS_Mesh()
{
Kernel_Utils::Localizer loc;
Status aResult = DRS_OK;
std::ifstream in_stream(myFile.c_str());
- try{
+ try
+ {
{
+ // Read Units
+ UNV164::TRecord aUnitsRecord;
+ UNV164::Read( in_stream, aUnitsRecord );
+
+ // Read Coordinate systems
+ UNV2420::TDataSet aCoordSysDataSet;
+ UNV2420::Read(in_stream, myMeshName, aCoordSysDataSet);
+
+ // Read nodes
using namespace UNV2411;
TDataSet aDataSet2411;
UNV2411::Read(in_stream,aDataSet2411);
if(MYDEBUG) MESSAGE("Perform - aDataSet2411.size() = "<<aDataSet2411.size());
+
+ // Move nodes in a global CS
+ if ( !aCoordSysDataSet.empty() )
+ {
+ UNV2420::TDataSet::const_iterator csIter = aCoordSysDataSet.begin();
+ for ( ; csIter != aCoordSysDataSet.end(); ++csIter )
+ {
+ // find any node in this CS
+ TDataSet::const_iterator nodeIter = aDataSet2411.begin();
+ for (; nodeIter != aDataSet2411.end(); nodeIter++)
+ if ( nodeIter->exp_coord_sys_num == csIter->coord_sys_label )
+ {
+ transformNodes( nodeIter, aDataSet2411.end(), *csIter );
+ break;
+ }
+ }
+ }
+ // Move nodes to SI unit system
+ const double lenFactor = aUnitsRecord.factors[ UNV164::LENGTH_FACTOR ];
+ if ( lenFactor != 1. )
+ {
+ TDataSet::iterator nodeIter = aDataSet2411.begin(), nodeEnd;
+ for ( nodeEnd = aDataSet2411.end(); nodeIter != nodeEnd; nodeIter++)
+ {
+ UNV2411::TRecord& nodeRec = *nodeIter;
+ nodeRec.coord[0] *= lenFactor;
+ nodeRec.coord[1] *= lenFactor;
+ nodeRec.coord[2] *= lenFactor;
+ }
+ }
+
+ // Create nodes in the mesh
TDataSet::const_iterator anIter = aDataSet2411.begin();
- for(; anIter != aDataSet2411.end(); anIter++){
- const TNodeLab& aLabel = anIter->first;
- const TRecord& aRec = anIter->second;
- myMesh->AddNodeWithID(aRec.coord[0],aRec.coord[1],aRec.coord[2],aLabel);
+ for(; anIter != aDataSet2411.end(); anIter++)
+ {
+ const TRecord& aRec = *anIter;
+ myMesh->AddNodeWithID(aRec.coord[0],aRec.coord[1],aRec.coord[2],aRec.label);
}
}
{
using namespace UNV2412;
- in_stream.seekg(0);
TDataSet aDataSet2412;
UNV2412::Read(in_stream,aDataSet2412);
TDataSet::const_iterator anIter = aDataSet2412.begin();
if(MYDEBUG) MESSAGE("Perform - aDataSet2412.size() = "<<aDataSet2412.size());
- for(; anIter != aDataSet2412.end(); anIter++){
+ for(; anIter != aDataSet2412.end(); anIter++)
+ {
SMDS_MeshElement* anElement = NULL;
- const TElementLab& aLabel = anIter->first;
- const TRecord& aRec = anIter->second;
+ const TRecord& aRec = *anIter;
if(IsBeam(aRec.fe_descriptor_id)) {
switch ( aRec.node_labels.size() ) {
case 2: // edge with two nodes
+ //MESSAGE("add edge " << aLabel << " " << aRec.node_labels[0] << " " << aRec.node_labels[1]);
anElement = myMesh->AddEdgeWithID(aRec.node_labels[0],
aRec.node_labels[1],
- aLabel);
+ aRec.label);
break;
case 3: // quadratic edge (with 3 nodes)
+ //MESSAGE("add edge " << aRec.label << " " << aRec.node_labels[0] << " " << aRec.node_labels[1] << " " << aRec.node_labels[2]);
anElement = myMesh->AddEdgeWithID(aRec.node_labels[0],
aRec.node_labels[2],
aRec.node_labels[1],
- aLabel);
+ aRec.label);
}
}
else if(IsFace(aRec.fe_descriptor_id)) {
+ //MESSAGE("add face " << aRec.label);
switch(aRec.fe_descriptor_id){
case 41: // Plane Stress Linear Triangle
case 51: // Plane Strain Linear Triangle
anElement = myMesh->AddFaceWithID(aRec.node_labels[0],
aRec.node_labels[1],
aRec.node_labels[2],
- aLabel);
+ aRec.label);
break;
case 42: // Plane Stress Parabolic Triangle
case 72: // Membrane Parabolic Triangle
case 82: // Axisymetric Solid Parabolic Triangle
case 92: // Thin Shell Parabolic Triangle
+ //MESSAGE("add face " << aRec.label << " " << aRec.node_labels[0] << " " << aRec.node_labels[1] << " " << aRec.node_labels[2] << " " << aRec.node_labels[3] << " " << aRec.node_labels[4] << " " << aRec.node_labels[5]);
anElement = myMesh->AddFaceWithID(aRec.node_labels[0],
aRec.node_labels[2],
aRec.node_labels[4],
aRec.node_labels[1],
aRec.node_labels[3],
aRec.node_labels[5],
- aLabel);
+ aRec.label);
break;
case 44: // Plane Stress Linear Quadrilateral
aRec.node_labels[1],
aRec.node_labels[2],
aRec.node_labels[3],
- aLabel);
+ aRec.label);
break;
case 45: // Plane Stress Parabolic Quadrilateral
aRec.node_labels[3],
aRec.node_labels[5],
aRec.node_labels[7],
- aLabel);
+ aRec.label);
break;
}
}
else if(IsVolume(aRec.fe_descriptor_id)){
+ //MESSAGE("add volume " << aRec.label);
switch(aRec.fe_descriptor_id){
case 111: // Solid Linear Tetrahedron - TET4
aRec.node_labels[2],
aRec.node_labels[1],
aRec.node_labels[3],
- aLabel);
+ aRec.label);
break;
case 118: // Solid Quadratic Tetrahedron - TET10
aRec.node_labels[6],
aRec.node_labels[8],
aRec.node_labels[7],
- aLabel);
+ aRec.label);
break;
case 112: // Solid Linear Prism - PRISM6
aRec.node_labels[3],
aRec.node_labels[5],
aRec.node_labels[4],
- aLabel);
+ aRec.label);
break;
case 113: // Solid Quadratic Prism - PRISM15
aRec.node_labels[6],
aRec.node_labels[8],
aRec.node_labels[7],
- aLabel);
+ aRec.label);
break;
case 115: // Solid Linear Brick - HEX8
aRec.node_labels[7],
aRec.node_labels[6],
aRec.node_labels[5],
- aLabel);
+ aRec.label);
break;
case 116: // Solid Quadratic Brick - HEX20
aRec.node_labels[11],
aRec.node_labels[10],
aRec.node_labels[9],
- aLabel);
+ aRec.label);
break;
case 114: // pyramid of 13 nodes (quadratic) - PIRA13
aRec.node_labels[10],
aRec.node_labels[9],
aRec.node_labels[12],
- aLabel);
+ aRec.label);
break;
}
}
- // if(!anElement)
-
// MESSAGE("DriverUNV_R_SMDS_Mesh::Perform - can not add element with ID = "<<aLabel<<" and type = "<<aRec.fe_descriptor_id);
+ if(!anElement)
+
MESSAGE("DriverUNV_R_SMDS_Mesh::Perform - can not add element with ID = "<<aRec.label<<" and type = "<<aRec.fe_descriptor_id);
}
}
{
using namespace UNV2417;
- in_stream.seekg(0);
TDataSet aDataSet2417;
UNV2417::Read(in_stream,aDataSet2417);
if(MYDEBUG) MESSAGE("Perform - aDataSet2417.size() = "<<aDataSet2417.size());
catch(...){
INFOS("Unknown exception was cought !!!");
}
+ if (myMesh)
+ myMesh->compactMesh();
return aResult;
}
