Problem: Compound interest
Code: Compound+interest/tails_1643364497
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)
< (take):[int] $ (= fstInt):int `. (iterate while uniq):[int] ;$ (= sndInt):int + (add):int <--arg( A:int ) / (divide):int * (multiply):int / (foldr1):int ;$ (= ints):[int] @ (= B):int <--arg( C:int B:int ) $ (= A):int ^ (pow):int ~ (auto = 10):auto ~ (auto = 2):auto (implicit arg = A):int