Problem: The power of the answer to life the universe and everything

Code: The+power+of+the+answer+to+life+the+universe+and+everything/tails_1709873245

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):[int] 
    | (filter):[int] 
        , (range from 1):[int] 
            4242 (integer):int 
        >> (tail):[[chr]] <--arg( A:int ) 
            `% (split list (keep empties)):[[chr]] 
                `p (int to str):[chr] 
                    $ (= A):int 
                `p (int to str):[chr] 
                    ; (save):int -->let( B:int ) 
                        42 (integer):int 
    ^ (pow):int <--arg( D:int C:int ) 
        _ (= B):int 
        (implicit arg = D):int