# Last edited on 2014-05-01 19:01:13 by stolfilocal
# gawk 'BEGIN{ Q = 0.56522; DB = 28; } /^[ ]*[0-9]/{ d = $1; p = $2; w = $3; z = exp(log(Q)*(d-DB)); printf "%3d %6.1f %5.3f %3.1f %9.5f\n", d, p, w, 1, z; next; } //{ print; }'

28 2715 0.768
29 2761 0.778
30 2787 0.854
31 2818 0.812