#!/bin/csh

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

psbasemap -JX6/1.5 \
-R1993.5/2001.5/-30/40 \
-G230/225/200 -Y5.25 -P -K \
-Bf0.25a1/f10a20:"North (mm)":WeSn  \
> farw.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> farw.ps
1993.6569	-20.2	7.1
1995.5926	-19.0	6.6
1995.5953	-8.5	7.2
1997.6214	-5.1	6.8
1997.6241	-7.7	7.3
1999.6447	6.6	7.0
1999.6502	-0.6	6.8
2001.1808	30.5	6.5
2001.1863	20.0	6.3
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.06 -G255/0/0 -O \
-K >> farw.ps
1993.6569	-20.2	7.1
1995.5926	-19.0	6.6
1995.5953	-8.5	7.2
1997.6214	-5.1	6.8
1997.6241	-7.7	7.3
1999.6447	6.6	7.0
1999.6502	-0.6	6.8
2001.1808	30.5	6.5
2001.1863	20.0	6.3
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
-K >> farw.ps
SBreak	Segment0	Comp0
 1993.6569	 -26.1142	Segment0	Comp0
 2001.1863	  19.6589	Segment0	Comp0
EOT


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

psbasemap -JX6/1.5 \
-R1993.5/2001.5/-30/20 \
-G230/225/200 -Y-1.75 -P -K \
-Bf0.25a1/f10a20:"East (mm)":WeSn  \
-O >> farw.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> farw.ps
1993.6569	-16.1	8.0
1995.5926	-5.8	7.2
1995.5953	-24.8	7.8
1997.6214	2.7	7.3
1997.6241	0.5	9.8
1999.6447	3.6	8.7
1999.6502	4.5	8.0
2001.1808	11.7	7.5
2001.1863	12.2	7.4
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.06 -G255/0/0 -O \
-K >> farw.ps
1993.6569	-16.1	8.0
1995.5926	-5.8	7.2
1995.5953	-24.8	7.8
1997.6214	2.7	7.3
1997.6241	0.5	9.8
1999.6447	3.6	8.7
1999.6502	4.5	8.0
2001.1808	11.7	7.5
2001.1863	12.2	7.4
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
-K >> farw.ps
SBreak	Segment0	Comp1
 1993.6569	 -18.3777	Segment0	Comp1
 2001.1863	  11.9286	Segment0	Comp1
EOT


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

psbasemap -JX6/1.5 \
-R1993.5/2001.5/-30/40 \
-G230/225/200 -Y-1.75 -P -K \
-Bf0.25a1/f10a20:"Up (mm)":WeSn  \
-O >> farw.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> farw.ps
1993.6569	-8.2	22.9
1995.5926	20.0	21.9
1995.5953	33.5	23.5
1997.6214	-6.7	21.5
1997.6241	4.5	23.5
1999.6447	3.8	26.4
1999.6502	8.5	23.6
2001.1808	-29.5	22.3
2001.1863	-26.4	22.8
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.06 -G255/0/0 -O \
-K >> farw.ps
1993.6569	-8.2	22.9
1995.5926	20.0	21.9
1995.5953	33.5	23.5
1997.6214	-6.7	21.5
1997.6241	4.5	23.5
1999.6447	3.8	26.4
1999.6502	8.5	23.6
2001.1808	-29.5	22.3
2001.1863	-26.4	22.8
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
>> farw.ps
SBreak	Segment0	Comp2
 1993.6569	  18.7686	Segment0	Comp2
 2001.1863	 -14.4230	Segment0	Comp2
EOT