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

puts "========"
puts "OCC25612"
puts "========"
puts ""
######################################################################################
# Introduce possibility to disable adaptive reconfigutation of triangles in BRepMesh
######################################################################################

restore [locate_data_file bug25519_testtriangulation.brep] a

tclean a
incmesh a 0.01 -a 50
set bug_info [trinfo a]
set TNumber_1 [lindex $bug_info 3]
set NNumber_1 [lindex $bug_info 5]

tclean a
incmesh a 0.01 -a 50 -surf_def_off
set bug_info [trinfo a]
set TNumber_2 [lindex $bug_info 3]
set NNumber_2 [lindex $bug_info 5]

if {$TNumber_2 >= $TNumber_1} {
   puts "ERROR: OCC25612 is reproduced. Flag -surf_def_off does not work (triangles)."
}

if {$NNumber_2 >= $NNumber_1} {
   puts "ERROR: OCC25612 is reproduced. Flag -surf_def_off does not work (nodes)."
}
Commit	Line	Data
f43eff9f	1	puts "========"
	2	puts "OCC25612"
	3	puts "========"
	4	puts ""
	5	######################################################################################
	6	# Introduce possibility to disable adaptive reconfigutation of triangles in BRepMesh
	7	######################################################################################
	8
	9	restore [locate_data_file bug25519_testtriangulation.brep] a
	10
	11	tclean a
81093856	12	incmesh a 0.01 -a 50
f43eff9f	13	set bug_info [trinfo a]
	14	set TNumber_1 [lindex $bug_info 3]
	15	set NNumber_1 [lindex $bug_info 5]
	16
	17	tclean a
81093856	18	incmesh a 0.01 -a 50 -surf_def_off
f43eff9f	19	set bug_info [trinfo a]
	20	set TNumber_2 [lindex $bug_info 3]
	21	set NNumber_2 [lindex $bug_info 5]
	22
	23	if {$TNumber_2 >= $TNumber_1} {
	24	puts "ERROR: OCC25612 is reproduced. Flag -surf_def_off does not work (triangles)."
	25	}
	26
	27	if {$NNumber_2 >= $NNumber_1} {
	28	puts "ERROR: OCC25612 is reproduced. Flag -surf_def_off does not work (nodes)."
	29	}