puts "============"
puts "PRO19626"
puts "============"

restore [locate_data_file pro19626a.brep] a 
checkshape a
restore [locate_data_file pro19626b.brep] b
checkshape b

bsection result a b

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

checkprops result -l 174.597 
checkshape result 
checkview -display result -2d -path ${imagedir}/${test_image}.png