set_plot,'ps'
device,filename='/afs/slac/u/ki/lances/idl/axis.ps'

device,ysize=8.5,/inches
device,xsize=7.0,/inches
device,yoffset=1.0,/inches

size=80.0

plot,[-size,size],[-size*8.5/7.0,size*8.5/7.0],/NODATA,/xstyle,/ystyle
a=findgen(10)
;plot,a

device,/close
END