mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-07-05 23:31:17 +08:00
40 lines
965 B
Plaintext
Executable File
40 lines
965 B
Plaintext
Executable File
puts "TODO OCC25925 ALL: ERROR. offsetperform operation not done."
|
|
puts "TODO OCC25925 ALL: Tcl Exception:"
|
|
puts "TODO OCC25925 ALL: TEST INCOMPLETE"
|
|
|
|
puts "============"
|
|
puts "OCC5805"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results.
|
|
######################################################
|
|
|
|
set BugNumber OCC5805
|
|
|
|
restore [locate_data_file OCC5805.brep] a
|
|
|
|
decho off
|
|
set che_a [checkshape a]
|
|
decho on
|
|
|
|
if { [regexp {Faulty} $che_a] } {
|
|
puts "Faulty ${BugNumber} : checkshape is wrong for a"
|
|
}
|
|
|
|
explode a f
|
|
|
|
offsetparameter 1e-7 c a
|
|
offsetload a -1 a_6
|
|
|
|
if { [catch { offsetperform result } catch_result] } {
|
|
puts "Faulty ${BugNumber} : offsetshape is wrong"
|
|
}
|
|
|
|
checkmaxtol result -min_tol 1.
|
|
|
|
set square 1185.03
|
|
|
|
checknbshapes result -vertex 10 -edge 15 -wire 7 -face 7 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 41
|
|
set 2dviewer 0
|