# code: http://golf.shinh.org/reveal.rb?tails/tails_1655702063&nbb
# target Nibbles version: 0.25
# commenter version: 0.1.2.181

``; #(recursion):int 
    $ #(= fstInt):int 
    #(cond,base,rec):null <--arg( A:int C:fn(int->int) ) 
        ; #(save):int -->let( B:int ) 
            - #(subtract):int 
                $ #(= A):int 
                ;@ #(= sndInt):int 
        ^ #(pow):int 
            0 #(integer):int 
            $ #(= B):int 
        + #(add):int 
            - #(subtract):int 
                ^ #(pow):int 
                    2 #(integer):int 
                    - #(subtract):int 
                        $ #(= B):int 
                        ~ #(auto = 1):auto 
                _ #(= C):int 
                    - #(subtract):int 
                        $ #(= B):int 
                        ~ #(auto = 1):auto 
            * #(multiply):int 
                _ #(= C):int 
                    - #(subtract):int 
                        @ #(= A):int 
                        ~ #(auto = 1):auto 
                ~ #(auto = 2):auto