7797eb38 |
1 | puts "========" |
2 | puts "OCC29496" |
3 | puts "========" |
4 | puts "" |
5 | ################################################# |
6 | # No intersection curve between faces if starting points are given |
7 | ################################################# |
8 | |
9 | restore [locate_data_file bug29488_shapes.brep] s |
10 | explode s shell |
11 | set i 1 |
12 | |
13 | explode s_2 f; copy s_2_27 f1 |
14 | explode s_6 f; copy s_6_20 f2 |
15 | bsection r$i f1 f2 |
16 | checknbshapes r$i -vertex 2 -edge 1 |
17 | checkprops r$i -l 2.14991 |
18 | |
19 | incr i |
20 | |
21 | explode s_2 f; copy s_2_27 f1 |
22 | explode s_7 f; copy s_7_8 f2 |
23 | bsection r$i f1 f2 |
24 | checknbshapes r$i -vertex 2 -edge 1 |
25 | checkprops r$i -l 2.15901 |
26 | |
27 | incr i |
28 | |
29 | explode s_3 f; copy s_3_27 f1 |
30 | explode s_7 f; copy s_7_8 f2 |
31 | bsection r$i f1 f2 |
32 | checknbshapes r$i -vertex 2 -edge 1 |
33 | checkprops r$i -l 2.15901 |
34 | |
35 | incr i |
36 | |
37 | explode s_3 f; copy s_3_27 f1 |
38 | explode s_6 f; copy s_6_16 f2 |
39 | bsection r$i f1 f2 |
40 | checknbshapes r$i -vertex 2 -edge 1 |
41 | checkprops r$i -l 2.14991 |
42 | |
43 | incr i |
44 | |
45 | explode s_2 f; copy s_2_26 f1 |
46 | explode s_7 f; copy s_7_2 f2 |
47 | bsection r$i f1 f2 |
48 | checknbshapes r$i -vertex 2 -edge 1 |
49 | checkprops r$i -l 2.22733 |
50 | |
51 | incr i |
52 | |
53 | explode s_3 f; copy s_3_26 f1 |
54 | explode s_7 f; copy s_7_2 f2 |
55 | bsection r$i f1 f2 |
56 | checknbshapes r$i -vertex 2 -edge 1 |
57 | checkprops r$i -l 2.22733 |