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

1 line
60 B
Haskell

matI n = [ [fromEnum $ i == j | i <- [1..n]] | j <- [1..n]]