xmonad.hs:105:94: error:
    • Couldn't match expected type ‘ScreenId’
                  with actual type ‘ScreenId -> ScreenId’
    • The lambda expression ‘\ (S n) -> S (1 - n)’
      has one value argument,
        but its type ‘ScreenId’ has none
      In the third argument of ‘onScreen'’, namely
        ‘(\ (S n) -> S (1 - n))’
      In the first argument of ‘windows’, namely
        ‘(onScreen'
            viewEmptyWorkspace FocusCurrent (\ (S n) -> S (1 - n)))’
    |
105 |     , ((mod4Mask .|. controlMask, xK_e), windows (onScreen' viewEmptyWorkspace FocusCurrent (\(S n) -> S (1 - n))))
    |                                                                                              ^^^^^^^^^^^^^^^^^^^

Please check the file for errors.