#! /bin/csh -f
#
# Shellscript to create Postscript plot of data in grd file
# Created by macro mbm_grdplot
#
# This shellscript created by following command line:
# mbm_grdplot -I UpperCanyonTopoMB.grd -O FigLocMAUVJuneSeaTest_psA -LMBARI Mapping AUV June 2004 Sea Tests:Topography (m) -R-121:56/-121:48/36:45.5/36:50 -G5 -D0/1 -A2 -V -MXW1p -MXM -MXIMAUV_June_Nav.xy -V
#
# Define shell variables used in this script:
set PS_FILE         = FigLocMAUVJuneSeaTest_psA.ps
set CPT_FILE        = FigLocMAUVJuneSeaTest_psA.cpt
set MAP_PROJECTION  = m
set MAP_SCALE       = 53.616
set MAP_REGION      = -121:56/-121:48/36:45.5/36:50
set X_OFFSET        = 1.9256
set Y_OFFSET        = 2
#
# Save existing GMT defaults
echo Saving GMT defaults...
gmtdefaults -L > gmtdefaults$$
#
# Set new GMT defaults
echo Setting new GMT defaults...
gmtset MEASURE_UNIT inch
gmtset PAPER_MEDIA archA+
gmtset ANOT_FONT Helvetica
gmtset LABEL_FONT Helvetica
gmtset HEADER_FONT Helvetica
gmtset ANOT_FONT_SIZE 8
gmtset LABEL_FONT_SIZE 8
gmtset HEADER_FONT_SIZE 10
gmtset FRAME_WIDTH 0.075
gmtset TICK_LENGTH 0.075
gmtset PAGE_ORIENTATION LANDSCAPE
gmtset COLOR_BACKGROUND 0/0/0
gmtset COLOR_FOREGROUND 255/255/255
gmtset COLOR_NAN 255/255/255
gmtset DEGREE_FORMAT 3
#
# Make color pallette table file
echo Making color pallette table file...
echo   -750  37  57 175   -675  40 127 251 > $CPT_FILE
echo   -675  40 127 251   -600  50 190 255 >> $CPT_FILE
echo   -600  50 190 255   -525 106 235 255 >> $CPT_FILE
echo   -525 106 235 255   -450 138 236 174 >> $CPT_FILE
echo   -450 138 236 174   -375 205 255 162 >> $CPT_FILE
echo   -375 205 255 162   -300 240 236 121 >> $CPT_FILE
echo   -300 240 236 121   -225 255 189  87 >> $CPT_FILE
echo   -225 255 189  87   -150 255 161  68 >> $CPT_FILE
echo   -150 255 161  68    -75 255 186 133 >> $CPT_FILE
echo    -75 255 186 133      0 255 255 255 >> $CPT_FILE
#
# Define data files to be plotted:
set DATA_FILE        = UpperCanyonTopoMB.grd
set INTENSITY_FILE   = 
#
# Get slope array
echo Getting slope array...
echo Running grdgradient to get x component of the gradient...
grdgradient $DATA_FILE -A90 -G$DATA_FILE.drvx -M
echo Running grdgradient to get y component of the gradient...
grdgradient $DATA_FILE -A0 -G$DATA_FILE.drvy -M
echo Running grdmath to get slope magnitude...
grdmath $DATA_FILE.drvx 2.0 POW \
	$DATA_FILE.drvy 2.0 POW ADD SQRT \
	-2 MUL \
	= $DATA_FILE.slope
/bin/rm -f $DATA_FILE.drvx $DATA_FILE.drvy 
#
# Make color image
echo Running grdimage...
grdimage $DATA_FILE -J$MAP_PROJECTION$MAP_SCALE \
	-R$MAP_REGION -C$CPT_FILE \
	-I$DATA_FILE.slope \
	-X$X_OFFSET -Y$Y_OFFSET -K -V >! $PS_FILE
#
# Make xy data plot
echo Running psxy...
psxy MAUV_June_Nav.xy \
	-J$MAP_PROJECTION$MAP_SCALE \
	-R$MAP_REGION \
	-M \
	-W1p \
	-K -O -V >> $PS_FILE
#
# Make color scale
echo Running psscale...
psscale -C$CPT_FILE \
	-D3.5744/-0.5000/7.1487/0.1500h \
	-B":Topography (m):" \
	-K -O -V >> $PS_FILE
#
# Make basemap
echo Running psbasemap...
psbasemap -J$MAP_PROJECTION$MAP_SCALE \
	-R$MAP_REGION \
	-B1m/1m:."MBARI Mapping AUV June 2004 Sea Tests": \
	-O -V >> $PS_FILE
#
# Delete surplus files
echo Deleting surplus files...
/bin/rm -f $CPT_FILE
#
# Reset GMT default fonts
echo Resetting GMT fonts...
/bin/mv gmtdefaults$$ .gmtdefaults
#
# Run gv
echo Running gv in background...
gv -landscape -media BBox FigLocMAUVJuneSeaTest_psA.ps &
#
# All done!
echo All done!