Добре дошли в DrRacket, версия 7.0 [3m].
Език: R5RS [потребителски]; memory limit: 128 MB.
> (get-row 1 m)
[image] [image] zero?: contract violation
  expected: number?
  given: ((1 2 3) (4 5 6))
> (get-row 1 m)
(4 5 6)
> (get-row 0 m)
(1 2 3)
> (get-col 0 m)
[image] [image] mmap: arity mismatch;
 the expected number of arguments does not match the given number
  given: 1
  arguments> (get-col 0 m)
(1 4)
> (get-col 1 m)
(2 5)
> (transpose m)
[image] [image] l: undefined;
 cannot reference an identifier before its definition
> (transpose m)
((1 4) (2 5) (3 6))
> (map list m)

> (map list m)
(((1 2 3)) ((4 5 6)))
> (map list '(1 2 3) '(4 5 6))
((1 4) (2 5) (3 6))
> (apply map list m)
((1 4) (2 5) (3 6))
> (transpose m)
((1 4) (2 5) (3 6))
> (sum-matrices m m)
((2 4 6) (8 10 12))
> (mult-vectors '(1 2 3) (4 5 6))
[image] [image] application: not a procedure;
 expected a procedure that can be applied to arguments
  given: 4
  arguments
> (mult m (transpose m))
[image] [image] mult: undefined;
 cannot reference an identifier before its definition
> (mult-matrices m (transpose m))
[image] [image] mmap: arity mismatch;
 the expected number of arguments does not match the given number
  given: 1
  arguments
> (mult-matrices m (transpose m))
((14 32) (32 77))