puts "============"
puts "OCC27720"
puts "============"
puts ""
######################################################
# HLRBrep_Algo BSpline missing edges
######################################################

pload QAcommands

restore [locate_data_file bug27720_BSpline.brep] a

set viewname "top"

top
clear

OCC27341 result a ${viewname}
build3d result

fit

checkprops result -l 0.980943
checknbshapes result -vertex 58 -edge 29

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