[occt.git] / tests / bugs / modalg_2 / bug418_2


puts "========================"
puts " OCC418 "
puts "CTS20370"
puts "(case 2)"
puts "========================"
puts ""

restore [locate_data_file CTO904_cts20370-part.rle] a 
checkshape a

restore [locate_data_file cts20370-tool.rle] b 
checkshape b

bsection sec a b

bfuse result a b
checkshape -top result

set square 261265.
set 2dviewer 0
Commit	Line	Data
f1aa2b62	1
	2	puts "========================"
	3	puts " OCC418 "
	4	puts "CTS20370"
	5	puts "(case 2)"
	6	puts "========================"
	7	puts ""
	8
	9	restore [locate_data_file CTO904_cts20370-part.rle] a
352ffd73	10	checkshape a
f1aa2b62	11
f1aa2b62	12	restore [locate_data_file cts20370-tool.rle] b
352ffd73	13	checkshape b
f1aa2b62	14
	15	bsection sec a b
	16
	17	bfuse result a b
352ffd73	18	checkshape -top result
f1aa2b62	19
	20	set square 261265.
	21	set 2dviewer 0
	22