tams-ellipsoid.awk: use more rubust parsing of sample id - ebeltoft-ams - AMS results for channel deposit at Ebeltoft, Denmark
HTML git clone git://src.adamsgaard.dk/ebeltoft-ams
DIR Log
DIR Files
DIR Refs
---
DIR commit 33b1357c61551014b65127eba88a5b102a4e14cc
DIR parent 2de749e6f5d5f3154e8e1e28453c91145d608556
HTML Author: Anders Damsgaard <anders@adamsgaard.dk>
Date: Fri, 24 Jun 2022 12:40:15 +0200
ams-ellipsoid.awk: use more rubust parsing of sample id
Diffstat:
M ams-ellipsoid.awk | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
---
DIR diff --git a/ams-ellipsoid.awk b/ams-ellipsoid.awk
t@@ -6,9 +6,9 @@ BEGIN {
printf "No.\tTrend\tPlunge\n"
}
-/_[A-z0-9]+ +/ {
- if (match($0, /_[A-z0-9]+ /))
- id = substr($0, RSTART + 1, RLENGTH - 2)
+/ANISOTROPY OF SUSCEPTIBILITY/ {
+ if (match($1, /[A-z0-9\-_]+/))
+ id = substr($1, RSTART, RLENGTH)
}
/^Specimen/ {