Problem: kaprekars routine

Code: kaprekars+routine/tails_1766045584

Nibbles version: 0.2 | 0.21 | 0.22 | 0.23 | 0.24 | 0.25 | 1.00

Format: Compact | Simple | +Type | Table | JSON | .nbl (DeBruijn) | .nbl (names)

>> (tail) 
    `. (iterate while uniq) 
        @ (= fstLine) 
        & (justify) <--arg( A ) 
            "0" (string) 
            , (length) 
                $ (= A) 
            - (subtract) 
                `r (read int) 
                    \ (reverse) 
                        ; (save) -->let( B ) 
                            `< (sort) 
                                $ (= A) 
                `r (read int) 
                    $ (= B)