1 # Copyright (C) 2007-2008 CEA/DEN, EDF R&D, OPEN CASCADE
3 # Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 # CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 # This library is free software; you can redistribute it and/or
7 # modify it under the terms of the GNU Lesser General Public
8 # License as published by the Free Software Foundation; either
9 # version 2.1 of the License.
11 # This library is distributed in the hope that it will be useful,
12 # but WITHOUT ANY WARRANTY; without even the implied warranty of
13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 # Lesser General Public License for more details.
16 # You should have received a copy of the GNU Lesser General Public
17 # License along with this library; if not, write to the Free Software
18 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 # See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
22 # =======================================
31 # 5 box with a hexahedral mesh and with 2 box in tetrahedral mesh
46 box_tetra1 = MakeBox(arete0, arete0, 0, arete1, arete1, arete)
48 box_ijk1 = MakeBox(arete1, arete0, 0, arete2, arete1, arete)
50 box_hexa = MakeBox(arete1, arete1, 0, arete2, arete2, arete)
52 box_ijk2 = MakeBox(arete2, arete1, 0, arete3, arete2, arete)
54 box_tetra2 = MakeBox(arete2, arete2, 0, arete3 ,arete3, arete)
59 piece_cpd = MakeCompound([box_tetra1, box_ijk1, box_hexa, box_ijk2, box_tetra2])
61 piece = MakeGlueFaces(piece_cpd, 1e-4)
63 piece_id = addToStudy(piece, "ex04_cube5tetraHexa")
68 # Create a hexahedral mesh
69 # ------------------------
71 mixed = smesh.Mesh(piece, "ex04_cube5tetraHexa:mixed")
73 algo = mixed.Segment()
75 algo.StartEndLength(3, 25)
81 # Tetrahedral local mesh
82 # ----------------------
84 def localMesh(b, hyp):
85 box = GetInPlace(piece, b)
86 faces = SubShapeAll(box, ShapeType["FACE"])
91 algo = mixed.Triangle(faces[i])
93 algo.MaxElementArea(80)
95 algo.LengthFromEdges()
98 algo = mixed.Tetrahedron(smesh.NETGEN, box)
99 algo.MaxElementVolume(400)
101 localMesh(box_tetra1, 1)
102 localMesh(box_tetra2, 0)