#!/bin/csh

#  Draw basemap
#  ------------
gmtset ANOT_FONT Helvetica LABEL_FONT Helvetica

psbasemap -JX6/1.5 \
-R1992.5/2004/-60/50 \
-G230/225/200 -Y5.25 -P -K \
-Bf0.25a1/f20a40:"North (mm)":WeSn  \
> b741.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> b741.ps
1992.6603	-53.7	7.1
1996.6111	-14.1	6.6
1996.6248	-16.4	7.2
1998.6399	-6.0	6.8
1998.6426	-10.3	7.3
2003.5544	45.4	7.0
2003.5627	35.4	6.8
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.06 -G255/0/0 -O \
-K >> b741.ps
1992.6603	-53.7	7.1
1996.6111	-14.1	6.6
1996.6248	-16.4	7.2
1998.6399	-6.0	6.8
1998.6426	-10.3	7.3
2003.5544	45.4	7.0
2003.5627	35.4	6.8
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
-K >> b741.ps
SBreak	Segment0	Comp0
 1992.6603	 -51.9622	Segment0	Comp0
 2003.5627	  38.2667	Segment0	Comp0
EOT


#  Draw basemap
#  ------------
gmtset ANOT_FONT Helvetica LABEL_FONT Helvetica

psbasemap -JX6/1.5 \
-R1992.5/2004/-20/10 \
-G230/225/200 -Y-1.75 -P -K \
-Bf0.25a1/f5a10:"East (mm)":WeSn  \
-O >> b741.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> b741.ps
1992.6603	-13.7	8.0
1996.6111	7.6	7.2
1996.6248	5.5	7.8
1998.6399	-4.5	7.3
1998.6426	7.2	9.8
2003.5544	1.3	8.7
2003.5627	-9.4	8.0
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.06 -G255/0/0 -O \
-K >> b741.ps
1992.6603	-13.7	8.0
1996.6111	7.6	7.2
1996.6248	5.5	7.8
1998.6399	-4.5	7.3
1998.6426	7.2	9.8
2003.5544	1.3	8.7
2003.5627	-9.4	8.0
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
-K >> b741.ps
SBreak	Segment0	Comp1
 1992.6603	   3.9893	Segment0	Comp1
 2003.5627	  -2.5258	Segment0	Comp1
EOT


#  Draw basemap
#  ------------
gmtset ANOT_FONT Helvetica LABEL_FONT Helvetica

psbasemap -JX6/1.5 \
-R1992.5/2004/-50/40 \
-G230/225/200 -Y-1.75 -P -K \
-Bf0.25a1/f20a40:"Up (mm)":WeSn  \
-O >> b741.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> b741.ps
1992.6603	-43.8	22.9
1996.6111	5.3	21.9
1996.6248	32.1	23.5
1998.6399	-23.2	21.5
1998.6426	3.9	23.5
2003.5544	11.9	26.4
2003.5627	-4.2	23.6
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.06 -G255/0/0 -O \
-K >> b741.ps
1992.6603	-43.8	22.9
1996.6111	5.3	21.9
1996.6248	32.1	23.5
1998.6399	-23.2	21.5
1998.6426	3.9	23.5
2003.5544	11.9	26.4
2003.5627	-4.2	23.6
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
>> b741.ps
SBreak	Segment0	Comp2
 1992.6603	  -6.4258	Segment0	Comp2
 2003.5627	   4.6750	Segment0	Comp2
EOT