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

puts "=========="
puts "OCC27959"
puts "=========="
puts ""
#######################################################################
# BRepMesh_Delaun produces mesh with gaps on internal edges
#######################################################################
# test for #27959: check that resulting mesh does not contain gaps.

restore [locate_data_file bug27959_ms.brep] result

tclean result
checkview -display result -3d -path ${imagedir}/${test_image}.png

set log [tricheck result]
if { [llength $log] != 0 } {
  puts "Error : Mesh contains gaps"
} else {
  puts "OK : Mesh produced without gaps"
}
Commit	Line	Data
df18769e	1	puts "=========="
	2	puts "OCC27959"
	3	puts "=========="
	4	puts ""
	5	#######################################################################
	6	# BRepMesh_Delaun produces mesh with gaps on internal edges
	7	#######################################################################
	8	# test for #27959: check that resulting mesh does not contain gaps.
	9
	10	restore [locate_data_file bug27959_ms.brep] result
	11
	12	tclean result
	13	checkview -display result -3d -path ${imagedir}/${test_image}.png
	14
	15	set log [tricheck result]
	16	if { [llength $log] != 0 } {
	17	puts "Error : Mesh contains gaps"
	18	} else {
	19	puts "OK : Mesh produced without gaps"
	20	}
	21