RosettaCodeData/Task/Matrix-multiplication/Racket/matrix-multiplication-2.rkt

#lang racket
(require math)
(matrix* (matrix [[1 2] [3 4]]) (matrix [[5 6] [7 8]]))
;; -> (array #[#[19 22] #[43 50]])
A-M baby 2013-04-10 21:29:02 -07:00			`#lang racket`
			`(require math)`
update 2013-06-05 21:47:54 +00:00			`(matrix* (matrix [[1 2] [3 4]]) (matrix [[5 6] [7 8]]))`
			`;; -> (array #[#[19 22] #[43 50]])`