RosettaCodeData/Task/Identity-matrix/Jq/identity-matrix-3.jq
2017-09-25 22:28:19 +02:00

3 lines
81 B
Text

def identity(n):
reduce range(0;n) as $i
(0 | matrix(n;n); .[$i][$i] = 1);