Update Viewport.hs