mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
b62b93ac30
Take face attributes into account to calculate 2d tolerance Adding test cases for this fix Correction according additional bug CR23832
51 lines
1.1 KiB
Plaintext
Executable File
51 lines
1.1 KiB
Plaintext
Executable File
puts "================"
|
|
puts "OCC22818"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################################################
|
|
# Wrong triangulation of Revolution surface with slice angle <= 180 degree
|
|
######################################################################################
|
|
|
|
set BugNumber OCC22818
|
|
|
|
pcone result 10 0 20 180
|
|
incmesh result 0.1
|
|
triangles result
|
|
isos result 0
|
|
|
|
checkshape result
|
|
|
|
set square 708.32
|
|
|
|
set nb_v_good 4
|
|
set nb_e_good 7
|
|
set nb_w_good 4
|
|
set nb_f_good 4
|
|
set nb_sh_good 1
|
|
set nb_sol_good 1
|
|
set nb_compsol_good 0
|
|
set nb_compound_good 0
|
|
set nb_shape_good 21
|
|
|
|
vinit
|
|
vdisplay result
|
|
vsetdispmode 1
|
|
vfit
|
|
vzfit
|
|
|
|
# relative tolerance (%)
|
|
set rel_tol 1
|
|
set area_eps 0
|
|
#
|
|
puts "\nChecking triangulation area (triarea command)..."
|
|
set rel_err [expr abs([CheckTriArea result $area_eps])]
|
|
if { $rel_err > $rel_tol } {
|
|
puts "Error : area by triangles differs from the actual area by $rel_err %"
|
|
} else {
|
|
if { $rel_tol > 1 && $rel_tol < 100 } {
|
|
puts "Error: Improvement: The current area difference is $rel_err instead of $rel_tol"
|
|
}
|
|
}
|
|
|
|
set only_screen 1
|