solve n = last $ iterate step (replicate 10 1) !! n
  where
    step xs = zipWith add xs (scanl add 0 xs) 
    add x y = (x+y)`mod`(10^9+7)

main = print . solve =<< readLn