Initial data commit

Task/Spiral-matrix/Sidef/spiral-matrix.sidef

@@ -0,0 +1,20 @@
+func spiral(n) {
+    var (x, y, dx, dy, a) = (0, 0, 1, 0, [])
+    { |i|
+        a[y][x] = i
+        var (nx, ny) = (x+dx, y+dy)
+        (  if (dx ==  1 && (nx == n || a[ny][nx]!=nil)) { [ 0,  1] }
+        elsif (dy ==  1 && (ny == n || a[ny][nx]!=nil)) { [-1,  0] }
+        elsif (dx == -1 && (nx  < 0 || a[ny][nx]!=nil)) { [ 0, -1] }
+        elsif (dy == -1 && (ny  < 0 || a[ny][nx]!=nil)) { [ 1,  0] }
+        else                                            { [dx, dy] }
+        ) » (\dx, \dy)
+        x = x+dx
+        y = y+dy
+    } << (1 .. n**2)
+    return a
+}
+ 
+spiral(5).each { |row|
+    row.map {"%3d" % _}.join(' ').say
+}