line-mode
read-num
3
divmod
not
swap
"2"
times #(list)
logical-and