# code: http://golf.shinh.org/reveal.rb?Partition+function/tails+%28recursion%29_1645535116&nbb
# target Nibbles version: 0.23
# commenter version: 0.1.2.181

#(implicit map with implicit range):[[chr]] 
    $ #(= fstInt):int 
    : #(append):[chr] <--arg( B:int A:int ) 
        : #(append):[chr] 
            : #(append):[chr] 
                "p(" #(string):[chr] 
                $ #(= B):int 
            ")=" #(string):[chr] 
        `; #(recursion):int 
            ~ #(tuple):int,int 
                $ #(= B):int 
                $ #(= B):int 
            #(cond,base,rec):null <--arg( D:int C:int E:fn(int,int->int) ) 
                + #(add):int 
                    @ #(= C):int 
                    ~ #(auto = 1):auto 
                0 #(integer):int 
                ? #(if/else):int 
                    $ #(= D):int 
                    + #(add):int <--arg( F:int ) 
                        ;$ #(= E):int 
                            - #(subtract):int 
                                @ #(= D):int 
                                ~ #(auto = 1):auto 
                            _ #(= C):int 
                        ;$ #(= E):int 
                            @ #(= D):int 
                            - #(subtract):int 
                                _ #(= C):int 
                                @ #(= D):int 
                    ^ #(pow):int 
                        0 #(integer):int 
                        @ #(= C):int