#
# prepare the bormann strain map
#
awk '{print $1,$2,$3*1.e9}' ../bormann/exx.dat > exx.dat
xyz2grd exx.dat -Gjunk.grd -I0.02 `grdinfo grad.grd -I0.1/0.1` -r -diNaN
grdsample junk.grd -nl+t.1 -I.01 `grdinfo grad.grd -I0.1/0.1` -r -Gmask.grd
surface exx.dat -I.01 `grdinfo grad.grd -I0.1/0.1` -T.5  -r -Gsurf.grd -V
grdmath surf.grd mask.grd OR = tmp.grd
grdsample tmp.grd `grdinfo grad.grd -I0.1/0.1` -I0.00833333/0.00833333 -r -Gbormann_hammond_exx.grd
#
awk '{print $1,$2,$3*1.e9}' ../bormann/eyy.dat > eyy.dat
xyz2grd eyy.dat -Gjunk.grd -I0.02 `grdinfo grad.grd -I0.1/0.1` -r -diNaN
grdsample junk.grd -nl+t.1 -I.01 `grdinfo grad.grd -I0.1/0.1` -r -Gmask.grd
surface eyy.dat -I.01 `grdinfo grad.grd -I0.1/0.1` -T.5  -r -Gsurf.grd -V
grdmath surf.grd mask.grd OR = tmp.grd
grdsample tmp.grd `grdinfo grad.grd -I0.1/0.1` -I0.00833333/0.00833333 -r -Gbormann_hammond_eyy.grd
#
awk '{print $1,$2,$3*1.e9}' ../bormann/exy.dat > exy.dat
xyz2grd exy.dat -Gjunk.grd -I0.02 `grdinfo grad.grd -I0.1/0.1` -r -diNaN
grdsample junk.grd -nl+t.1 -I.01 `grdinfo grad.grd -I0.1/0.1` -r -Gmask.grd
surface exy.dat -I.01 `grdinfo grad.grd -I0.1/0.1` -T.5  -r -Gsurf.grd -V
grdmath surf.grd mask.grd OR = tmp.grd
grdsample tmp.grd `grdinfo grad.grd -I0.1/0.1` -I0.00833333/0.00833333 -r -Gbormann_hammond_exy.grd
#
#  clean up
#
rm surf.grd mask.grd junk.grd exx.dat eyy.dat exy.dat tmp.grd