center

Centers the window on the screen.

• (send a-top-level-window center direction) -> void
      direction = 'both : symbol in '(horizontal vertical both)

  If direction is 'horizontal, the window is centered horizontally. If direction is 'vertical, the window is centered vertically. If direction is 'both, the window is centered in both directions.