# code: http://golf.shinh.org/reveal.rb?Modular+Exponentiation+2/tails_1646227277&nbb
# target Nibbles version: 0.24
# commenter version: 0.1.2.181

#(implicit foldl1):int 
    : #(append):[int] 
        1 #(integer):int 
        `@ #(to base):[int] 
            2 #(integer):int 
            ;$ #(= sndInt):int 
    % #(modulus):int <--arg( B:int A:int ) 
        * #(multiply):int 
            ^ #(pow):int 
                _ #(= fstInt):int 
                $ #(= B):int 
            ^ #(pow):int 
                @ #(= A):int 
                ~ #(auto = 2):auto 
        / #(foldr1):int 
            ;@ #(= ints):[int] 
            @ #(= C):int <--arg( D:int C:int )