| /schemata/mereni/SI_FZU/plot.awk |
|---|
| 1,17 → 1,21 |
| #!/usr/bin/awk -f |
| # reports which file is being read |
| # merge .IVS files togeather |
| BEGIN { |
| f=""; |
| val=""; |
| #colums=""; |
| } |
| { |
| if (f != FILENAME) { |
| print "reading", FILENAME; |
| do { |
| if (FNR >= 43) data[$1] = data[$1] OFS $2; |
| if (f != FILENAME) { |
| colums = colums OFS FILENAME; NR=0; |
| do { |
| if (FNR > 43) data[$1] = data[$1] OFS $2; |
| } while (getline != 0); |
| f=FILENAME; |
| } while (getline != 0); |
| } |
| } |
| END{ |
| #print colum; |
| for(val in data) print val,data[val]; |
| } |
| END{for(val in data) print data[val];} |