809eca9d |
1 | puts "================" |
2 | puts "OCC21754" |
3 | puts "================" |
4 | puts "" |
5 | ################################################################# |
6 | # Section of face by plane yields empty result |
7 | ################################################################# |
8 | |
9 | set BugNumber OCC21754 |
10 | |
11 | # load shape and make face with natural bounds, to excluse possibility of |
12 | # lame excuse saying that it contains small edges |
13 | restore [locate_data_file OCC21754-bug_bsection_empty.brep] a |
14 | mksurface s a |
15 | mkface f s |
16 | |
17 | # create plane at Z=-0.410 (the bug is reproduced for Z in range [-0.405;-0.420]) |
18 | plane pl 0 0 -0.410 0 0 1 |
19 | mkface p pl 0 10 -5 5 |
20 | |
4e57c75e |
21 | bsection result f p -na |
809eca9d |
22 | |
a4eba920 |
23 | checknbshapes result -vertex 2 -edge 1 -wire 0 -face 0 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 4 |
809eca9d |
24 | set length 0.592137 |
25 | |
26 | set 2dviewer 0 |
27 | |