main = do
    [n, m, lb, ub] <- map read . words <$> getLine :: IO [Int]
    x <- map read . words <$> getLine
    y <- map read . words <$> getLine
    putStrLn $ if maximum (lb:x) < minimum (ub:y) then "No War" else "War"