line-mode
read-nums
10
2
pair
    <=
z1
product
( "ex" )
group
get