1 puts "=============================================================="
2 puts "OCC29955: Face and Solid BOP: Building 2D curve of edge on face is failing"
3 puts "=============================================================="
5 restore [locate_data_file bug29955_o.brep] o
6 restore [locate_data_file bug29955_t.brep] t
19 foreach r {r0 r2 r4} {
21 if {![regexp "OK" [bopcheck $r]]} {
22 puts "Error: the result of BOP is self-interfering shape"
26 checknbshapes r0 -wire 1 -face 1
27 checkprops r0 -s 3.62288e-006
29 checknbshapes r2 -wire 1 -face 1
30 checkprops r2 -s 6.47633e-007
32 checknbshapes r4 -vertex 4 -edge 4
33 checkprops r4 -l 0.0111863
34 if {![regexp "nb alone Vertices : 0" [checksection r4]]} {
35 puts "Error: section is not closed"
39 checknbshapes result -wire 2 -face 2
40 checkprops result -s 4.27051e-006
42 checkview -display result -2d -path ${imagedir}/${test_image}.png