mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-09 18:50:54 +03:00
fb60057d23
Command tolmax was removed. Tcl command checkmaxtol is used now in test cases to check maximum tolerance. Reference values in test cases were updated.
22 lines
566 B
Plaintext
22 lines
566 B
Plaintext
puts "========================"
|
|
puts "OCC24174"
|
|
puts "========================"
|
|
puts ""
|
|
#######################################################################
|
|
# [regression] BRepBuilderAPI_Sewing returns result with very high tolerance
|
|
#######################################################################
|
|
|
|
pload XSDRAW
|
|
|
|
restore [locate_data_file bug24174_Comp1.brep] a
|
|
|
|
explode a
|
|
sewing result 0.1 a_1 a_2
|
|
|
|
checkshape result
|
|
checkmaxtol result -ref 0.076388434959049206 -source {a_1 a_2}
|
|
checknbshapes result -shell 1
|
|
checkfreebounds result 12
|
|
|
|
set 2dviewer 1
|