RosettaCodeData/Task/Identity-matrix/Nim/identity-matrix.nim

6 lines
144 B
Nim
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
proc identityMatrix(n): auto =
result = newSeq[seq[int]](n)
for i in 0 .. < result.len:
result[i] = newSeq[int](n)
result[i][i] = 1