1( "M-<Tab>"2 , toggleWS'3 [ marshall s vw4 | vw <- (map show [1 .. 9])5 , s <- [x | x <- [0 .. nScreens], x /= currentScreen]6 ]7 )