cba287d6 |
1 | puts "========" |
2 | puts "OCC27472" |
3 | puts "========" |
4 | puts "" |
5 | ####################### |
6 | # Wrong result of cut |
7 | ####################### |
8 | |
9 | restore [locate_data_file bug27472_o.brep] o |
10 | restore [locate_data_file bug27472_t.brep] t |
11 | |
12 | bcut result o t |
13 | checkshape result |
14 | |
15 | set o_Vol [lindex [string trim [vprops o]] 2] |
16 | set r_Vol [lindex [string trim [vprops result]] 2] |
17 | |
18 | if {$r_Vol == $o_Vol} { |
19 | puts "ERROR: OCC27472 is reproduced. Result of bcut operation is WRONG." |
20 | } |
21 | |
22 | vinit |
23 | vdisplay result |
24 | vfit |
25 | |
26 | checkview -screenshot -3d -path ${imagedir}/${test_image}.png |