Problem: Distribute

Code: Distribute/tails_1646313549

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)

(implicit string concatenation) 
    (implicit string concatenation) 
        (implicit string concatenation) 
            (implicit string concatenation) 
                "(" (string) 
                ;~ (save fn) -->let( N ) 
                    | (partition) -->let( I ) 
                        ! (zip with) 
                            _ (= ints) 
                            =\ (scanl) <--arg( A ) 
                                ;$ (= ints) 
                                1 (integer) <--arg( C B ) 
                                ? (if/else) <--arg( E D ) 
                                    @ (= D) 
                                    - (subtract) <--arg( F ) 
                                        _ (= D) 
                                        @ (= E) 
                                    + (add) 
                                        @ (= D) 
                                        $ (= E) 
                            , (zipop: make tuple) 
                        ~ (par......) 
                        ~ (...tition) 
                        @ (= G) <--arg( H G ) 
                    * (join) <--arg( J ) 
                        * (join) 
                            ; (save) -->let( K ) 
                                "," (string) 
                            . (map) 
                                @ (= J) 
                                $ (= M) <--arg( M L ) 
                        `' (transpose) 
                            "[]" (string) 
            @ (= K) 
        $ (= N) 
            _ (= I) 
    ")" (string)