--- /dev/null
+puts "================"
+puts "0031449: Mesh - BRepMesh works too long and produces many free nodes on a valid face"
+puts "================"
+puts ""
+
+pload XDE
+
+set aTmpFile ${imagedir}/${casename}.stp
+ReadStep D [locate_data_file bug31301.stp]
+WriteStep D ${aTmpFile}
+param xstep.cascade.unit M
+ReadStep Q ${aTmpFile}
+XShow Q
+vfit
+vsetdispmode 1
+
+XGetOneShape result Q
+checktrinfo result -tri 9025 -nod 6562
+
+checkview -screenshot -3d -path ${imagedir}/${test_image}.png
--- /dev/null
+puts "================"
+puts "0031449: Mesh - BRepMesh works too long and produces many free nodes on a valid face"
+puts "================"
+puts ""
+
+restore [locate_data_file bug31449_face_loopback_M.brep] result
+
+incmesh result 0.0001
+
+set info_good [tricheck result]
+if { [string compare $info_good "" ] != 0 } {
+ puts "Error : something wierd has been produced, like free nodes, or links"
+}
+
+checktrinfo result -tri 65 -nod 67
+
+checkview -display result -3d -path ${imagedir}/${test_image}.png
--- /dev/null
+puts "================"
+puts "0031449: Mesh - BRepMesh works too long and produces many free nodes on a valid face"
+puts "================"
+puts ""
+
+pload XDE
+
+set aTmpFile ${imagedir}/${casename}.stp
+ReadStep D [locate_data_file bug31301.stp]
+WriteStep D ${aTmpFile}
+param xstep.cascade.unit M
+ReadStep Q ${aTmpFile}
+XGetOneShape result Q
+
+incmesh result 0.00039624 -a 20 -min 0.0001 -parallel
+
+checktrinfo result -tri 7661 -nod 5810
+
+checkview -display result -3d -path ${imagedir}/${test_image}.png