--- /dev/null
+puts "##################################################"
+puts "0024097: BRepAlgoAPI_Section returns wrong result"
+puts "##################################################"
+
+# load and check faces
+restore [locate_data_file bug24097_face1.brep] a
+tolerance a
+checkshape a
+
+restore [locate_data_file bug24097_face2.brep] b
+tolerance b
+checkshape b
+
+# build section
+bsection result a b
+
+# result should be single open edge with length 0.125
+checknbshapes result -vertex 2 -edge 1
+checkmaxtol result 0.0001
+
+if { [regexp {Mass\s*:\s*([0-9.e+-]*)} [lprops result] dummy length] } {
+ checkreal "Length of the section" $length 0.125 0.0001 0.1
+} else {
+ puts "Error: cannot get length of result!"
+}
+
+# make snapshot
+vinit Driver1/Viewer1/View1
+vclear
+eval vdisplay result [explode result v]
+vfit
+vdisplay a b
+vdump $imagedir/${test_image}.png