[occt.git] / tests / bugs / modalg_1 / bug13538

puts "============"
puts "OCC13538"
puts "============"
puts ""
#######################################################################
# Problem with Boolean operation on Shells
#######################################################################

box a 100 100 100
box b 100 100 100
ttranslate b 0 0 100
explode a Sh
explode b Sh

bop a_1 b_1
bopcommon result

checkprops result -s 20000
checkshape result
checknbshapes result -vertex 4 -edge 4 -wire 1 -face 1 -shell 2 -solid 0 -compsolid 0 -compound 1 -shape 13
set 2viewer 0
Commit	Line	Data
3bea4c16	1	puts "============"
	2	puts "OCC13538"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# Problem with Boolean operation on Shells
	7	#######################################################################
	8
	9	box a 100 100 100
	10	box b 100 100 100
	11	ttranslate b 0 0 100
	12	explode a Sh
	13	explode b Sh
	14
	15	bop a_1 b_1
	16	bopcommon result
	17
1511c7e9	18	checkprops result -s 20000
58cf74e0	19	checkshape result
1511c7e9	20	checknbshapes result -vertex 4 -edge 4 -wire 1 -face 1 -shell 2 -solid 0 -compsolid 0 -compound 1 -shape 13
3bea4c16	21	set 2viewer 0
3bea4c16	22