import Data.Array
main = interact $ show . sol . read

sol = a

a n
  | n < 70    = ar!n
  | odd n     = (2*a k + a (k-1)) `mod` p
  | otherwise = (2*a (k-1) + a k) `mod` p
  where
  k = n `div` 2

p = 10^9+7 :: Integer

ar = listArray (0,69)
  [1, 2, 4, 5, 8, 10, 13, 14, 18, 21, 26, 28, 33, 36, 40, 41, 46, 50, 57, 60, 68, 73, 80, 82, 89, 94, 
  102, 105, 112, 116, 121, 122, 128, 133, 142, 146, 157, 164, 174, 177, 188, 196, 209, 214, 226, 233, 
  242, 244, 253, 260, 272, 277, 290, 298, 309, 312, 322, 329, 340, 344]