# code: http://golf.shinh.org/reveal.rb?Collatz+Problem/darrenks_1640146100&nbb
# target Nibbles version: 0.2
# commenter version: 0.1.2.181

`. #(iterate while uniq):[int] 
    fstInt #($):int 
    \A 
    ? #(if/else):int 
        % #(modulus):int 
            A #($):int 
            ~ #(auto = 2):auto 
        \B 
        + #(add):int 
            * #(multiply):int 
                3 #(integer):int 
                A #(@):int 
            ~ #(auto = 1):auto 
        / #(divide):int 
            A #($):int 
            ~ #(auto = 2):auto