Problem: ZunDokoKiyoshi

Code: ZunDokoKiyoshi/tails_1658467086

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)

+ (concat):[[chr]] 
    =\ (scanl1):[[[chr]]] 
        `% (split list (keep empties)):[[[chr]]] 
            ;@ (= allLines):[[chr]] 
            ; (save):[[chr]] -->let( B:[[chr]] ) 
                : (append):[[chr]] 
                    ^ (replicate):[[chr]] 
                        4 (integer):int 
                        `) (swapped uncons):[[chr]] -->let( A:[chr] ) 
                            `$ (uniq):[[chr]] 
                                ;@ (= allLines):[[chr]] 
                    $ (= A):[chr] 
        : (append):[[chr]] <--arg( D:[[chr]] C:[[chr]] ) 
            : (append):[[chr]] 
                _ (= B):[[chr]] 
                "KI-YO-SHI!" (string):[chr] 
            (implicit arg = D):[[chr]]