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


puts "========"                                                                                   
puts "BUC60971"
puts "CASE 2"                                                                                   
puts "========"                                                                                   
puts ""                                                                                           

restore [locate_data_file buc60971.brep] a 
explode a
checkshape a_1
checkshape a_2

bfuse result a_2 a_3
set square 93698.1
set 2dviewer 0
Commit	Line	Data
0e94a94e	1
	2	puts "========"
	3	puts "BUC60971"
	4	puts "CASE 2"
	5	puts "========"
	6	puts ""
	7
	8	restore [locate_data_file buc60971.brep] a
	9	explode a
352ffd73	10	checkshape a_1
352ffd73	11	checkshape a_2
0e94a94e	12
	13	bfuse result a_2 a_3
	14	set square 93698.1
	15	set 2dviewer 0