92ae0f2f |
1 | puts "============" |
2 | puts "OCC25232" |
3 | puts "============" |
4 | puts "" |
5 | ######################################################################### |
6 | # Functionality to create solids from set of shapes |
7 | ######################################################################### |
8 | |
9 | cylinder cyl 10 |
10 | trimv cyl cyl -20 20 |
11 | mkface fcyl cyl |
12 | cone con 45 0 |
13 | trimv con1 con 0 15 |
14 | trimv con2 con -15 0 |
15 | mkface fcon1 con1 |
16 | mkface fcon2 con2 |
17 | plane pl 0 0 15 0 0 1 |
18 | mkface fp pl -15 15 -15 15 |
19 | sphere sph 0 0 0 12 |
20 | mkface fsph sph |
21 | |
22 | mkvolume result fsph fcon1 |
23 | # 2 solids created |
24 | |
25 | set square 2449.33 |
26 | |
27 | set nb_v_good 4 |
28 | set nb_e_good 7 |
29 | set nb_w_good 3 |
30 | set nb_f_good 3 |
31 | set nb_sh_good 2 |
32 | set nb_sol_good 2 |
33 | set nb_compsol_good 0 |
34 | set nb_compound_good 1 |
35 | set nb_shape_good 22 |
36 | |
37 | set 2dviewer 1 |