(module data
    (objects)

  (import (scheme base)
          (record-vector))

  (define objects (record-vector
                   #:table (rv-new
                            #:posn (rv-new #:x 100 #:y 20)
                            #:height 80
                            #:items (rv-new
                                     #:cup (rv-new  #:posn (rv-new #:x 10 #:y 0))
                                     #:pot (rv-new  #:posn (rv-new #:x 20 #:y 10))))))
  ) ;; end of module