Evaluated proc heads_x n { expr $n - 15 }