
puts "================"
puts "BUC61048"
puts "OCC345"
puts "================"
puts ""
############################################
## Command sameparametr in DRAW hangs  on attached edge.
############################################

restore [locate_data_file OCC345.brep] result

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

