Problem: pascal to the moon

Code: pascal+to+the+moon/tails_1677636450

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) 
    `\ (special scans) 
        . (map) 
            `, (range from 0) 
                10 (integer) 
            / (divide) <--arg( A ) 
                ^ (pow) 
                    ; (save) -->let( B ) 
                        ^ (pow) 
                            ~ (auto = 10) 
                            @ (= fstInt) 
                    ^ (pow) 
                        2 (integer) 
                        @ (= A) 
                - (subtract) 
                    $ (= B) 
                    ~ (auto = 1) 
        * (foldop: mult) 
    `@ (to base) <--arg( D C ) 
        _ (= B) 
        (implicit arg = D)