mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-04 13:13:25 +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
559 B
Plaintext
Executable File
22 lines
559 B
Plaintext
Executable File
puts "========================"
|
|
puts "OCC22765"
|
|
puts "========================"
|
|
puts ""
|
|
#######################################################################
|
|
# Sewing produced invalid shape from attached compound with tolerance 0.1
|
|
#######################################################################
|
|
|
|
set BugNumber OCC22765
|
|
|
|
restore [locate_data_file OCC22765.brep] a
|
|
sewing result 0.1 a
|
|
|
|
checkshape result f
|
|
|
|
checkmaxtol result -ref 1.0000280013370991e-005
|
|
checknbshapes result -shell 1
|
|
checkfreebounds result 456
|
|
|
|
set square 0.0141287
|
|
set 3dviewer 1
|