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

pload QAcommands

restore [locate_data_file bug27720_BSpline.brep] a

set viewname "left"

top
clear

OCC27341 result a ${viewname}
build3d result

fit

checkprops result -l 0.820309
checknbshapes result -vertex 74 -edge 37

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