[occt.git] / tests / bugs / modalg_5 / bug25270

puts "========="
puts "OCC25270"
puts "========="
puts ""
#####################################################################
# OCCT fails to calculate extrema between extruded surface and line
#####################################################################

restore [locate_data_file bug25270_face.brep] f
restore [locate_data_file bug25270_edge.brep] e

distmini result f e
regexp {([-0-9.+eE]+)} [dval result_val] full ddist
if { $ddist > 1.e-7 } {
  puts "Error: Extrema between extruded surface and line is incorrect $ddist"
} else {
  puts "OK: Extrema between extruded surface and line is correct $ddist"
}
Commit	Line	Data
2fa97a43	1	puts "========="
	2	puts "OCC25270"
	3	puts "========="
	4	puts ""
	5	#####################################################################
	6	# OCCT fails to calculate extrema between extruded surface and line
	7	#####################################################################
	8
	9	restore [locate_data_file bug25270_face.brep] f
	10	restore [locate_data_file bug25270_edge.brep] e
	11
	12	distmini result f e
	13	regexp {([-0-9.+eE]+)} [dval result_val] full ddist
	14	if { $ddist > 1.e-7 } {
	15	puts "Error: Extrema between extruded surface and line is incorrect $ddist"
	16	} else {
	17	puts "OK: Extrema between extruded surface and line is correct $ddist"
	18	}