mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-07-30 13:05:50 +03:00
37 lines
1.1 KiB
Plaintext
Executable File
37 lines
1.1 KiB
Plaintext
Executable File
puts "========================"
|
|
puts "OCC22804"
|
|
puts "========================"
|
|
puts ""
|
|
#######################################################################
|
|
# Sewing increases tolerance of vertices for redundant value.
|
|
#######################################################################
|
|
|
|
set BugNumber OCC22804
|
|
|
|
catch {pload XDE}
|
|
|
|
restore [locate_data_file OCC22804-sew_bug.brep] a
|
|
|
|
set tol 200
|
|
sewing result ${tol} a
|
|
|
|
set ToleranceList [tolerance result]
|
|
regexp {Tolerance MAX=([-0-9.+eE]+)} $ToleranceList full oTolerance
|
|
regexp {FACE[ \t]*: MAX=([-0-9.+eE]+)} $ToleranceList full FaceTolerance
|
|
regexp {EDGE[ \t]*: MAX=([-0-9.+eE]+)} $ToleranceList full EdgeTolerance
|
|
regexp {VERTEX[ \t]*: MAX=([-0-9.+eE]+)} $ToleranceList full VertexTolerance
|
|
|
|
set minTolerance ${EdgeTolerance}
|
|
if { ${minTolerance} > ${VertexTolerance} } {
|
|
set minTolerance $(VertexTolerance)
|
|
}
|
|
|
|
checkreal "Min tolerance" ${minTolerance} ${oTolerance} 0 0.001
|
|
checkmaxtol result -ref 2279.641703013865
|
|
checknbshapes result -shell 1
|
|
checkfreebounds result 5
|
|
|
|
checkprops result -s 1.80934e+009
|
|
checkshape result
|
|
checkview -display result -2d -path ${imagedir}/${test_image}.png
|