module Main where

import           Control.Monad
import           Data.List
import           Data.Ord
import           Data.List.Split
import           Data.Array.IO
import qualified Data.Vector.Unboxed           as V

main :: IO ()
main = do
  [a, b] <- map read . words <$> getLine
  case a > b of
    True -> print (a + max (a - 1) b)
    _    -> print (b + max a (b - 1))
