puts "========"
puts "OCC27536"
puts "========"
puts ""
##################################################################
puts "Visualization - incorrect behavior of zoom persisted objects"
##################################################################

set anImage1 $imagedir/${casename}_1.png
set anImage2 $imagedir/${casename}_2.png

vinit
vclear
vaxo

box b -50 -50 -50 100 100 100
vdisplay b -trsfPers zoom -trsfPersPos 0 0 0 -dispmode 1

vdump $anImage1

vinit View2 w=200 h=400
vaxo
vfit

# Check that box was't resized in small view
if {[vreadpixel 165 200 name] != "DARKGOLDENROD3 1"} {
  puts "ERROR: zoom persistent box is resized on view sizes changed!"
}

vdump $anImage2
