RosettaCodeData/Task/Identity-matrix/Jq/identity-matrix-1.jq
2023-07-01 13:44:08 -04:00

3 lines
105 B
Text

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