; http://en.wikipedia.org/wiki/Hilbert_matrix (lambda (i) (letrec ( (sr (lambda (m n) (if (> m n) '() (cons (/ m) (sr (+ m 1) n))))) (cs (lambda (k) (if (= k 0) '() (cons (sr (+ 1 (- i k)) (- (* 2 i) k)) (cs (- k 1))))))) (cs i)))