1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00

0024347: problem by tolerance of the distance of Face and Vertex

Added test case bugs/modalg_5/bug24347
This commit is contained in:
apn 2014-04-28 15:24:34 +04:00 committed by abv
parent 1a25084d99
commit 21761b6feb

View File

@ -0,0 +1,23 @@
puts "============"
puts "OCC24347"
puts "============"
puts ""
###########################################################
# Problem by tolerance of the distance of Face and Vertex
###########################################################
pload XDE
set checkvalue 2.72742879238428e-14
restore [locate_data_file bug24347_face.brep] f
vertex v 34.265509314637 0.1 0.73361964922719
settolerance f 4.e-6
distmini d1 f v
regexp {([-0-9.+eE]+)$} [dump d1_val] full distvalue
if { $distvalue != $checkvalue } {
puts "Error: distance is incorrect"
} else {
puts "OK: distance is correct"
}