mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-08 18:40:55 +03:00
4798010403
Fix for bug 0024174: [regression] BRepBuilderAPI_Sewing returns result with very high tolerance Test script for CR24174 Test cases for issue CR24174 Small correction of test cases for issue CR24174
42 lines
978 B
Plaintext
42 lines
978 B
Plaintext
puts "========================"
|
|
puts "OCC24174"
|
|
puts "========================"
|
|
puts ""
|
|
#######################################################################
|
|
# [regression] BRepBuilderAPI_Sewing returns result with very high tolerance
|
|
#######################################################################
|
|
|
|
pload XSDRAW
|
|
|
|
restore [locate_data_file bug24174_stitch.brep] a
|
|
|
|
sewing result 0.1 a
|
|
|
|
# 0
|
|
set log_1 [tolmax a]
|
|
regexp {max tol = ([-0-9.+eE]+)} ${log_1} full MaxTolerance_a
|
|
set CMP_TOL ${MaxTolerance_a}
|
|
|
|
# 1
|
|
checkshape result
|
|
|
|
# 2
|
|
set log_2 [tolmax result]
|
|
regexp {max tol = ([-0-9.+eE]+)} ${log_2} full MaxTolerance_result
|
|
if { ${MaxTolerance_result} > ${CMP_TOL} } {
|
|
puts "Error: invalid tolerance"
|
|
}
|
|
|
|
# 3
|
|
freebounds $result 0
|
|
set s [explode result_c e]
|
|
|
|
set Number [ llength ${s} ]
|
|
puts "Number of free edges is ${Number}"
|
|
set Number_Free_Edges 9
|
|
if { ${Number} != ${Number_Free_Edges} } {
|
|
puts "Error : Number of free edges is ${Number}"
|
|
}
|
|
|
|
set 2dviewer 1
|