0 (dup 6 mod 0 == over 0 != and) 'pop (puts succ) () linrec