Adding test cases for this fix
Handle(BRepBlend_AppFunc) TheFunc
= new (BRepBlend_AppFunc)(lin, Func, tolapp3d, 1.e-5);
- Standard_Integer Degmax = 20, Segmax = 100;
+ Standard_Integer Degmax = 20, Segmax = 5000;
BRepBlend_AppSurface approx (TheFunc,
lin->Point(1).Parameter(),
lin->Point(lin->NbPoints()).Parameter(),
--- /dev/null
+puts "============"
+puts "CR23651"
+puts "============"
+puts ""
+###############################
+## Exception on fillet construction between NURBS and surface of revolution
+###############################
+
+restore [locate_data_file bug23651_turbine_shell_one_edge.brep] s
+explode s e
+blend result s 1 s_4
+
+set 3dviewer 1
--- /dev/null
+puts "============"
+puts "CR23651"
+puts "============"
+puts ""
+###############################
+## Exception on fillet construction between NURBS and surface of revolution
+###############################
+
+restore [locate_data_file bug23651_turbine_shell_one_edge.brep ] a
+explode a e
+
+mkevol result a
+updatevol a_4 0. 1.5 0.05 1 0.45 1 0.5 1.5 0.55 2 0.95 2 1. 1.5
+buildevol
+
+set 3dviewer 1