Problem: Not Pascal Triangle

Code: Not+Pascal+Triangle/tails_1646627194

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) 
    20 (integer) 
    | (filter) 
        `. (iterate while uniq) 
            _ (= ints) 
            ! (zip with) <--arg( A ) 
                : (append) 
                    1 (integer) 
                    \ (reverse) 
                        $ (= A) 
                : (append) <--arg( B ) 
                    \ (reverse) 
                        @ (= A) 
                    0 (integer) 
                + (zipop: add) 
        (implicit arg = C) <--arg( C ) 

Back to the index