main :: IO ()
main = do
    [_, _, x, y] <- fmap (map read . words) getLine :: IO [Int]
    xs           <- fmap (map read . words) getLine :: IO [Int]
    ys           <- fmap (map read . words) getLine :: IO [Int]
    putStrLn $ if maximum (x : xs) < minimum (y : ys) then "No War" else "War"
