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

puts "========================"
puts "BUC60744"
puts "========================"
puts ""

restore [locate_data_file buc60744a.brep] a 
restore [locate_data_file buc60744b.brep] b

bsection result a b

checkshape result

if {[lindex [checksection result] 4] != 2} {
  puts "Error: section is incomplete"
}

checkprops result -l 228.386

checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
a87752f3	1	puts "========================"
	2	puts "BUC60744"
	3	puts "========================"
	4	puts ""
	5
	6	restore [locate_data_file buc60744a.brep] a
	7	restore [locate_data_file buc60744b.brep] b
	8
a87752f3	9	bsection result a b
a87752f3	10
e45b5ff7	11	checkshape result
a87752f3	12
e45b5ff7	13	if {[lindex [checksection result] 4] != 2} {
e45b5ff7	14	puts "Error: section is incomplete"
a87752f3	15	}
a87752f3	16
e45b5ff7	17	checkprops result -l 228.386
e45b5ff7	18
5747059b	19	checkview -display result -2d -path ${imagedir}/${test_image}.png