samer@1: (import "samer.core.util.swing.*")
samer@1: (import "samer.units.*")
samer@1: 
samer@1: (define canvas (VCanvas.))
samer@1: (define mouse (MousePosition. canvas))
samer@1: (expose canvas "canvas")
samer@1: (expose)
samer@1: