[occt.git] / tests / bugs / modalg_5 / bug25354_14

puts "============"
puts "OCC25354"
puts "============"
puts ""
#######################################################################
# Intersection operation
#######################################################################

# Case 14

restore [locate_data_file bug25354_f1.brep] b1

tcopy b1 b2
ttranslate b2 3 4  0

bop b1 b2
bopsection result

set length 26

checknbshapes result -vertex 4 -edge 4 -wire 0 -face 0 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 9
set 2dviewer 1
Commit	Line	Data
90a94855	1	puts "============"
	2	puts "OCC25354"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# Intersection operation
	7	#######################################################################
	8
	9	# Case 14
	10
	11	restore [locate_data_file bug25354_f1.brep] b1
	12
	13	tcopy b1 b2
	14	ttranslate b2 3 4 0
	15
	16	bop b1 b2
	17	bopsection result
	18
	19	set length 26
	20
a4eba920	21	checknbshapes result -vertex 4 -edge 4 -wire 0 -face 0 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 9
90a94855	22	set 2dviewer 1