puts "=================================================================="
puts "OCC30940: BRepFilletAPI_MakeFillet algorithm fails on closed shell"
puts "=================================================================="
puts ""

beziercurve q 5  0 0 0  0 -10 0  50 50 0  -10 0 0  0 0 0
mkedge q q
wire q q
mkplane q q
prism q q 0 0 10
explode q e

blend result q 0.1 q_1 0.1 q_2 0.1 q_3

checkshape result

checknbshapes result -face 8 -edge 14 -vertex 8

set tolres [checkmaxtol result]

if { ${tolres} > 1.e-4} {
   puts "Error: bad tolerance of result"
}

checkprops result -v 1028.37 -deps 1.e-5
