Problem: The 9801 debacle

Code: The+9801+debacle/tails_1705026998

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):[chr] 
    "0." (string):[chr] 
    >> (tail):[chr] 
        `p (int to str):[chr] 
            + (add):int 
                / (divide):int 
                    ; (save):int -->let( B:int ) 
                        ^ (pow):int 
                            ~ (auto = 10):auto 
                            * (multiply):int 
                                ; (save):int -->let( A:int ) 
                                    ^ (pow):int 
                                        ;$ (= sndInt):int 
                                        -2 (integer):int 
                                , (length):int 
                                    `p (int to str):[chr] 
                                        $ (= A):int 
                    ;_ (= sndInt):int 
                (implicit arg = B):int