0028313: Extend Draw functionality with some new useful commands and features
[occt.git] / tests / bugs / moddata_2 / bug6862_9
CommitLineData
61c421bf 1puts "============"
2puts "OCC6862"
3puts "============"
4puts ""
5#######################################################################
6# Tool for checking arguments of Boolean Operations
7#######################################################################
8
9set BugNumber OCC6862
10
11# test possibility to merge edges
12box b1 10 20 10
13box b2 20 10 10
14explode b1 e
15explode b2 e
16tcopy b2_10 ee2
17wire ww b2_10 ee2
472634fa 18donly b1_10 ww
61c421bf 19
61c421bf 20set resstr [bopargcheck b1_10 ww -O /RFTVIP]
61c421bf 21
22if { $resstr=="Faulties, that can not be treated by BOP, are detected.\n" } {
23 puts "OK ${BugNumber}"
24} else {
25 puts "Faulty ${BugNumber}"
26}
27
5747059b 28checkview -display result -2d -path ${imagedir}/${test_image}.png