puts "==========="
puts "OCC22912"
puts "==========="
puts ""
########################################################################################################################
# After calling AIS_InteractiveContext::UnsetColor objects are drawn with the same color when transparency is changed
########################################################################################################################

restore [locate_data_file bug22912_p.brep] p
explode p
vinit
vdisplay p_1
vdisplay p_2
vfit
vsetdispmode p_1 1
vsetdispmode p_2 1
vsetcolor p_1 red
vsetcolor p_2 green
vunsetcolor p_1
vunsetcolor p_2
vsetcolor p_1 red
vsetcolor p_2 green
vsettransparency p_1 0.5
vsettransparency p_1 0

checkcolor 120 150 0.831 0.000 0.000
checkcolor 180 273 0.000 0.753 0.000

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