Data update

2023-12-16 21:33:55 -08:00 · 2023-12-16 21:33:55 -08:00 · 74c69a0df6
commit 74c69a0df6
parent 35bcdeebf8
2427 changed files with 31826 additions and 3468 deletions
--- a/Task/Multifactorial/Ol/multifactorial-1.ol
+++ b/Task/Multifactorial/Ol/multifactorial-1.ol
@ -0,0 +1,13 @@
+(define (multifactorial n d)
+   (fold * 1 (iota (div n d) n (negate d))))
+
+(for-each (lambda (i)
+      (display "Degree ")
+      (display i)
+      (display ":")
+      (for-each (lambda (n)
+            (display " ")
+            (display (multifactorial n i)))
+         (iota 10 1))
+      (print))
+   (iota 5 1))