puts "============"
puts "OCC24391"
puts "============"
puts ""
#######################################################################
#  Erased AIS object can not be displayed in AIS_InteractiveContext 
#  after AIS_InteractiveContext::Remove
#######################################################################

pload VISUALLIZATION
vinit
box a 1 1 1
vdisplay a
verase a
vremove -context a
vdisplay a
vfit

vaspects -setwidth 5
vmoveto 204 205
if {  "[vreadpixel 204 205 rgb name]" != "CYAN1"  } {
   puts "Error : Erased object is not displayed after its removing."
}

set only_screen 1