NewBreakoutMain.hs

      -- Vorbedingungen:
      --
      -- gameover :: Behavior Bool
      -- normalPicture :: Behavior (Behavior Picture)
      -- gameoverPicture :: Picture -> Behavior Picture
      go <- gameover                                     -- go :: Behavior Bool
      goEvent <- Control.FRPNow.Lib.when go              -- goEvent :: Event ()
      normalPic <- normalPicture                         -- normalPic :: Behavior Picture
      goPic <- snapshot normalPic goEvent                -- goPic :: Event Picture
      switch normalPic (gameoverPicture <$> goPic)       -- Behavior Picture