#!/bin/csh

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

psbasemap -JX6/1.5 \
-R1993/2010/-210/200 \
-G236/232/211 -Y5.25 -P -K \
-Bf0.25a1/f80a160:"CORD North (mm)":WeSn  \
> cord.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> cord.ps
1993.0328	-198.4	2.5
1993.0355	-196.1	4.0
1993.0383	-201.1	4.1
1993.0766	-194.2	4.2
1993.2053	-179.2	4.4
1994.2948	-167.7	4.9
1994.2976	-169.7	4.7
1994.3003	-167.9	4.1
1995.7185	-129.2	6.2
1996.8248	-97.8	6.6
1997.8816	-95.1	6.1
1997.9199	-92.9	5.8
1998.9165	-56.1	6.1
1998.9330	-62.6	5.9
2001.2355	-3.0	5.7
2001.2383	-1.0	5.9
2003.0754	44.3	5.7
2003.0782	44.3	5.6
2006.0871	121.0	2.9
2006.0899	121.3	2.9
2006.0926	124.6	3.4
2009.1782	193.1	5.8
2009.1810	191.9	2.9
2009.1836	189.3	2.9
2009.1863	189.9	3.0
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G0/0/255 -O \
-K >> cord.ps
2009.1836	189.3	2.9
2009.1863	189.9	3.0
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G255/0/0 -O \
-K >> cord.ps
1993.0328	-198.4	2.5
1993.0355	-196.1	4.0
1993.0383	-201.1	4.1
1993.0766	-194.2	4.2
1993.2053	-179.2	4.4
1994.2948	-167.7	4.9
1994.2976	-169.7	4.7
1994.3003	-167.9	4.1
1995.7185	-129.2	6.2
1996.8248	-97.8	6.6
1997.8816	-95.1	6.1
1997.9199	-92.9	5.8
1998.9165	-56.1	6.1
1998.9330	-62.6	5.9
2001.2355	-3.0	5.7
2001.2383	-1.0	5.9
2003.0754	44.3	5.7
2003.0782	44.3	5.6
2006.0871	121.0	2.9
2006.0899	121.3	2.9
2006.0926	124.6	3.4
2009.1782	193.1	5.8
2009.1810	191.9	2.9
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
-K >> cord.ps
SBreak	Segment0	Comp0
 1993.0328	-197.4037	Segment0	Comp0
 2009.1863	 192.5658	Segment0	Comp0
EOT


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

psbasemap -JX6/1.5 \
-R1993/2010/-110/190 \
-G236/232/211 -Y-1.75 -P -K \
-Bf0.25a1/f40a80:"CORD East (mm)":WeSn  \
-O >> cord.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> cord.ps
1993.0328	177.2	6.3
1993.0355	184.6	9.3
1993.0383	170.1	11.1
1993.0766	185.3	10.8
1993.2053	179.6	7.9
1994.2948	155.2	6.9
1994.2976	151.7	6.3
1994.3003	157.0	5.7
1995.7185	131.2	8.0
1996.8248	111.6	8.1
1997.8816	101.5	7.3
1997.9199	98.5	7.2
1998.9165	91.2	9.1
1998.9330	84.1	7.4
2001.2355	44.6	8.4
2001.2383	50.1	11.7
2003.0754	20.9	8.0
2003.0782	24.2	7.2
2006.0871	-43.9	3.1
2006.0899	-47.0	3.2
2006.0926	-44.3	3.8
2009.1782	-97.1	6.4
2009.1810	-97.5	3.8
2009.1836	-99.0	3.6
2009.1863	-101.4	3.7
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G0/0/255 -O \
-K >> cord.ps
2009.1836	-99.0	3.6
2009.1863	-101.4	3.7
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G255/0/0 -O \
-K >> cord.ps
1993.0328	177.2	6.3
1993.0355	184.6	9.3
1993.0383	170.1	11.1
1993.0766	185.3	10.8
1993.2053	179.6	7.9
1994.2948	155.2	6.9
1994.2976	151.7	6.3
1994.3003	157.0	5.7
1995.7185	131.2	8.0
1996.8248	111.6	8.1
1997.8816	101.5	7.3
1997.9199	98.5	7.2
1998.9165	91.2	9.1
1998.9330	84.1	7.4
2001.2355	44.6	8.4
2001.2383	50.1	11.7
2003.0754	20.9	8.0
2003.0782	24.2	7.2
2006.0871	-43.9	3.1
2006.0899	-47.0	3.2
2006.0926	-44.3	3.8
2009.1782	-97.1	6.4
2009.1810	-97.5	3.8
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
-K >> cord.ps
SBreak	Segment0	Comp1
 1993.0328	 180.9615	Segment0	Comp1
 2009.1863	 -97.8334	Segment0	Comp1
EOT


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

psbasemap -JX6/1.5 \
-R1993/2010/-40/70 \
-G236/232/211 -Y-1.75 -P -K \
-Bf0.25a1/f20a40:"CORD Up (mm)":WeSn  \
-O >> cord.ps

#  Draw error bars
#  ---------------
psxy << EOT \
-JX -R -G255/0/0 -Ey0.05/0.1/159/159/159 -O \
-K >> cord.ps
1993.0328	55.7	14.2
1993.0355	60.9	21.0
1993.0383	68.5	21.7
1993.0766	28.3	15.9
1993.2053	16.2	17.2
1994.2948	34.1	19.3
1994.2976	20.1	18.2
1994.3003	31.9	18.0
1995.7185	-11.8	21.7
1996.8248	-26.7	23.2
1997.8816	-20.4	22.4
1997.9199	-16.0	20.3
1998.9165	7.3	21.6
1998.9330	-32.3	20.3
2001.2355	7.6	22.0
2001.2383	8.3	23.3
2003.0754	27.2	21.2
2003.0782	3.5	20.4
2006.0871	-16.0	9.8
2006.0899	-13.4	10.0
2006.0926	-23.5	11.2
2009.1782	5.2	18.7
2009.1810	-15.6	10.2
2009.1836	-4.6	10.1
2009.1863	-21.5	10.6
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G0/0/255 -O \
-K >> cord.ps
2009.1836	-4.6	10.1
2009.1863	-21.5	10.6
EOT


#  Draw points
#  -----------
psxy << EOT \
-JX -R -Sc0.03 -G255/0/0 -O \
-K >> cord.ps
1993.0328	55.7	14.2
1993.0355	60.9	21.0
1993.0383	68.5	21.7
1993.0766	28.3	15.9
1993.2053	16.2	17.2
1994.2948	34.1	19.3
1994.2976	20.1	18.2
1994.3003	31.9	18.0
1995.7185	-11.8	21.7
1996.8248	-26.7	23.2
1997.8816	-20.4	22.4
1997.9199	-16.0	20.3
1998.9165	7.3	21.6
1998.9330	-32.3	20.3
2001.2355	7.6	22.0
2001.2383	8.3	23.3
2003.0754	27.2	21.2
2003.0782	3.5	20.4
2006.0871	-16.0	9.8
2006.0899	-13.4	10.0
2006.0926	-23.5	11.2
2009.1782	5.2	18.7
2009.1810	-15.6	10.2
EOT


#  Draw best fit line
#  ------------------
psxy << EOT \
-JX -R -MS -W3/102/102/255 -O \
>> cord.ps
SBreak	Segment0	Comp2
 1993.0328	  28.0984	Segment0	Comp2
 2009.1863	 -19.0560	Segment0	Comp2
EOT