RosettaCodeData/Task/Matrix-transposition/Common-Lisp/matrix-transposition-1.lisp

(defun transpose (m)
  (apply #'mapcar #'list m))
Initial data commit 2023-07-01 11:58:00 -04:00			`(defun transpose (m)`
			`(apply #'mapcar #'list m))`