#!/bin/sh
O="scal.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
-1	110	110	110	-.1	205	205	205
-.1	205	205	205	.8	255	255	255
END

F="-R-121/-115/32:30/35:30 -JM9 -V -K"
if [ ! -f $O.tmp ]; then
grdimage $F -X1 -Y2 $D/topo/18i2.grd -Ccpt			> $O.tmp; fi
cat					$O.tmp			> $O
pscoast	$F -O -W3 -S255 -Df -Na3/3				>> $O
psxy	$F -O -W4 -M			$D/cal_faults.xy	>> $O
psxy	$F -O -W1 -M			$D/scal_roads.xy	>> $O
pstext	$F -O				<< END			>> $O
-120.5 35.4 10 0 30 6 San Luis Obisbo East
-119.5 35.4 10 0 30 6 Bakersfield West
-118.5 35.4 10 0 30 6 Bakersfield East
-117.5 35.4 10 0 30 6 Trona West
-116.5 35.4 10 0 30 6 Trona East
-115.5 35.4 10 0 30 6 Kingman West
-120.5 34.9 10 0 30 6 Santa Maria East
-119.5 34.9 10 0 30 6 Los Angeles West
-118.5 34.9 10 0 30 6 Los Angeles East
-117.5 34.9 10 0 30 6 San Bernardino West
-116.5 34.9 10 0 30 6 San Bernardino East
-115.5 34.9 10 0 30 6 Needles West
-120.5 33.9 10 0 30 6 Santa Rosa Island East
-119.5 33.9 10 0 30 6 Long Beach West
-118.5 33.9 10 0 30 6 Long Beach East
-117.5 33.9 10 0 30 6 Santa Ana West
-116.5 33.9 10 0 30 6 Sanat Ana East
-115.5 33.9 10 0 30 6 Salton Sea West
-118.5 32.9 10 0 30 6 San Clemente Island East
-117.5 32.9 10 0 30 6 San Diego West
-116.5 32.9 10 0 30 6 San Diego East
-115.5 32.9 10 0 30 6 El Centro West
END
psbasemap $F -O -Bg1a1f5mWSNE -Lfx4.5/-.8/34/100		>> $O

F="-R0/11/0/11 -Jx1 -V -K -O -N"
pstext	$F -Y-1				<< END			>> $O # title
4.50 0.50 14 0  0 2 Reference Map
0.10 1.10  8 0 32 1 Geoffrey P. Ely
0.90 1.10  8 0 32 1 regenerated by J.Mount 12/12/05
1.84 0.35 14 0  0 6 N
END
psxy 	$F -W3 -L -G0  			<< END			>> $O
1.84 0.52
1.88 0.50
1.86 0.58
1.84 0.70
1.84 0.02
1.80 0.00
1.81 0.18
1.84 0.20 
END
cat					$D/ics.def		>> $O
psxy	$F -Sc1 -N << END | sed 's/C4/ICSbox/'			>> $O
7.2 0.7 10
END

F="-R-125/-113.5/32.5/43 -JM.7 -V -O"
psxy	$F -K -W3 -L -G255 -X2.25	$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
-115	32.5
-115	35.5
-121	35.5
-121	32.5
END