(use srfi-4-utils)

(define xx1 (f64vector-repmat (f64vector 1 2 3) (list 1 3) (list 3 1)))
(define xx2 (f64vector-repmat xx1 (list 3 3) (list 1 1 3)))

(print (f64vector-meshgrid (f64vector 1 2 3) (f64vector 4 5 6) (f64vector 7 8 9)))