0025879: result of blend fails the bopcheck
[occt.git] / tests / bugs / modalg_7 / bug25879
1 puts "============"
2 puts "OCC25879"
3 puts "============"
4 puts ""
5 ######################################################
6 # result of blend fails the bopcheck
7 ######################################################
8
9 box Box 10 10 10
10 explode Box E
11
12 blend Fillet Box 1 Box_1 1 Box_2 1 Box_3 1 Box_4 1 Box_5 1 Box_6 1 Box_7 1 Box_8 1 Box_9 1 Box_10 1 Box_11 1 Box_12
13
14 set bug_info [string trim [bopcheck Fillet]]
15 if {$bug_info != "This shape seems to be OK."} {
16     puts "Error : result of blend fails the bopcheck"
17 }
18
19 checkview -display Fillet -2d -path ${imagedir}/${test_image}-2d.png