mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-09-08 14:17:06 +03:00
0025503: BRepMesh - IncrementalMesh always re-meshes the shape even if existing triangulation satisfies the given deflection
Test case for issue CR25503 Correction of test cases for issue CR25503
This commit is contained in:
19
tests/bugs/mesh/bug25503_1
Normal file
19
tests/bugs/mesh/bug25503_1
Normal file
@@ -0,0 +1,19 @@
|
||||
puts "============"
|
||||
puts "CR25503"
|
||||
puts "============"
|
||||
puts ""
|
||||
###################################################################################
|
||||
# BRepMesh - IncrementalMesh always re-meshes the shape even if existing triangulation satisfies the given deflection
|
||||
###################################################################################
|
||||
|
||||
puts "===> meshing segment of sphere"
|
||||
psphere a 100 -45 45 180
|
||||
puts ""
|
||||
puts "incmesh first time"
|
||||
set t1 [expr [lindex [time {incmesh a 0.003}] 0]/1000000]
|
||||
puts "spent $t1 sec"
|
||||
puts ""
|
||||
puts "incmesh second time"
|
||||
set t2 [expr [lindex [time {incmesh a 0.003}] 0]/1000000]
|
||||
puts "spent $t2 sec"
|
||||
if {$t2 != 0} {puts "Error: second time must be quicker"}
|
23
tests/bugs/mesh/bug25503_2
Executable file
23
tests/bugs/mesh/bug25503_2
Executable file
@@ -0,0 +1,23 @@
|
||||
puts "TODO CR25469 ALL: Error: second time must be quicker"
|
||||
|
||||
puts "============"
|
||||
puts "CR25503"
|
||||
puts "============"
|
||||
puts ""
|
||||
###################################################################################
|
||||
# BRepMesh - IncrementalMesh always re-meshes the shape even if existing triangulation satisfies the given deflection
|
||||
###################################################################################
|
||||
|
||||
puts ""
|
||||
puts "===> meshing full sphere"
|
||||
psphere a 100
|
||||
puts ""
|
||||
puts "incmesh first time"
|
||||
set t3 [expr [lindex [time {incmesh a 0.015}] 0]/1000000]
|
||||
puts "spent $t3 sec"
|
||||
puts ""
|
||||
puts "incmesh second time"
|
||||
set t4 [expr [lindex [time {incmesh a 0.015}] 0]/1000000]
|
||||
puts "spent $t4 sec"
|
||||
if {$t4 != 0} {puts "Error: second time must be quicker"}
|
||||
puts ""
|
@@ -1,6 +1,7 @@
|
||||
set TheFileName shading_109.brep
|
||||
if { [string compare ${command} "shading"] == 0 && [string compare ${group} "standard"] == 0} {
|
||||
#
|
||||
set bug_cross "OCC25503"
|
||||
set nbcross(All) 2
|
||||
} else {
|
||||
set bug_cross "OCC22687"
|
||||
set nbcross(All) 4
|
||||
|
Reference in New Issue
Block a user