+puts "================================================================="
+puts "OCC30722: Modeling Algorithms - BRepExtrema_DistShapeShape computes wrong distances"
+puts "================================================================="
+puts ""
+
+restore [locate_data_file bug30722_1.brep] w
+restore [locate_data_file bug30722_2.brep] e
+
+explode w
+mkcurve c1 w_1
+mkcurve c2 e
+extrema c1 c2
+
+if { [isdraw ext_1] == 0 } {
+puts "Error: no solutions!"
+}
\ No newline at end of file