| (i, k) <- zip myWorkspaces ([xK_1 .. xK_9] ++ [xK_0] -- 1..9,0
++ [xK_F1 .. xK_F10]) -- f1..f10
, (f, m) <- [(W.view, 0), (W.shift, shiftMask)]]
main = xmonad $ defaultConfig
| (i, k) <- zip myWorkspaces ([xK_1 .. xK_9] ++ [xK_0] -- 1..9,0
++ [xK_F1 .. xK_F10]) -- f1..f10
, (f, m) <- [(W.view, 0), (W.shift, shiftMask)]]
main = xmonad $ defaultConfig