(define A ((matrix-generator (let ((ls '(("Jones, J." "2117 Plum St." "412-8421") ("Jones, M." "1392 First Ave." "424-7773") ("Jose, M." "3314 Valley Dr." "421-0035") ("Joslin, J." "2550 Western" "412-5531")))) (lambda (i j) (list-ref (list-ref ls i) j)))) 4 3))