(define (transpose m)
  (apply map list m))