puts "============"
puts "OCC27341"
puts "============"
puts ""
######################################################
# Incorrect exact HLR results
######################################################

pload QAcommands

restore [locate_data_file bug27341_hlrsave.brep] a

set viewname "bottom"

smallview
top
clear

OCC27341 result a ${viewname}
build3d result

fit

checkprops result -l 8.40409
checknbshapes result -vertex 90 -edge 45

checkview -screenshot -2d -path ${imagedir}/${test_image}.png