[occt.git] / tests / bugs / mesh / bug25503_2

puts "============"
puts "CR25503: BRepMesh - IncrementalMesh always re-meshes the shape even if existing triangulation satisfies the given deflection"
puts "============"
puts ""

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 ""
Commit	Line	Data
4a913f21	1	puts "============"
7bd071ed	2	puts "CR25503: BRepMesh - IncrementalMesh always re-meshes the shape even if existing triangulation satisfies the given deflection"
4a913f21	3	puts "============"
4a913f21	4	puts ""
4a913f21	5
	6	puts ""
	7	puts "===> meshing full sphere"
	8	psphere a 100
	9	puts ""
	10	puts "incmesh first time"
	11	set t3 [expr [lindex [time {incmesh a 0.015}] 0]/1000000]
	12	puts "spent $t3 sec"
	13	puts ""
	14	puts "incmesh second time"
	15	set t4 [expr [lindex [time {incmesh a 0.015}] 0]/1000000]
	16	puts "spent $t4 sec"
	17	if {$t4 != 0} {puts "Error: second time must be quicker"}
	18	puts ""