#!/bin/awk -f

BEGIN { nt = 0 ; np = 0 }

/^[A-Z]*$/ { this = $0; tourn[nt] = $0 ; nt++; next }

/--/    { golfer = $1
          for (i = 2; $i != "--" ; i++) golfer = golfer" "$i
          if (isgolfer[golfer] != "yes") {
            isgolfer[golfer] = "yes"
            g[np] = golfer
            np++;
          }
          score[golfer" "this] = $(i+1)
        }
END	{ printf("%-25s", " ");
          for (j = 0; j < nt; j++) printf("%9s", tourn[j])
          printf("\n")

          for (i = 0; i < np; i++) {
            printf("%-25s", g[i])
            for (j = 0; j < nt; j++) printf("%9s", score[g[i]" "tourn[j]])
            printf("\n")
          }
        }