open Base
open Stdio

let () =
  let (x, y) = Caml.Scanf.scanf "%d %d" (fun x y -> x, y) in
  let ans = ref "No" in
  for i = 0 to x do
    let a = i in
    let b = x - i in
    if phys_equal (2 * a + 4 * b) y
    then ans := "Yes"
  done;
  print_endline !ans;
