September 2017 Update

2017-09-23 10:01:46 +02:00 · 2017-09-23 10:01:46 +02:00 · ba8067c3b7
commit ba8067c3b7
parent bba7bfd280
14570 changed files with 153136 additions and 63871 deletions
--- a/Task/Identity-matrix/Phix/identity-matrix.phix
+++ b/Task/Identity-matrix/Phix/identity-matrix.phix
@ -0,0 +1,13 @@
+function identity(integer n)
+sequence res = repeat(repeat(0,n),n)
+    for i=1 to n do
+        res[i][i] = 1
+    end for
+    return res
+end function
+
+ppOpt({pp_Nest,1})
+pp(identity(3))
+pp(identity(5))
+pp(identity(7))
+pp(identity(9))