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

puts "========"
puts "OCC26664"
puts "========"
puts ""
#################################
# Triangulating a very small polygon fails
#################################

restore [locate_data_file bug26664_f.brep] a

#1
vinit
vsetdispmode 1
vdisplay a
vfit
vdump ${imagedir}/${casename}_1.png

#2
incmesh a 1e-4
vdisplay a
vdump ${imagedir}/${casename}_2.png

#3
set log2 [incmesh a 1e-4 -adaptive]
vdisplay a
vdump ${imagedir}/${casename}_3.png

if { [regexp "NoError" ${log2}] == 1 } {
   puts "OK : Triangulating a very small polygon is good"
} else {
   puts "Error : Triangulating a very small polygon fails"
}
Commit	Line	Data
e71669c6	1	puts "========"
	2	puts "OCC26664"
	3	puts "========"
	4	puts ""
	5	#################################
	6	# Triangulating a very small polygon fails
	7	#################################
	8
	9	restore [locate_data_file bug26664_f.brep] a
	10
	11	#1
	12	vinit
	13	vsetdispmode 1
	14	vdisplay a
	15	vfit
	16	vdump ${imagedir}/${casename}_1.png
	17
	18	#2
	19	incmesh a 1e-4
	20	vdisplay a
	21	vdump ${imagedir}/${casename}_2.png
	22
	23	#3
	24	set log2 [incmesh a 1e-4 -adaptive]
	25	vdisplay a
	26	vdump ${imagedir}/${casename}_3.png
	27
	28	if { [regexp "NoError" ${log2}] == 1 } {
	29	puts "OK : Triangulating a very small polygon is good"
	30	} else {
	31	puts "Error : Triangulating a very small polygon fails"
	32	}