#!/bin/csh

#  Draw basemap
#  ------------
pscoast -Jm3.56287375916069 -R-124.7311648/-122.7608452/39.6210608/41.0621092 \
-Ba1.0f10mwSnE \
-W3/0/0/0 -Na/1 -S153/255/255 \
-Df -Ir/1/114/187/243 \
-Lf-124.233316/39.87651938/39.87651938/50 \
-G230/225/200 -P -K >! mendo.ps

#  Calif hiways
#  ------------
psxy /attic/mapdata/ca_hiwys.main.asc \
-: -Jm -R -MS -W3/102/102/102 -O -K \
>> mendo.ps

#  Nevada faults
#  -------------
psxy /attic/mapdata/nevada.car \
-: -Jm -R -MS -W3/255/102/102 -O -K \
>> mendo.ps

#  Calif faults
#  ------------
psxy /attic/mapdata/Jennings_faults.car \
-: -Jm -R -MS -W3/255/102/102 -O -K \
>> mendo.ps

#  Velocity vectors
#  ----------------
psvelomeca << EOT -R \
-W1/255/0/63 -G70/100/190 \
-Se0.0333333333333333/.95/0 -B  \
-Jm -A0.01/0.12/0.03 -O -K \
>> mendo.ps
-123.878407	40.543643	0.00	0.00	0.00	0.00	0.0000	mendo bald jes
-123.839653	40.182030	0.00	0.00	0.00	0.00	0.0000	mendo bear but
-124.293316	40.497821	0.00	0.00	0.00	0.00	0.0000	mendo bear rd2
-124.293306	40.497806	0.00	0.00	0.00	0.00	0.0000	mendo bear2rm1
-124.293306	40.497806	0.00	0.00	0.00	0.00	0.0000	mendo bear2rm5
-123.812482	40.429176	0.00	0.00	0.00	0.00	0.0000	mendo chalkyrk
-124.003357	40.014074	0.00	0.00	0.00	0.00	0.0000	mendo chemise 
-123.512778	40.538250	0.00	0.00	0.00	0.00	0.0000	mendo cold rm2
-123.512778	40.538250	0.00	0.00	0.00	0.00	0.0000	mendo coldncer
-124.264842	40.256931	0.00	0.00	0.00	0.00	0.0000	mendo cooskie 
-123.976669	40.306500	0.00	0.00	0.00	0.00	0.0000	mendo grasshop
-123.976667	40.306500	0.00	0.00	0.00	0.00	0.0000	mendo grassrm2
-123.262069	40.260309	0.00	0.00	0.00	0.00	0.0000	mendo horse rd
-123.881464	40.669096	0.00	0.00	0.00	0.00	0.0000	mendo iaqua 2 
-123.468607	40.145526	0.00	0.00	0.00	0.00	0.0000	mendo ketten  
-124.123111	40.156955	0.00	0.00	0.00	0.00	0.0000	mendo king pk2
-124.123111	40.156955	0.00	0.00	0.00	0.00	0.0000	mendo king pk3
-124.123111	40.156944	0.00	0.00	0.00	0.00	0.0000	mendo kingncer
-123.553309	40.334076	0.00	0.00	0.00	0.00	0.0000	mendo mtlassic
-124.119386	40.417344	0.00	0.00	0.00	0.00	0.0000	mendo pierce 2
-124.118834	40.416491	0.00	0.00	0.00	0.00	0.0000	mendo pierceec
-123.198698	40.493121	0.00	0.00	0.00	0.00	0.0000	mendo plummer 
-123.198694	40.493111	0.00	0.00	0.00	0.00	0.0000	mendo plumusgs
-123.696377	40.579069	0.00	0.00	0.00	0.00	0.0000	mendo show rm1
-123.696250	40.578861	0.00	0.00	0.00	0.00	0.0000	mendo showerec
-123.512778	40.538250	0.00	0.00	0.00	0.00	0.0000	mendo springs 
-124.192560	40.630416	0.00	0.00	0.00	0.00	0.0000	mendo table   
-124.192560	40.630416	0.00	0.00	0.00	0.00	0.0000	mendo tablerm3
-123.691952	40.120232	0.00	0.00	0.00	0.00	0.0000	mendo weber   
EOT

#  Station dots
#  ------------
psxy << EOT -: -R -W5/51/51/255 -G255/255/255 \
-Jm -Sc0.07 -O -K \
>> mendo.ps
40.543643	-123.878407
40.182030	-123.839653
40.497821	-124.293316
40.497806	-124.293306
40.497806	-124.293306
40.429176	-123.812482
40.014074	-124.003357
40.538250	-123.512778
40.538250	-123.512778
40.256931	-124.264842
40.306500	-123.976669
40.306500	-123.976667
40.260309	-123.262069
40.669096	-123.881464
40.145526	-123.468607
40.156955	-124.123111
40.156955	-124.123111
40.156944	-124.123111
40.334076	-123.553309
40.417344	-124.119386
40.416491	-124.118834
40.493121	-123.198698
40.493111	-123.198694
40.579069	-123.696377
40.578861	-123.696250
40.538250	-123.512778
40.630416	-124.192560
40.630416	-124.192560
40.120232	-123.691952
EOT

#  Geodolite Lines
#  ---------------
psxy << EOT -: -R -W5/255/51/51 -MS \
-Jm -O \
>> mendo.ps
SEGMENT
40.543643   -123.878407   mendo bald jes
40.538250   -123.512778   mendo coldncer
SEGMENT
40.543643   -123.878407   mendo bald jes
40.669096   -123.881464   mendo iaqua 2 
SEGMENT
40.543643   -123.878407   mendo bald jes
40.334076   -123.553309   mendo mtlassic
SEGMENT
40.543643   -123.878407   mendo bald jes
40.417344   -124.119386   mendo pierce 2
SEGMENT
40.543643   -123.878407   mendo bald jes
40.579069   -123.696377   mendo show rm1
SEGMENT
40.543643   -123.878407   mendo bald jes
40.538250   -123.512778   mendo springs 
SEGMENT
40.182030   -123.839653   mendo bear but
40.014074   -124.003357   mendo chemise 
SEGMENT
40.182030   -123.839653   mendo bear but
40.306500   -123.976669   mendo grasshop
SEGMENT
40.182030   -123.839653   mendo bear but
40.306500   -123.976667   mendo grassrm2
SEGMENT
40.182030   -123.839653   mendo bear but
40.156955   -124.123111   mendo king pk2
SEGMENT
40.182030   -123.839653   mendo bear but
40.156955   -124.123111   mendo king pk3
SEGMENT
40.182030   -123.839653   mendo bear but
40.156944   -124.123111   mendo kingncer
SEGMENT
40.182030   -123.839653   mendo bear but
40.334076   -123.553309   mendo mtlassic
SEGMENT
40.182030   -123.839653   mendo bear but
40.120232   -123.691952   mendo weber   
SEGMENT
40.497821   -124.293316   mendo bear rd2
40.156955   -124.123111   mendo king pk2
SEGMENT
40.497821   -124.293316   mendo bear rd2
40.156944   -124.123111   mendo kingncer
SEGMENT
40.497821   -124.293316   mendo bear rd2
40.416491   -124.118834   mendo pierceec
SEGMENT
40.497821   -124.293316   mendo bear rd2
40.630416   -124.192560   mendo table   
SEGMENT
40.497821   -124.293316   mendo bear rd2
40.630416   -124.192560   mendo tablerm3
SEGMENT
40.497806   -124.293306   mendo bear2rm1
40.156955   -124.123111   mendo king pk3
SEGMENT
40.497806   -124.293306   mendo bear2rm1
40.416491   -124.118834   mendo pierceec
SEGMENT
40.497806   -124.293306   mendo bear2rm5
40.416491   -124.118834   mendo pierceec
SEGMENT
40.429176   -123.812482   mendo chalkyrk
40.538250   -123.512778   mendo coldncer
SEGMENT
40.429176   -123.812482   mendo chalkyrk
40.306500   -123.976669   mendo grasshop
SEGMENT
40.429176   -123.812482   mendo chalkyrk
40.334076   -123.553309   mendo mtlassic
SEGMENT
40.429176   -123.812482   mendo chalkyrk
40.579069   -123.696377   mendo show rm1
SEGMENT
40.429176   -123.812482   mendo chalkyrk
40.578861   -123.696250   mendo showerec
SEGMENT
40.429176   -123.812482   mendo chalkyrk
40.538250   -123.512778   mendo springs 
SEGMENT
40.014074   -124.003357   mendo chemise 
40.306500   -123.976669   mendo grasshop
SEGMENT
40.014074   -124.003357   mendo chemise 
40.156955   -124.123111   mendo king pk2
SEGMENT
40.014074   -124.003357   mendo chemise 
40.156955   -124.123111   mendo king pk3
SEGMENT
40.014074   -124.003357   mendo chemise 
40.156944   -124.123111   mendo kingncer
SEGMENT
40.014074   -124.003357   mendo chemise 
40.120232   -123.691952   mendo weber   
SEGMENT
40.538250   -123.512778   mendo cold rm2
40.334076   -123.553309   mendo mtlassic
SEGMENT
40.538250   -123.512778   mendo coldncer
40.334076   -123.553309   mendo mtlassic
SEGMENT
40.256931   -124.264842   mendo cooskie 
40.306500   -123.976669   mendo grasshop
SEGMENT
40.256931   -124.264842   mendo cooskie 
40.156955   -124.123111   mendo king pk2
SEGMENT
40.256931   -124.264842   mendo cooskie 
40.156955   -124.123111   mendo king pk3
SEGMENT
40.256931   -124.264842   mendo cooskie 
40.156944   -124.123111   mendo kingncer
SEGMENT
40.256931   -124.264842   mendo cooskie 
40.416491   -124.118834   mendo pierceec
SEGMENT
40.306500   -123.976669   mendo grasshop
40.156955   -124.123111   mendo king pk2
SEGMENT
40.306500   -123.976669   mendo grasshop
40.156955   -124.123111   mendo king pk3
SEGMENT
40.306500   -123.976669   mendo grasshop
40.156944   -124.123111   mendo kingncer
SEGMENT
40.306500   -123.976669   mendo grasshop
40.334076   -123.553309   mendo mtlassic
SEGMENT
40.306500   -123.976669   mendo grasshop
40.417344   -124.119386   mendo pierce 2
SEGMENT
40.306500   -123.976669   mendo grasshop
40.120232   -123.691952   mendo weber   
SEGMENT
40.306500   -123.976667   mendo grassrm2
40.120232   -123.691952   mendo weber   
SEGMENT
40.260309   -123.262069   mendo horse rd
40.145526   -123.468607   mendo ketten  
SEGMENT
40.260309   -123.262069   mendo horse rd
40.334076   -123.553309   mendo mtlassic
SEGMENT
40.260309   -123.262069   mendo horse rd
40.493121   -123.198698   mendo plummer 
SEGMENT
40.260309   -123.262069   mendo horse rd
40.493111   -123.198694   mendo plumusgs
SEGMENT
40.669096   -123.881464   mendo iaqua 2 
40.417344   -124.119386   mendo pierce 2
SEGMENT
40.669096   -123.881464   mendo iaqua 2 
40.579069   -123.696377   mendo show rm1
SEGMENT
40.145526   -123.468607   mendo ketten  
40.334076   -123.553309   mendo mtlassic
SEGMENT
40.145526   -123.468607   mendo ketten  
40.120232   -123.691952   mendo weber   
SEGMENT
40.156955   -124.123111   mendo king pk2
40.120232   -123.691952   mendo weber   
SEGMENT
40.156955   -124.123111   mendo king pk3
40.120232   -123.691952   mendo weber   
SEGMENT
40.156944   -124.123111   mendo kingncer
40.120232   -123.691952   mendo weber   
SEGMENT
40.334076   -123.553309   mendo mtlassic
40.538250   -123.512778   mendo springs 
SEGMENT
40.334076   -123.553309   mendo mtlassic
40.120232   -123.691952   mendo weber   
SEGMENT
40.417344   -124.119386   mendo pierce 2
40.630416   -124.192560   mendo table   
SEGMENT
40.417344   -124.119386   mendo pierce 2
40.630416   -124.192560   mendo tablerm3
SEGMENT
EOT