#!/bin/bash
gmt begin fallon7.9_epicenter_mislocation pdf,ps
proj=-JX12
reg=-R-23/23/-23/23
gmt basemap $proj $reg -Bxa10f5+l'km' -Bya10f5+l'km' -BWeSn+t'Epicentral Mislocation fallon7.9'

# Circle with radius of median vector length
gmt plot $proj $reg -SE -Wthick,red << EOF
     0.000     0.000     0.000     3.052     3.052
EOF

# Mislocation vectors, with event numbers for the longer ones
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.433     3.936
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.433     3.936 1
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.131     1.501
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.183     2.183
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -2.183     2.183 3
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.242    -1.648
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.734     6.470
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.734     6.470 5
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     6.257     5.067
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     6.257     5.067 6
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.333     3.593
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -2.333     3.593 7
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     3.890     4.636
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     3.890     4.636 8
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     4.736     2.625
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     4.736     2.625 9
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     4.987     5.165
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     4.987     5.165 10
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.756    16.705
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.756    16.705 11
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -5.042     2.351
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -5.042     2.351 12
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.418     1.560
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -6.166     3.560
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -6.166     3.560 14
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.300     5.719
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     0.300     5.719 15
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.713     1.340
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.063     0.295
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -6.350     3.097
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -6.350     3.097 18
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.157    -0.468
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.187     1.179
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.290    -2.062
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     2.290    -2.062 21
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -5.569     1.597
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -5.569     1.597 22
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.374     1.306
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.883     0.375
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.409    -2.012
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     4.380    -2.737
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     4.380    -2.737 26
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.252    -0.611
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.622    -0.527
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.257     0.840
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -4.340    -1.163
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -4.340    -1.163 30
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.511     2.107
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     2.511     2.107 31
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -3.214     2.250
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -3.214     2.250 32
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.647     0.091
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.331     1.705
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -3.742    -2.160
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -3.742    -2.160 35
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.063    -0.600
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.104    -1.520
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.843    -0.759
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -6.053    -0.851
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -6.053    -0.851 39
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.219     3.693
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -2.219     3.693 40
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.283     1.456
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.189     0.705
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     3.178    -0.734
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     3.178    -0.734 43
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.027     1.572
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
   -12.508    -6.101
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
   -12.508    -6.101 45
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.697     0.507
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.691    -0.279
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.121    -0.285
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
   -11.882    -4.801
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
   -11.882    -4.801 49
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.512    -1.936
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
   -11.482   -11.482
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
   -11.482   -11.482 51
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.347     6.927
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -1.347     6.927 52
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.293     3.531
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -2.293     3.531 53
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.228     0.244
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.477     0.233
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.047    -0.670
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.908     3.442
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.908     3.442 57
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.078     3.130
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -1.078     3.130 58
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     4.284    -0.300
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     4.284    -0.300 59
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     3.242    -0.284
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     3.242    -0.284 60
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.612    -0.235
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.247     0.305
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.404     0.139
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.544    -0.821
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     5.083     5.451
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     5.083     5.451 65
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     5.107     2.063
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     5.107     2.063 66
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.266    -0.014
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
   -20.255    -7.372
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
   -20.255    -7.372 68
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.608    -0.107
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     4.306     6.150
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     4.306     6.150 70
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.222    12.693
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     0.222    12.693 71
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.850     0.293
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.596     0.073
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.947     0.947
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.171    -0.883
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -5.816    -8.005
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -5.816    -8.005 76
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -7.619    12.680
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -7.619    12.680 77
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.722    -0.650
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.000     1.907
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.524     4.954
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -2.524     4.954 80
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.898     3.133
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -0.898     3.133 81
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.879     1.596
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -2.879     1.596 82
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -4.033     2.055
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -4.033     2.055 83
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.158    -0.000
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.135     2.833
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     2.135     2.833 85
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.254     2.172
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -3.403    -2.958
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -3.403    -2.958 87
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.917     0.280
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.833     1.650
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.660     2.032
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.177     0.086
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.670     0.562
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.120     2.120
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.563     1.843
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.650     1.336
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.373     2.213
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     2.373     2.213 96
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.237     1.218
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.794     1.992
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.380     1.105
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.742     0.378
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.194     2.223
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.485     0.875
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.175     1.995
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.106     0.261
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.014     0.808
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     8.201     0.862
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     8.201     0.862 106
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.943     1.850
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.145     0.680
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.833     1.147
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.582     1.308
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.793    -0.515
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.110     2.095
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.283     0.821
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.128     0.148
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.824     2.704
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -1.824     2.704 115
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -3.061    -1.237
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -3.061    -1.237 116
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.272    -1.067
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.208     0.604
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.197     0.049
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.583     0.111
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -3.224     1.714
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -3.224     1.714 121
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.975     2.928
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.975     2.928 122
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -4.247    -0.446
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -4.247    -0.446 123
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.651     4.087
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -1.651     4.087 124
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.404     0.622
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.617    -2.901
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     4.938    -3.858
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     4.938    -3.858 127
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.610     2.789
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.610     2.789 128
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.793     1.431
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.251     0.592
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.472     0.144
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.155     2.949
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     6.701    -2.984
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     6.701    -2.984 133
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.450    -1.303
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.871     1.002
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     3.414     0.726
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     3.414     0.726 136
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.798     2.456
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.665     3.004
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.665     3.004 138
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.033     1.908
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.712     0.491
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     5.162     7.372
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     5.162     7.372 141
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.986     2.322
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.092     0.658
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.618     1.267
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.198     1.611
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.916     2.284
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.887     4.916
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.887     4.916 147
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.363     0.315
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.344    -0.776
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.860     1.507
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.442     2.220
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.424     2.279
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.541     2.632
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     2.541     2.632 153
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.923     2.124
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     2.923     2.124 154
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.918    -1.801
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     3.094     0.829
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     3.094     0.829 156
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.261    -0.757
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.181     1.724
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.581    -0.212
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.455     0.756
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.576     1.356
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.468    -0.917
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.595     0.744
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.069     0.987
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -3.870    12.659
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -3.870    12.659 165
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.645     1.384
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.252    -0.359
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.907     0.503
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.332     1.380
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.357     2.905
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     4.339     0.456
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     4.339     0.456 171
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.221    -0.350
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.081     0.772
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -7.028    -1.366
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -7.028    -1.366 174
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.498     2.586
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     2.498     2.586 175
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.862     1.144
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.966     0.754
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.108     1.267
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.253     0.397
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -3.138    -1.530
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -3.138    -1.530 180
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.197    -0.691
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.283     2.283
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     2.283     2.283 182
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.931     1.305
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     2.931     1.305 183
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     3.456     3.112
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     3.456     3.112 184
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.334    -0.869
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.505    -0.695
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.089     0.358
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.596    -2.080
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     4.848    -1.390
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     4.848    -1.390 189
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.691    -0.484
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.162     1.857
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.229    -0.328
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.014    -0.817
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.361     0.282
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.114    -1.308
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.285    -0.250
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.298     0.703
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.054     0.776
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.242    -0.163
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.830     0.441
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.724     0.167
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.136    -0.373
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.481    -0.156
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.120    -2.295
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.137     1.892
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.240    -1.040
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.064    -0.238
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.046    -1.326
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.630     3.495
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.630     3.495 209
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.241     0.842
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.537     2.152
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.127    -1.455
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.073     0.255
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.298     0.287
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.464     0.349
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.965     3.404
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.965     3.404 216
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.988    -0.359
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.295    -0.841
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.221     0.399
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.754     1.776
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.306     0.656
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.529     0.247
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.124     3.676
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     1.124     3.676 223
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.282    -1.327
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.547     1.424
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.176     0.523
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.296    -1.720
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.220     0.143
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.428     0.666
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.688     0.557
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.376     0.886
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.443    -0.023
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.439     0.650
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.127     0.323
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.356     0.977
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.591     1.934
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.903    -0.311
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.478     0.446
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.901    -0.581
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.042    -0.972
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.433     0.498
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.631    -1.093
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.224     0.031
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.749     0.303
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.914    -0.096
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.283     1.702
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.469    -1.363
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.736    -0.152
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.495     1.524
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.285    -0.379
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.168    -0.186
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.577     0.961
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.071    -0.309
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.698    -1.208
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.738    -0.409
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.164     0.081
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.898    -0.309
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.372     2.348
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.423    -0.453
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.732    -0.636
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.003     0.053
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.040     0.202
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.373     0.555
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.835    -0.551
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.515     0.262
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.410    -1.431
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.082    -0.786
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.913    -0.051
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.816     0.281
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.829    -0.029
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.788     0.111
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.863    -0.264
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.058    -1.097
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.053     0.607
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.661    -0.023
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.323    -0.252
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.402     0.325
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.998    -0.444
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.122     1.290
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.918    -0.162
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.116     0.062
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.756     1.165
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.248     1.073
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.865    -1.773
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.382     0.550
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.027     0.032
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -1.099     5.168
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
    -1.099     5.168 287
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.158     0.107
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.867    -0.397
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.620     0.794
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.529     0.258
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.932     0.339
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.699     0.061
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.007     0.381
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     8.550     5.343
EOF
gmt text $proj $reg -F+f8p+jCM << EOF
     8.550     5.343 295
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     1.133    -0.390
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.672    -1.662
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.271     1.709
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.978    -0.017
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.579     0.741
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.821     0.205
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.213     1.517
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.213    -0.457
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.165    -0.124
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.091     2.604
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.092     0.748
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     0.906    -2.632
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -0.516     0.858
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
     2.083     0.799
EOF
gmt plot $proj $reg -Wthin,black << EOF
     0.000     0.000
    -2.453    -0.942
EOF
gmt plot $proj $reg -SE -Gred << EOF
    -0.084     0.767     0.000     1.500     1.500
EOF
gmt text $proj $reg -F+f10p,Helvetica,black+a0.+jBL << EOF
   -21.500    21.500 Author: all ( 310 samples)
EOF
gmt text $proj $reg -F+f10p,Helvetica,black+a0.+jBL << EOF
   -21.500   -21.500 Average =   0.8 km at 353.8 deg; median =    1.5 km
EOF
gmt end
