Problem: VIDE DICEQVE

Code: VIDE+DICEQVE/tails_1645065284

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)

< (take):[[chr]] 
    20 (integer):int 
    `. (iterate while uniq):[[chr]] 
        "I" (string):[chr] 
        + (concat):[chr] <--arg( A:[chr] ) 
            . (map):[[chr]] 
                `= (chunk by):[[chr]] 
                    $ (= A):[chr] 
                    $ (= B):chr <--arg( B:chr ) 
                : (append):[chr] <--arg( C:[chr] ) 
                    = (subscript (wrapped)):[chr] 
                        , (length):int 
                            $ (= C):[chr] 
                        % (split (remove empties)):[[chr]] 
                            ! (zip with):[chr] 
                                "IV " (string):[chr] 
                                `D (to base from data):[int] <--arg( D:chr ) 
                                    3 (to base from data arg):null 
                                = (zipop: subscript):null 
                            ~ (auto = words):auto 
                    / (foldr1):chr 
                        $ (= C):[chr] 
                        $ (= F):chr <--arg( F:chr E:chr ) 
(postdata (hex): to base from data)
95c03