puts "============"
puts "CR6987"
puts "============"
puts ""
#######################################################################
#  Impossible to change edge line type in 3D View
#######################################################################

pload VISUALIZATION

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

vinit
box b 1 1 1
vdisplay b
vfit
vsetdispmode b 1
vsetedgetype b -type DASH -color 10 255 10
vdump $anImage1

vsetinteriorstyle b EMPTY
vdump $anImage2

vsetinteriorstyle b SOLID
vunsetedgetype b
vdump $anImage3


