judge :: [Int] -> String judge (n : k : _) = if (==) 1 $ mod n $ k + 1 then "Lose" else "Win" main :: IO () main = getLine >> getContents >>= putStr . unlines . map judge . map (map read) . map words . lines