Salome HOME
6e8291fc598e08497542e855f7ced56c9b0340bd
[modules/hexablock.git] / doc / test_doc / hemisphere / sphere.py
1 # -*- coding: utf-8 -*-
2 # Copyright (C) 2009-2023  CEA, EDF
3 #
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, or (at your option) any later version.
8 #
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.
13 #
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
17 #
18 # See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
19 #
20
21 ####### Sphere Grid Test ##########
22
23 import hexablock
24
25
26 doc  = hexablock.addDocument ("Sphere Grid Test")
27
28 # Simple Sphere -----
29
30 nr = 4
31 na = 8
32 nh = 12
33
34 sphere0 = doc.makeSphereTop(nr, na, nh)
35 sphere0.saveVtk("makeSphereTop.vtk")
36
37 # Uniform Sphere -----
38
39 center  = doc.addVertex (0, 0, 0)
40 vplan = doc.addVertex (0, 0, -0.5)
41 vx    = doc.addVector (1, 0, 0)
42 vz    = doc.addVector (0, 0, 1)
43 rtrou = 1
44 rext  = 10
45 angle = 180
46
47 sphere1 = doc.makeSphereUni (center, vx, vz, rtrou, rext, angle, vplan, nr, na, nh)
48 sphere1.saveVtk("makeSphereUni.vtk")
49
50 # Custom Sphere -----
51
52 dr     = (rext-rtrou)/nr
53 dtheta = angle/na
54 dphi   = 180.0/nh
55 trad = []
56 tang = []
57 tphi = []
58
59 for nro in range(nr+1):
60   trad.append(rtrou + nro*dr)
61   
62 for nro in range(na+1):
63   tang.append(nro*dtheta)
64   
65 for nro in range(nh+1):
66   tphi.append(-90 + nro*dphi)
67
68 sphere2 = doc.makeSphere (center, vx, vz, trad, tang, tphi)
69 sphere2.saveVtk("makeSphere.vtk")