line-mode
lowercase-alphabet
push-a
and
( "=><" )
over
3
make-array
fold-product
71637090
binary #(num to list)
compress
nip-b
f:
    push-b
        =
    z1
    sum
    half