puts "==================================================================" puts "OCC30940: BRepFilletAPI_MakeFillet algorithm fails on closed shell" puts "==================================================================" puts "" beziercurve q 4 0 0 0 10 0 0 0 10 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.5 q_1 0.5 q_2 0.5 q_3 checkshape result checknbshapes result -face 8 -edge 14 -vertex 6 set tolres [checkmaxtol result] if { ${tolres} > 1.e-4} { puts "Error: bad tolerance of result" } checkprops result -v 147.953 -deps 1.e-5