judge :: [Int] -> String judge (n : k : _) | n == k = "Drew" | n == 2 && k == 0 = "Won" | n == 0 && k == 1 = "Won" | n == 1 && k == 2 = "Won" | otherwise = "Lost" main :: IO () main = putStrLn . judge . map read . words =<< getLine