1 # Copyright (C) 2005 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
2 # CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
4 # This library is free software; you can redistribute it and/or
5 # modify it under the terms of the GNU Lesser General Public
6 # License as published by the Free Software Foundation; either
7 # version 2.1 of the License.
9 # This library is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 # Lesser General Public License for more details.
14 # You should have received a copy of the GNU Lesser General Public
15 # License along with this library; if not, write to the Free Software
16 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18 # See http://www.salome-platform.org/
20 # CEA/LGLS 2004-2005, Francis KLOSS (OCC)
21 # =======================================
30 # A holed cube build by partitioning geometric operations
50 b_boite = MakeBox(g_x-g_longueur, g_y-g_hauteur, g_z-g_largeur, g_x+g_longueur, g_y+g_hauteur, g_z+g_largeur)
55 c_axe = MakeVectorDXDYDZ(0, 1, 0)
57 c_cyl = MakeCylinder(MakeVertex(g_x, g_y-g_hauteur, g_z), c_axe, g_rayon, g_hauteur*2)
59 c_piece = MakeCut(b_boite, c_cyl)
61 # Partition and reperation
62 # ------------------------
64 p_centre = MakeVertex(g_x, g_y, g_z)
67 p_tools.append(MakePlane(p_centre, MakeVectorDXDYDZ( g_largeur, 0, g_longueur), g_trim))
68 p_tools.append(MakePlane(p_centre, MakeVectorDXDYDZ(-g_largeur, 0, g_longueur), g_trim))
70 p_part = MakePartition([c_piece], p_tools, [], [], ShapeType["SOLID"])
72 p_blocs = RemoveExtraEdges(p_part)
73 piece = MakeGlueFaces(p_blocs, 1.e-5)
78 piece_id = addToStudy(piece, "ex07_hole1partition")
83 # Create a hexahedral mesh
84 # ------------------------
86 hexa = smesh.Mesh(piece, "ex07_hole1partition:hexa")
89 algo.NumberOfSegments(20)