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

puts "============"
puts "CR25378"
puts "============"
puts ""
###################################################################################
# Building of triangulation for distored surfaces can take very long using BRepMesh_IncrementalMesh
###################################################################################

restore [locate_data_file bug25378_Blower_bad.brep] b
trinfo b

tclean b
set t_001 [expr [lindex [time {incmesh b 0.001 -min 1}] 0]/1000000]
puts "t_001=${t_001}"
trinfo b

if { [regexp {Debug mode} [dversion]] } {
    set max_t_001 30
} else {
  if { [regexp {Windows} [dversion]] } {
    set max_t_001 10
  } else {
    set max_t_001 15
  }
}

set tol_percent 0.05

checktime ${t_001} ${max_t_001} ${tol_percent} "3. Time of building of triangulation "
Commit	Line	Data
74da0216	1	puts "============"
	2	puts "CR25378"
	3	puts "============"
	4	puts ""
	5	###################################################################################
	6	# Building of triangulation for distored surfaces can take very long using BRepMesh_IncrementalMesh
	7	###################################################################################
	8
	9	restore [locate_data_file bug25378_Blower_bad.brep] b
	10	trinfo b
	11
	12	tclean b
	13	set t_001 [expr [lindex [time {incmesh b 0.001 -min 1}] 0]/1000000]
	14	puts "t_001=${t_001}"
	15	trinfo b
	16
	17	if { [regexp {Debug mode} [dversion]] } {
	18	set max_t_001 30
	19	} else {
	20	if { [regexp {Windows} [dversion]] } {
	21	set max_t_001 10
	22	} else {
9aa684ed	23	set max_t_001 15
74da0216	24	}
	25	}
	26
	27	set tol_percent 0.05
	28
	29	checktime ${t_001} ${max_t_001} ${tol_percent} "3. Time of building of triangulation "