if ( RAMA_PLOT .eq. "OFF" ) then
image from 3
image erase
graph
object = 1
scale = 1.0 
character scale = 0.01
read file >utils/rama.graph lwplot
exit
 set dial = 1 init
 set dial = 1 graph obj = 1 translate
 set dial = 4 graph obj = 1 scale equal
 set dial = 5 graph obj = 1 char
 set dial = 1 write
 set dial = 1 from = 1
image from erase
set vari RAMA_PLOT global char = "ON"
menu block UTILS item RAMACHAN button on
return
end_if

if ( RAMA_PLOT .eq. "ON" ) then
image from 3
image erase
set vari RAMA_PLOT global char = "OFF"
menu block UTILS item RAMACHAN button off
return
end_if