September Morn Update

Task/Multifactorial/00META.yaml

@@ -0,0 +1 @@
+--- {}

Task/Multifactorial/AWK/multifactorial.awk

@@ -0,0 +1,19 @@
+# syntax: GAWK -f MULTIFACTORIAL.AWK
+# converted from Go
+BEGIN {
+    for (k=1; k<=5; k++) {
+      printf("degree %d:",k)
+      for (n=1; n<=10; n++) {
+        printf(" %d",multi_factorial(n,k))
+      }
+      printf("\n")
+    }
+    exit(0)
+}
+function multi_factorial(n,k,  r) {
+    r = 1
+    for (; n>1; n-=k) {
+      r *= n
+    }
+    return(r)
+}

Task/Multifactorial/Aime/multifactorial.aime

@@ -1,5 +1,4 @@
-integer
-mf(integer a, integer n)
+mf(integer a, n)
 {
     integer o;
 
@@ -8,10 +7,9 @@ mf(integer a, integer n)
         o *= a;
     } while (0 < (a -= n));
 
-    return o;
+    o;
 }
 
-integer
 main(void)
 {
     integer i, j;
@@ -26,5 +24,5 @@ main(void)
         o_("\n");
     }
 
-    return 0;
+    0;
 }

Task/Multifactorial/Swift/multifactorial.swift

@@ -0,0 +1,13 @@
+func multiFactorial(_ n: Int, k: Int) -> Int {
+  return stride(from: n, to: 0, by: -k).reduce(1, *)
+}
+
+let multis = (1...5).map({degree in
+  (1...10).map({member in
+    multiFactorial(member, k: degree)
+  })
+})
+
+for (i, degree) in multis.enumerated() {
+  print("Degree \(i + 1): \(degree)")
+}