import Control.Monad import Control.Applicative import Data.List main ::IO() main=do p <- readLn :: IO Int input <- replicateM p ((map read . words) <$> getLine) mapM_ (putStrLn . solve) input solve1 :: [Int] -> Int solve1 [x,y] = (x-1) `mod` (y+1) solve = toStr . solve1 toStr :: Int -> String toStr 0 = "Lose" toStr _ = "Win"