Problem: Arithmetic derivative

Code: Arithmetic+derivative/tails_1696492229

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 map) 
    % (split (remove empties)) 
        @ (= fstLine) 
        ~ (auto = words) 
    ? (if/else) <--arg( B A ) 
        == (equal?) 
            $ (= B) 
            ; (save) <--arg( C ) -->let( D ) 
                `r (read int) 
                    @ (= B) 
        + (sum) <--arg( E ) -->let( N ) 
            `. (iterate while uniq) 
                ~ (tuple) 
                    0 (integer) 
                    @ (= D) 
                (implicit tuple) <--arg( G F ) 
                    ? (if/else) -->let( M ) 
                        - (subtract) 
                            ^ (pow) 
                                @ (= F) 
                                ~ (auto = 2) 
                            ~ (auto = 1) 
                        ~ (tuple) <--arg( H ) 
                            / (divide) 
                                ;@ (= D) 
                                ; (save) -->let( L ) 
                                    / (foldr1) 
                                        | (filter) 
                                            >> (tail) 
                                                , (range from 1) 
                                                    ~ (auto = infinity) 
                                            ~ (not) 
                                            % (modulus) <--arg( I ) 
                                                ;$ (= F) 
                                                $ (= I) 
                                        $ (= K) <--arg( K J ) 
                            / (divide) 
                                ;$ (= F) 
                                $ (= L) 
                        ~ (default) 
                    $ (= M) 
        `D (to base from data) 
            -75 (to base from data arg) 
(postdata (hex): to base from data)
3e3e66fcd37f68454ee77a7a5ce6be8f875f7717b2af
("Wait, that\'s not a number...")

Back to the index