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

puts "======="
puts "0029751: Incremental mesh produces different meshes for windows and linux (debian 8)"
puts "======="
puts ""

psphere sp 10
pcylinder b1 2 10
ttranslate b1 0 0 -10
bcut result sp b1
trotate result 0 0 0 1 0 0 45
incmesh result 0.1

vinit
vdefaults -autoTriang 0
vdisplay result
vsetinteriorstyle 1
vsetdispmode 1
vfit

set log [tricheck result]
if { [llength $log] != 0 } {
  puts "Error : Invalid mesh"
} else {
  puts "Mesh is OK"
}

checktrinfo result -tri 1013 -nod 578 -defl 0.1

checkview -screenshot -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
9d09a126	1	puts "======="
	2	puts "0029751: Incremental mesh produces different meshes for windows and linux (debian 8)"
	3	puts "======="
	4	puts ""
	5
	6	psphere sp 10
	7	pcylinder b1 2 10
	8	ttranslate b1 0 0 -10
	9	bcut result sp b1
	10	trotate result 0 0 0 1 0 0 45
	11	incmesh result 0.1
	12
	13	vinit
	14	vdefaults -autoTriang 0
	15	vdisplay result
	16	vsetinteriorstyle 1
	17	vsetdispmode 1
	18	vfit
	19
	20	set log [tricheck result]
	21	if { [llength $log] != 0 } {
	22	puts "Error : Invalid mesh"
	23	} else {
	24	puts "Mesh is OK"
	25	}
	26
	27	checktrinfo result -tri 1013 -nod 578 -defl 0.1
	28
	29	checkview -screenshot -3d -path ${imagedir}/${test_image}.png