grah_file='grah_specs.sav'
om_file='last.sav'
restore,grah_file
restore,om_file
xr_k=[.4,330.]
yr_k=[2e-16,1e-12]
!p.multi=[0,2,1]
plot_oo,k,grah1_last,li=1,xr=xr_k,yr=yr_k
oplot,om_first,ssp
;
lev=grange(-1.,1.,20)*5e-6
contour,clip(fff_last,minmax(lev)),x,tt_last,/fill,lev=lev
END