September Morn Update

2019-09-12 10:33:56 -07:00 · 2019-09-12 10:33:56 -07:00 · aac6731f2c
commit aac6731f2c
parent 4e2d22a71d
6856 changed files with 141342 additions and 21127 deletions
--- a/Task/Fibonacci-sequence/Dc/fibonacci-sequence.dc
+++ b/Task/Fibonacci-sequence/Dc/fibonacci-sequence.dc
@ -0,0 +1,17 @@
+[               # todo: n(<2) -- 1 and break 2 levels
+  d -           # 0
+  1 +           # 1
+  q
+] s1
+
+[               # todo: n(>-1) -- F(n)
+  d 0=1         # n(!=0)
+  d 1=1         # n(!in {0,1})
+  2 - d 1 +     # (n-2) (n-1)
+  lF x          # (n-2) F(n-1)
+  r             # F(n-1) (n-2)
+  lF x          # F(n-1)+F(n-2)
+  +
+] sF
+
+33 lF x f