renderMenu :: Picture
renderMenu = pictures [menuBox, title, startB, exitB]
  where (mX,mY) = menuLocation
        (tX,tY) = menuLabelLocation
        menuBox = translate mX mY $ menuBgPicture
        title = translate tX tY $
                   scale menuTextScale menuTextScale $
                   logoPic
        startB = renderButton startButton
        exitB = renderButton exitButton
renderMenu :: Picture
renderMenu = pictures [menuBox, title, startB, exitB]
  where (mX,mY) = menuLocation
        (tX,tY) = menuLabelLocation
        menuBox = translate mX mY $ menuBgPicture
        title = translate tX tY $
                   scale menuTextScale menuTextScale $
                   logoPic
        startB = renderButton startButton
        exitB = renderButton exitButton
renderMenu = pictures [menuBox, title, startB, exitB]
  where (mX,mY) = menuLocation
        (tX,tY) = menuLabelLocation
        menuBox = translate mX mY $ menuBgPicture
        title = translate tX tY $
                   scale menuTextScale menuTextScale $
                   logoPic
        startB = renderButton startButton
        exitB = renderButton exitButton