RosettaCodeData/Task/Identity-matrix/PowerShell/identity-matrix-1.psh

function identity($n) {
    0..($n-1) | foreach{$row = @(0) * $n; $row[$_] = 1; ,$row}
}
function show($a) { $a | foreach{ "$_"} }
$array = identity 4
show $array
2016 Update 2016-12-05 22:15:40 +01:00			`function identity($n) {`
September Morn Update 2019-09-12 10:33:56 -07:00			`0..($n-1) \| foreach{$row = @(0) * $n; $row[$_] = 1; ,$row}`
Another update from ingydotnet^djgoku 2015-11-18 06:14:39 +00:00			`}`
September Morn Update 2019-09-12 10:33:56 -07:00			`function show($a) { $a \| foreach{ "$_"} }`
2016 Update 2016-12-05 22:15:40 +01:00			`$array = identity 4`
Another update from ingydotnet^djgoku 2015-11-18 06:14:39 +00:00			`show $array`