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

puts "================"
puts "OCC29964: Bad arc discretization"
puts "================"
puts ""

set BugNumber OCC29964

restore [locate_data_file bug29964_partition.brep] a

explode a f
compound a_5 a_6 a_9 a_10 result
donly result

isos result 0
triangles result
top
fit

set tolerances    {0.1 0.01 0.001}
set ref_triangles {15 33 318}
set ref_nodes     {23 41 326}

for {set i 0} {$i < 3} {incr i} {
  tclean a
  incmesh result [lindex ${tolerances} ${i}] -a 1
  fit

  checkview -screenshot -2d -path ${imagedir}/${test_image}_${i}.png
  checktrinfo result -tri [lindex ${ref_triangles} ${i}] -nod [lindex ${ref_nodes} ${i}]
}
Commit	Line	Data
6c27a5d9	1	puts "================"
	2	puts "OCC29964: Bad arc discretization"
	3	puts "================"
	4	puts ""
	5
	6	set BugNumber OCC29964
	7
	8	restore [locate_data_file bug29964_partition.brep] a
	9
	10	explode a f
	11	compound a_5 a_6 a_9 a_10 result
	12	donly result
	13
	14	isos result 0
	15	triangles result
	16	top
	17	fit
	18
	19	set tolerances {0.1 0.01 0.001}
	20	set ref_triangles {15 33 318}
	21	set ref_nodes {23 41 326}
	22
	23	for {set i 0} {$i < 3} {incr i} {
	24	tclean a
	25	incmesh result [lindex ${tolerances} ${i}] -a 1
	26	fit
	27
	28	checkview -screenshot -2d -path ${imagedir}/${test_image}_${i}.png
	29	checktrinfo result -tri [lindex ${ref_triangles} ${i}] -nod [lindex ${ref_nodes} ${i}]
	30	}