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 # Create the hexahedrical block geometry of a holed parallelepipede.
31 # The hole has a T form composed by 2 cylinders with different radius, and their axis are normal.
32 # This piece is meshed in hexahedrical.
53 p_boite = MakeBox(gx-g_dx, gy-g_dy, gz-g_dz, gx+g_dx, gy+g_dy, gz+g_dz)
58 g_base = MakeVertex(gx-g_dx, gy, gz)
59 g_dir = MakeVectorDXDYDZ(1, 0, 0)
60 g_cyl = MakeCylinder(g_base, g_dir, g_rayonGrand, g_dx*2)
65 b_boite = MakeCut(p_boite , g_cyl)
70 p_base = MakeVertex(gx, gy, gz)
74 p_tools.append(MakePlane(p_base, MakeVectorDXDYDZ(0, 1 , 0 ), g_trim))
75 p_tools.append(MakePlane(p_base, MakeVectorDXDYDZ(0, g_dz, g_dy), g_trim))
76 p_tools.append(MakePlane(p_base, MakeVectorDXDYDZ(0, -g_dz, g_dy), g_trim))
78 p_tools.append(MakePlane(MakeVertex(gx-g_rayonPetit, gy, gz), g_dir, g_trim))
79 p_tools.append(MakePlane(MakeVertex(gx+g_rayonPetit, gy, gz), g_dir, g_trim))
81 p_piece = MakePartition([b_boite], p_tools, [], [], ShapeType["SOLID"])
86 c_cyl = MakeCylinder(p_base, MakeVectorDXDYDZ(0, 0, 1), g_rayonPetit, g_dz)
91 d_element = SubShapeAllSorted(p_piece, ShapeType["SOLID"])
93 d_element[ 8] = MakeCut(d_element[ 8], c_cyl)
94 d_element[10] = MakeCut(d_element[10], c_cyl)
99 piece = RemoveExtraEdges(MakeCompound(d_element))
104 piece_id = addToStudy(piece, "ex16_cyl2complementary")
109 # Create a hexahedral mesh
110 # ------------------------
112 hexa = smesh.Mesh(piece, "ex16_cyl2complementary:hexa")
114 algo = hexa.Segment()
115 algo.NumberOfSegments(12)
121 # Define local hypothesis
122 # -----------------------
124 def local(x, y, z, d):
125 edge = GetEdgeNearPoint(piece, MakeVertex(x, y, z))
126 algo = hexa.Segment(edge)
127 algo.NumberOfSegments(d)
130 local(gx , gy+g_dy, gz+g_dz, 7)
131 local(gx+g_dx, gy+g_dy, gz , 21)
132 local(gx+g_dx, gy-g_dy, gz , 21)