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

pload QAcommands

restore [locate_data_file bug27720_BSpline.brep] a

set viewname "right"

top
clear

OCC27341 result a ${viewname}
build3d result

fit

checkprops result -l 0.841499
checknbshapes result -vertex 92 -edge 46

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