Problem: McCarthy 91 function
Code: McCarthy+91+function/tails_1644921716
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) <~ (take while) `. (iterate while uniq) ~~ (3-ary tuple) 1 (integer) $ (= fstInt) $ (= fstInt) (implicit tuple) <--arg( C B A ) ? (if/else) -->let( E ) - (subtract) @ (= B) ^ (pow) ~ (auto = 10) ~ (auto = 2) ~ (tuple) <--arg( D ) - (subtract) @ (= C) ~ (auto = 1) - (subtract) _ (= B) 10 (integer) (implicit tuple) + (add) $ (= C) ~ (auto = 1) + (add) 11 (integer) @ (= B) $ (= E) @ (= C) _ (= F) <--arg( H G F ) : (append) <--arg( N M L K J I ) : (append) ^ (replicate) $ (= N) "M(" (string) @ (= M) ^ (replicate) $ (= N) ")" (string)