line-mode
product
0
    2dup
    +
    counter
    *
b4
49
times #(eval)