#! /bin/bash
# Last edited on 2020-04-17 18:36:32 by jstolfi

du="173.6"
dv="52.5"
rr="0.6289"

cat drawer_heights.txt \
  | gawk -v du="${du}" -v dv="${dv}" -v rr="${rr}" \
      ' BEGIN { 
          z = 200; k = 0; 
          split("0.560 0.540 0.524 0.500", r)
          dt = du
          printf "%5.1f %5.1f %5.1f\n", z, du, dt;
        }
        /[0-9]/ {
          dz = $1
          dh = r[k+1]*dz;
          zh = z + dh;
          dt = dv + (dt - dv)*rr
          printf "%5.1f %5.1f %5.1f\n", zh, dh, dt;
          z = z + dz;
          dt = dv + (dt - dv)*rr
          printf "%5.1f %5.1f %5.1f\n", z, dz - dh, dt;
          k = k + 1
        }
        END { }
      ' \
  > .temp

export GDFONTPATH="${HOME}/posters/tt-fonts"
  
gnuplot <<EOF
set term x11
set xrange [-0.1:8.1]
du = ${du}

plot \
  ".temp" using 0:3 with lines lt 3, \
  ".temp" using 0:2 with impulses lt 2 lw 3, \
  ".temp" using 0:1 with linespoints lt 1 pt 7 ps 1.5
pause 300
quit
EOF