namespace AtCoder; #nullable enable using System.Numerics; class WaveletMatrix where T : IAdditionOperators, ISubtractionOperators, IAdditiveIdentity { const int d = 32; uint[,] Rank0 { get; init; } T[,] Sum { get; init; } int Length => Rank0.GetLength(1) - 1; public WaveletMatrix((uint, T)[] array) { var n = array.Length; var ranks = new uint[d, n + 1]; var sum = new T[d, n + 1]; var a = array.AsSpan(); var b = new (uint, T)[n].AsSpan(); var a0 = new (uint, T)[n].AsSpan(); var a1 = new (uint, T)[n].AsSpan(); for (var i = d - 1; i >= 0; i--) { var (i0, i1) = (0, 0); for (var j = 0; j < n; j++) { ranks[i, j + 1] += ranks[i, j]; var v = a[j]; if ((v.Item1 & (1U << i)) > 0) { ranks[i, j + 1]++; a1[i1++] = v; } else a0[i0++] = v; } for (var j = 0; j < i0; j++) b[j] = a0[j]; for (var j = 0; j < i1; j++) b[j + i0] = a1[j]; sum[i, 0] = T.AdditiveIdentity; for (var j = 0; j < n; j++) sum[i, j + 1] = sum[i, j] + b[j].Item2; var tmp = a; a = b; b = tmp; } for (var i = 0; i < d; i++) for (var j = 1U; j <= n; j++) ranks[i, j] = j - ranks[i, j]; (Rank0, Sum) = (ranks, sum); } public T Frequency(uint l, uint r, uint upper) // [l, r), [0, upper) { var (n, rank0, sum) = (Length, Rank0, Sum); var res = T.AdditiveIdentity; for (var i = d - 1; i >= 0; i--) { if (l >= r) break; var (l0, r0) = (rank0[i, l], rank0[i, r]); if ((upper & (1U << i)) > 0) { res += sum[i, r0] - sum[i, l0]; var zeros = rank0[i, n]; l += zeros - l0; r += zeros - r0; } else (l, r) = (l0, r0); } return res; } } class PointMap { readonly WaveletMatrix matrix; readonly uint[] xs; public PointMap((uint, uint, long)[] points) { var sorted = points.OrderBy(e => e.Item1); var xs = sorted.Select(e => e.Item1); var ys = sorted.Select(e => (e.Item2, e.Item3)); matrix = new WaveletMatrix(ys.ToArray()); this.xs = xs.ToArray(); } public long Sum((uint, uint) lowerLeft, (uint, uint) upperRight) // [lx, rx), [ly, ry) { var (lx, ly) = lowerLeft; var (rx, ry) = upperRight; if (lx > rx || ly > ry) return 0; return Sum(lx, ly, rx - lx, ry - ly); } public long Sum(uint x, uint y, uint dx, uint dy) // [x, x + dx), [y, y + dy) { var ux = uint.MaxValue; if (x <= ux - dx) ux = x + dx; var uy = uint.MaxValue; if (y <= uy - dy) uy = y + dy; var l = MinIndex(x); var r = MinIndex(ux); return matrix.Frequency(l, r, uy) - matrix.Frequency(l, r, y); } uint MinIndex(uint x) { var xs = this.xs; var (l, r) = (-1, xs.Length); while (r - l > 1) { var m = (l + r) >> 1; if (xs[m] < x) l = m; else r = m; } return (uint)r; } } static class Extensions { public static T[] Repeat(this int time, Func F) => Enumerable.Range(0, time).Select(_ => F()).ToArray(); } class AtCoder { object? Solve() { var shift = 1000; var n = Int(); var pz = new (uint, uint)[n]; for (var i = 0; i < n; i++) { var x = Int(); var y = Int(); pz[i] = ((uint)(x + y + shift), (uint)(x - y + shift)); } PointMap map; { var m = Int(); var qz = new (uint, uint, long)[m]; for (var i = 0; i < m; i++) { var x = Int(); var y = Int(); qz[i] = ((uint)(x + y + shift), (uint)(x - y + shift), 1); } map = new(qz); } bool F(uint d) { foreach (var (x, y) in pz) { var lx = 0U; if (x >= d) lx = x - d; var ly = 0U; if (y >= d) ly = y - d; var rx = x + d + 1; var ry = y + d + 1; var c = map.Sum((lx, ly), (rx, ry)); if (c > 0) return true; } return false; } if (F(0)) return 0; var fail = 0U; var pass = uint.MaxValue / 2; while (pass - fail > 1) { var middle = (pass + fail) >> 1; if (F(middle)) pass = middle; else fail = middle; } return pass; } public static void Main() => new AtCoder().Run(); public void Run() { var res = Solve(); if (res != null) { if (res is bool yes) res = yes ? "Yes" : "No"; sw.WriteLine(res); } sw.Flush(); } string[] input = Array.Empty(); int iter = 0; readonly StreamWriter sw = new(Console.OpenStandardOutput()) { AutoFlush = false }; string String() { while (iter >= input.Length) (input, iter) = (Console.ReadLine()!.Split(' '), 0); return input[iter++]; } T Input() where T : IParsable => T.Parse(String(), null); int Int() => Input(); void Out(object? x, string? separator = null) { separator ??= Environment.NewLine; if (x is System.Collections.IEnumerable obj and not string) { var firstLine = true; foreach (var item in obj) { if (!firstLine) sw.Write(separator); firstLine = false; sw.Write(item); } } else sw.Write(x); sw.WriteLine(); } }