# Last edited on 2014-03-12 01:30:16 by stolfilocal
# gawk 'BEGIN{ Q = 0.700; DB = 4; } /^[ ]*[0-9]/{ d = $1; p = $2; z = exp(log(Q)*(d-DB)); print d, p, 1, z; next; } //{ print; }'

04 4040 1 1
05 3956 1 0.7
06 3917 1 0.49

09 3803 1 0.16807

11 3802 1 0.0823543