import Data.List
g=1000000007

main = do
       e<-getLine
       let n=read e::Integer
       print $ (product [(n+1)..(n+9)] `div` product [1..9]) `mod` g