main = do
    [n, m, lx, ly] <- map read . words <$> getLine :: IO [Int]
    xs             <- map read . words <$> getLine :: IO [Int]
    ys             <- map read . words <$> getLine :: IO [Int]
    let maxX = maximum xs
    let minY = minimum ys
    if (lx < ly && maxX < minY && maxX < ly && lx < minY)
        then print "No War"
        else print "War"