module Main where

import Control.Applicative
import Control.Monad

data Hand
    = Gu
    | Choki
    | Pa
    deriving (Show, Eq, Enum)

succ' :: Hand -> Hand
succ' Pa = Gu
succ' h  = succ h

battle :: Hand -> Hand -> IO ()
battle a b
    | a == b       = putStrLn "Drew"
    | succ' a == b = putStrLn "Won"
    | otherwise    = putStrLn "Lost"

main :: IO ()
main = do
    [a, b] <- fmap read . words <$> getLine :: IO [Int]
    battle (toEnum a) (toEnum b)