Problem: Arithmetic derivative
Code: Arithmetic+derivative/tails_1696492229
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)
% (split (remove empties))
@ (= fstLine)
~ (auto = words)
? (if/else) <--arg( B A )
== (equal?)
$ (= B)
; (save) <--arg( C ) -->let( D )
`r (read int)
@ (= B)
+ (sum) <--arg( E ) -->let( N )
`. (iterate while uniq)
~ (tuple)
0 (integer)
@ (= D)
(implicit tuple) <--arg( G F )
? (if/else) -->let( M )
- (subtract)
^ (pow)
@ (= F)
~ (auto = 2)
~ (auto = 1)
~ (tuple) <--arg( H )
/ (divide)
;@ (= D)
; (save) -->let( L )
/ (foldr1)
| (filter)
>> (tail)
, (range from 1)
~ (auto = infinity)
~ (not)
% (modulus) <--arg( I )
;$ (= F)
$ (= I)
$ (= K) <--arg( K J )
/ (divide)
;$ (= F)
$ (= L)
~ (default)
$ (= M)
`D (to base from data)
-75 (to base from data arg)
(postdata (hex): to base from data)
3e3e66fcd37f68454ee77a7a5ce6be8f875f7717b2af
("Wait, that\'s not a number...")