1 # CEA/LGLS 2004-2005, Francis KLOSS (OCC)
2 # =======================================
13 # A centered holed cube build by build by points, edges, faces and solids
31 basePoint111 = MakeVertex(ox , oy, oz)
32 basePoint211 = MakeVertex(ox+longueur, oy, oz)
33 basePoint112 = MakeVertex(ox , oy, oz+largeur)
34 basePoint212 = MakeVertex(ox+longueur, oy, oz+largeur)
42 dx = rayon/math.sqrt(1+ll)
43 dz = rayon/math.sqrt(1+1/ll)
45 circlePoint1 = MakeVertex(cx-dx, cy, cz-dz)
46 circlePoint2 = MakeVertex(cx+dx, cy, cz-dz)
47 circlePoint3 = MakeVertex(cx+dx, cy, cz+dz)
48 circlePoint4 = MakeVertex(cx-dx, cy, cz+dz)
53 squareEdge1 = MakeEdge(basePoint111, basePoint211)
54 squareEdge2 = MakeEdge(basePoint211, basePoint212)
55 squareEdge3 = MakeEdge(basePoint212, basePoint112)
56 squareEdge4 = MakeEdge(basePoint112, basePoint111)
58 diagEdge1 = MakeEdge(basePoint111, circlePoint1)
59 diagEdge2 = MakeEdge(basePoint211, circlePoint2)
60 diagEdge3 = MakeEdge(basePoint212, circlePoint3)
61 diagEdge4 = MakeEdge(basePoint112, circlePoint4)
63 arcEdge1 = MakeArc(circlePoint1, MakeVertex(cx , cy, cz-rayon), circlePoint2)
64 arcEdge2 = MakeArc(circlePoint2, MakeVertex(cx+rayon, cy, cz ), circlePoint3)
65 arcEdge3 = MakeArc(circlePoint3, MakeVertex(cx , cy, cz+rayon), circlePoint4)
66 arcEdge4 = MakeArc(circlePoint4, MakeVertex(cx-rayon, cy, cz ), circlePoint1)
71 baseFace1 = MakeQuad(squareEdge1, diagEdge2, arcEdge1, diagEdge1)
72 baseFace2 = MakeQuad(squareEdge2, diagEdge3, arcEdge2, diagEdge2)
73 baseFace3 = MakeQuad(squareEdge3, diagEdge4, arcEdge3, diagEdge3)
74 baseFace4 = MakeQuad(squareEdge4, diagEdge1, arcEdge4, diagEdge4)
79 baseVector = MakeVectorDXDYDZ(0, 1, 0)
81 baseSolid1 = MakePrismVecH(baseFace1, baseVector, hauteur)
82 baseSolid2 = MakePrismVecH(baseFace2, baseVector, hauteur)
83 baseSolid3 = MakePrismVecH(baseFace3, baseVector, hauteur)
84 baseSolid4 = MakePrismVecH(baseFace4, baseVector, hauteur)
90 c_l.append(baseSolid1)
91 c_l.append(baseSolid2)
92 c_l.append(baseSolid3)
93 c_l.append(baseSolid4)
95 c_cpd = MakeCompound(c_l)
96 piece = MakeGlueFaces(c_cpd, 1.e-5)
101 piece_id = addToStudy(piece, "ex05_hole1build")
106 # Create a hexahedral mesh
107 # ------------------------
109 hexa = smesh.Mesh(piece, "ex05_hole1build:hexa")
111 algo = hexa.Segment()
113 algo.NumberOfSegments(6, 3)