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/ or email : webmaster.salome@opencascade.com
20 # CEA/LGLS 2004-2005, Francis KLOSS (OCC)
21 # =======================================
30 # Element of a grid compound by a square with a cylinder on each vertex build by using partition
48 piecePoint = MakeVertex(ox, oy, oz)
50 pieceBox = MakeBoxTwoPnt(piecePoint, MakeVertex(ox+arete, oy+hauteur, oz+arete))
55 dirUp = MakeVectorDXDYDZ(0, 1, 0)
57 pieceCut1 = MakeCut(pieceBox , MakeCylinder(piecePoint , dirUp, rayon, hauteur))
58 pieceCut2 = MakeCut(pieceCut1, MakeCylinder(MakeVertex(ox+arete, oy, oz ), dirUp, rayon, hauteur))
59 pieceCut3 = MakeCut(pieceCut2, MakeCylinder(MakeVertex(ox , oy, oz+arete), dirUp, rayon, hauteur))
60 pieceCut4 = MakeCut(pieceCut3, MakeCylinder(MakeVertex(ox+arete, oy, oz+arete), dirUp, rayon, hauteur))
62 # Compound by make a partition of a solid
63 # ---------------------------------------
65 dir = MakeVectorDXDYDZ(-1, 0, 1)
68 tools.append(MakePlane(MakeVertex(ox+rayon, oy, oz ), dir, g_trim))
69 tools.append(MakePlane(MakeVertex(ox , oy, oz+rayon), dir, g_trim))
71 piece = MakePartition([pieceCut4], tools, [], [], ShapeType["SOLID"])
76 piece_id = addToStudy(piece, "ex10_grid4geometry")
81 # Create a hexahedral mesh
82 # ------------------------
84 hexa = smesh.Mesh(piece, "ex10_grid4geometry:hexa")
87 algo.NumberOfSegments(10)