[occt.git] / tests / bugs / modalg_7 / bug24319

puts "========"
puts "OCC24319"
puts "========"
puts ""
##################################
# Sewing makes a solid transparent
##################################

catch {pload XDE}

igesread [locate_data_file bug24421_Rohteil_Pmod.igs] s *

sewing r s

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

set x 370
set y 270
if { [checkcolor $x $y 0.78039216995239258 0.55294120311737061 0.094117648899555206] != 1 } {
  puts "Error: Sewing makes a solid transparent"
}
Commit	Line	Data
c2e47bdd	1	puts "========"
	2	puts "OCC24319"
	3	puts "========"
	4	puts ""
	5	##################################
	6	# Sewing makes a solid transparent
	7	##################################
	8
	9	catch {pload XDE}
	10
	11	igesread [locate_data_file bug24421_Rohteil_Pmod.igs] s *
	12
	13	sewing r s
	14
	15	checkview -display r -3d -path ${imagedir}/${test_image}.png
	16
	17	set x 370
	18	set y 270
	19	if { [checkcolor $x $y 0.78039216995239258 0.55294120311737061 0.094117648899555206] != 1 } {
	20	puts "Error: Sewing makes a solid transparent"
	21	}