let () =
    let a, b =
        read_line ()
        |> fun l -> Scanf.sscanf l "%d %d" (fun a b -> (a, b)) in
    min a b
    |> fun a -> a * 2
    |> Printf.printf "%d\n"