RosettaCodeData/Task/Identity-matrix/Haskell/identity-matrix-1.hs
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

1 line
60 B
Haskell

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