Imports System.Collections.Generic
Imports System.Console
Imports System.Math  
Module Program
 	Sub Main()
 	    Dim inputs as String()
        inputs = Console.ReadLine().Split(" ")
	    Dim N As Integer = inputs(0)
	    Dim M As Integer = inputs(1)
	    Dim X As Integer = inputs(2)
	    Dim Y As Integer = inputs(3)

	    Dim maxX As Integer = X
	    Dim minY As Integer = Y
	    
 	    Dim xs as String()
        xs = Console.ReadLine().Split(" ")
        For i As Integer = 0 to N-1
     	    Dim x as Integer = xs(i)
            maxX = Math.Max(maxX, x)
        Next

 	    Dim ys as String()
        ys = Console.ReadLine().Split(" ")
        For i As Integer = 0 to M-1
            Dim y as Integer = ys(i)
            minY = Math.Min(minY, y)
        Next
	    
        Console.WriteLine(IIf(maxX >= minY, "War", "No War"))
    End Sub
End Module
