Matrix transposition: Difference between revisions

Content added Content deleted

Inline

@@ Line 2,290: / Line 2,290: @@
 main :: IO ()
+main = print matrix >> print (transpose matrix)
-main =
+  where
-  let matrix = fromList 3 4 [1 ..]
-   in print matrix >> print (transpose matrix)</syntaxhighlight>
+    matrix = fromList 3 4 [1 ..]</syntaxhighlight>
 {{Out}}
 <pre>┌             ┐