g.list rast
d.mon x0
d.mon sel=x0
d.erase
d.rast ansi.asp.400      
d.rast ansi.accum
d.rast ansi.asp.40
r.support 
d.rast ansi.asp.40
g.list rast;r.support 
cd $LOCATION
ls -la
ls -la cell_misc
g.list rast;r.support 
ls -la cell_misc
exit
d.mon sel=x0
d.rats ansi.elev
d.rast ansi.elev
d.erase
d.rast ansi.elev
d.mon stop=x0
d.mon x0
d.rast ansi.elev
g.list r
d.rast ansi.sand
d.rast ansi.mach
d.rast ansi.ansi.wshd
d.rast ansi.wshd
d.rast.zoom 
d.mon stop=x0
exit
