solver :: Integer -> Integer solver n = ((n + 3) `div` 2) * ((n + 2) `div` 2) - 1 main :: IO () main = readLn >>= print . flip mod 1000007 . solver