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

puts "======="
puts "0030149: BRepMesh_Delaun: free triangle is left in the mesh after cleanup of auxiliary items"
puts "======="
puts ""

pload XDE 

stepread [locate_data_file bug30149_comb_bug.step] a *
renamevar a_1 result

tclean result
incmesh result 1

set info_bad [tricheck result]
if { [regexp "Not connected mesh inside face" $info_bad] } {
    puts "Error : Mesh contains free triangle"
}

checktrinfo result -tri 32 -nod 54

vinit
vtop
vsetdispmode 1
vdisplay result
vfit
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
060fc603	1	puts "======="
	2	puts "0030149: BRepMesh_Delaun: free triangle is left in the mesh after cleanup of auxiliary items"
	3	puts "======="
	4	puts ""
	5
	6	pload XDE
	7
	8	stepread [locate_data_file bug30149_comb_bug.step] a *
	9	renamevar a_1 result
	10
	11	tclean result
	12	incmesh result 1
	13
	14	set info_bad [tricheck result]
	15	if { [regexp "Not connected mesh inside face" $info_bad] } {
	16	puts "Error : Mesh contains free triangle"
	17	}
	18
	19	checktrinfo result -tri 32 -nod 54
	20
	21	vinit
	22	vtop
	23	vsetdispmode 1
	24	vdisplay result
	25	vfit
	26	checkview -screenshot -3d -path ${imagedir}/${test_image}.png