#!/bin/csh

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

psbasemap -JX6/1.5 \
-R1994/2004.5/-80/100 \
-G236/232/211 -Y5.25 -P -K \
-Bf0.25a1/f40a80:"SWEE North (mm)":WeSn  \
> swee.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> swee.ps
1994.3140	-74.2	5.6
1995.4831	-64.9	5.8
1995.8473	-57.9	5.8
1995.8501	-50.9	5.9
1996.4277	-50.3	5.9
1997.9364	-24.9	6.7
1997.9555	-22.3	6.6
1999.0288	-0.3	6.8
1999.0315	-2.7	5.2
2001.0795	33.6	3.3
2001.0822	32.3	6.1
2004.1679	98.8	5.2
2004.1706	99.3	5.5
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G0/0/255 -O \
-K >> swee.ps
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G255/0/0 -O \
-K >> swee.ps
1994.3140	-74.2	5.6
1995.4831	-64.9	5.8
1995.8473	-57.9	5.8
1995.8501	-50.9	5.9
1996.4277	-50.3	5.9
1997.9364	-24.9	6.7
1997.9555	-22.3	6.6
1999.0288	-0.3	6.8
1999.0315	-2.7	5.2
2001.0795	33.6	3.3
2001.0822	32.3	6.1
2004.1679	98.8	5.2
2004.1706	99.3	5.5
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
-K >> swee.ps
SBreak	Segment0	Comp0
 1994.3140	 -85.4861	Segment0	Comp0
 2004.1706	  94.1652	Segment0	Comp0
EOT


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

psbasemap -JX6/1.5 \
-R1994/2004.5/-190/190 \
-G236/232/211 -Y-1.75 -P -K \
-Bf0.25a1/f80a160:"SWEE East (mm)":WeSn  \
-O >> swee.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> swee.ps
1994.3140	184.5	7.3
1995.4831	113.8	6.9
1995.8473	106.5	7.1
1995.8501	102.2	7.6
1996.4277	107.0	7.6
1997.9364	50.5	9.0
1997.9555	23.8	9.9
1999.0288	6.7	8.1
1999.0315	6.0	7.5
2001.0795	-71.0	9.0
2001.0822	-71.8	7.7
2004.1679	-182.5	8.0
2004.1706	-177.2	7.5
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G0/0/255 -O \
-K >> swee.ps
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G255/0/0 -O \
-K >> swee.ps
1994.3140	184.5	7.3
1995.4831	113.8	6.9
1995.8473	106.5	7.1
1995.8501	102.2	7.6
1996.4277	107.0	7.6
1997.9364	50.5	9.0
1997.9555	23.8	9.9
1999.0288	6.7	8.1
1999.0315	6.0	7.5
2001.0795	-71.0	9.0
2001.0822	-71.8	7.7
2004.1679	-182.5	8.0
2004.1706	-177.2	7.5
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
-K >> swee.ps
SBreak	Segment0	Comp1
 1994.3140	 167.4555	Segment0	Comp1
 2004.1706	-179.5151	Segment0	Comp1
EOT


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

psbasemap -JX6/1.5 \
-R1994/2004.5/-50/40 \
-G236/232/211 -Y-1.75 -P -K \
-Bf0.25a1/f20a40:"SWEE Up (mm)":WeSn  \
-O >> swee.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> swee.ps
1994.3140	-3.3	22.8
1995.4831	5.2	20.4
1995.8473	20.8	21.0
1995.8501	8.7	20.3
1996.4277	39.2	20.5
1997.9364	-4.8	24.0
1997.9555	-19.5	23.8
1999.0288	16.6	22.5
1999.0315	-6.8	19.7
2001.0795	-45.9	16.0
2001.0822	-7.4	21.1
2004.1679	5.7	19.6
2004.1706	5.0	21.3
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G0/0/255 -O \
-K >> swee.ps
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G255/0/0 -O \
-K >> swee.ps
1994.3140	-3.3	22.8
1995.4831	5.2	20.4
1995.8473	20.8	21.0
1995.8501	8.7	20.3
1996.4277	39.2	20.5
1997.9364	-4.8	24.0
1997.9555	-19.5	23.8
1999.0288	16.6	22.5
1999.0315	-6.8	19.7
2001.0795	-45.9	16.0
2001.0822	-7.4	21.1
2004.1679	5.7	19.6
2004.1706	5.0	21.3
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
>> swee.ps
SBreak	Segment0	Comp2
 1994.3140	   5.7564	Segment0	Comp2
 2004.1706	  -6.4840	Segment0	Comp2
EOT