Matrix transposition: Difference between revisions
Content added Content deleted
m (→{{header|AppleScript}}: Tidied) |
|||
Line 2,290: | Line 2,290: | ||
main :: IO () |
main :: IO () |
||
main = print matrix >> print (transpose matrix) |
|||
main = |
|||
where |
|||
let matrix = fromList 3 4 [1 ..] |
|||
matrix = fromList 3 4 [1 ..]</syntaxhighlight> |
|||
{{Out}} |
{{Out}} |
||
<pre>┌ ┐ |
<pre>┌ ┐ |