Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
1
Task/Fibonacci-sequence/WDTE/fibonacci-sequence-1.wdte
Normal file
1
Task/Fibonacci-sequence/WDTE/fibonacci-sequence-1.wdte
Normal file
|
|
@ -0,0 +1 @@
|
|||
let memo fib n => n { > 1 => + (fib (- n 1)) (fib (- n 2)) };
|
||||
10
Task/Fibonacci-sequence/WDTE/fibonacci-sequence-2.wdte
Normal file
10
Task/Fibonacci-sequence/WDTE/fibonacci-sequence-2.wdte
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
let s => import 'stream';
|
||||
let a => import 'arrays';
|
||||
|
||||
let fib n => (
|
||||
let reducer p n => [a.at p 1; + (a.at p 0) (a.at p 1)];
|
||||
s.range 1 n
|
||||
-> s.reduce [0; 1] reducer
|
||||
-> a.at 1
|
||||
;
|
||||
);
|
||||
Loading…
Add table
Add a link
Reference in a new issue