import Control.Applicative ((<$>)) import Control.Monad (replicateM) import Data.Bool (bool) main :: IO () main = do n <- readLn solve <$> replicateM n (map read <$> words <$> getLine) >>= mapM_ putStrLn solve :: [[Int]] -> [String] solve = map f where f [n, k] = bool "Win" "Lose" $ (n-1) `mod` (k+1) == 0