Matrix transposition: Difference between revisions
Content added Content deleted
(→{{header|Common Lisp}}: Transpose a matrix given as a array.) |
|||
| Line 603: | Line 603: | ||
=={{header|Common Lisp}}== |
=={{header|Common Lisp}}== |
||
If the matrix is given as a list:<lang lisp>(defun transpose (m) |
|||
(defun transpose (m) |
|||
(apply #'mapcar #'list m))</lang> |
(apply #'mapcar #'list m))</lang> |
||