#!/bin/sh
O="lab4.ps"
D=`sed -n 'p' ./pathfile`
rm .gmtcommands .gmtdefaults
gmtset	MEASURE_UNIT inch		#PAPER_WIDTH 8.5
gmtset	BASEMAP_TYPE PLAIN		DEGREE_FORMAT 2
gmtset	LABEL_FONT_SIZE 6		FRAME_PEN 3
gmtset	ANOT_FONT_SIZE 6		ANOT_OFFSET 0.075
gmtset	TICK_PEN 3			TICK_LENGTH -0.08
cat 					<< END			> cpt
B	215	205	155
60	215	205	155	400	100	140	100
F	100	140	100
END

F="-R-118:40/-117:45/33:40/34:20 -JM6.5	-V -K -P"
if [ ! -f $O.tmp ]; then
grdimage $F -X1 -Y3 -Ccpt $D/topo/03.grd -I$D/topo/03i.grd	> $O.tmp; fi
cat					$O.tmp			> $O
pscoast	$F -O -W3 -S225/255/255 -Df				>> $O
psxy	$F -O -W8 -M			$D/cal_faults.xy	>> $O
psxy	$F -O -W1 -M			$D/scal_roads.xy	>> $O
psxy	$F -O -W1 -L -G255/0/0 -Sd.05	$D/shw/shw			>> $O
psxy	$F -O -W6/255 -Sc		$D/shw/shw2			>> $O
psbasemap $F -O -Bf1ma10mNESW -Lfx3.25/-1.1/34/20		>> $O

F="-R0/11/0/11 -Jx1 -V -K -O -N"
pstext	$F -Y-1.3			<< END			>> $O # title
3.25 0.80 14 0  0 2 Boreholes and Average
3.25 0.50 14 0  0 2 Shear Wave Velocity
0.10 1.40  9 0 30 1 Geoffrey P. Ely
0.95 1.40  9 0 30 1 regenerated by J.Mount 12/12/05
5.15 0.80  9 0  0 2 Velocity
5.15 0.65  9 0  0 2 (m/s)
5.00 0.00  8 0  0 2 200
5.30 0.00  8 0  0 2 400
5.60 0.00  8 0  0 2 800
5.90 0.00  8 0  0 2 1600
0.34 0.35 16 0  0 6 N
END
psxy	$F -L -W3/0 -Sc			<< END			>> $O
5.00 0.20 0.10
5.30 0.25 0.20
5.60 0.35 0.40
5.90 0.55 0.80
END
psxy 	$F -W3 -L -G0	  		<< END			>> $O
0.34 0.52
0.38 0.50
0.36 0.58
0.34 0.70
0.34 0.02
0.30 0.00
0.31 0.18
0.34 0.20 
END
cat					$D/ics.def		>> $O
psxy	$F -Sc1		<< END	| sed 's/C4/ICSbox/'		>> $O
6.40 6.90
END

F="-R-125/-113.5/32.5/43 -JM.7 -V -O"
psxy	$F -K -W3 -L -G255 -X0.6	$D/cal_rough.xy		>> $O
pstext	$F -K				<< END			>> $O
-120.4 38.7 9 -70 0 11 Cal
-120.4 38.8 9 -45 0 9 ifornia
END
psxy			$F -W3 -L	<< END			>> $O
-117.75	33.67
-117.75	34.33
-118.67	34.33
-118.67	33.67
END