mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-21 10:13:43 +03:00
5ae01c8551
Test for sewing command were updated to check reference information. Commands for testing were moved to the file src/DrawResources/CheckCommands.tcl Documentation overview was updated.
23 lines
604 B
Plaintext
Executable File
23 lines
604 B
Plaintext
Executable File
puts "========================"
|
|
puts "OCC22500"
|
|
puts "========================"
|
|
puts ""
|
|
#######################################################################
|
|
# Sewing creates invalid shape
|
|
#######################################################################
|
|
|
|
set BugNumber OCC22500
|
|
|
|
restore [locate_data_file OCC22500-bug602badsewing.brep] a
|
|
|
|
if { [catch {sewing result 0.01 a} catch_result] } {
|
|
puts "Faulty ${BugNumber} : function Sewing works wrongly"
|
|
}
|
|
|
|
checkmaxtol result 4.3455205172376901e-006
|
|
checknbshapes result -shell 1
|
|
checkfreebounds result 28
|
|
|
|
set square 0.0363594
|
|
set 3dviewer 0
|