mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-08-10 08:19:37 +08:00
aml
e1ed38e054
Method for preanalysis of input data added (CheckInputData). Now it is possible to work with Error() function, which return error code. Extended output support for all offset commands added. Test-cases for issue #26556
49 lines
1023 B
Plaintext
Executable File
49 lines
1023 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
|
|
|
|
set nb_v_good 10
|
|
set nb_e_good 15
|
|
set nb_w_good 7
|
|
set nb_f_good 7
|
|
set nb_sh_good 1
|
|
set nb_sol_good 1
|
|
set nb_compsol_good 0
|
|
set nb_compound_good 0
|
|
set nb_shape_good 41
|
|
|
|
set 2dviewer 0
|