#include <bits/stdc++.h>
using namespace std;
typedef long long   signed int LL;
typedef long long unsigned int LU;
#define incII(i, l, r) for(int i = (l)    ; i <= (r); ++i)
#define incID(i, l, r) for(int i = (l)    ; i <  (r); ++i)
#define decII(i, l, r) for(int i = (r)    ; i >= (l); --i)
#define decID(i, l, r) for(int i = (r) - 1; i >= (l); --i)
#define inc(i, n)  incID(i, 0, n)
#define inc1(i, n) incII(i, 1, n)
#define dec(i, n)  decID(i, 0, n)
#define dec1(i, n) decII(i, 1, n)
#define inII(v, l, r) ((l) <= (v) && (v) <= (r))
#define inID(v, l, r) ((l) <= (v) && (v) <  (r))
#define PB push_back
#define EB emplace_back
#define MP make_pair
#define FI first
#define SE second
#define  ALL(v)  v.begin(),  v.end()
#define RALL(v) v.rbegin(), v.rend()
template<typename T> bool setmin  (T & a, T b) { if(b <  a) { a = b; return true; } else { return false; } }
template<typename T> bool setmax  (T & a, T b) { if(b >  a) { a = b; return true; } else { return false; } }
template<typename T> bool setmineq(T & a, T b) { if(b <= a) { a = b; return true; } else { return false; } }
template<typename T> bool setmaxeq(T & a, T b) { if(b >= a) { a = b; return true; } else { return false; } }
LL mo(LL a, LL b) { assert(b > 0); a %= b; if(a < 0) { a += b; } return a; }
LL fl(LL a, LL b) { assert(b > 0); return (a > 0 ? a / b : (a - b + 1) / b); }
LL ce(LL a, LL b) { assert(b > 0); return (a < 0 ? a / b : (a + b - 1) / b); }
#define bit(b, i) (((b) >> (i)) & 1)
#define BC __builtin_popcountll
#define SC(T, v) static_cast<T>(v)
#define SI(v) SC(int, v.size())
#define SL(v) SC( LL, v.size())
#define RF(e, v) for(auto & e: v)
#define ei else if
#define UR assert(false)

// ---- ----

template<typename T> struct MD {
	vector<T> v;
	vector<LL> s;
	MD() { }
	MD(vector<LL> arg_s, T iv) { init(arg_s, iv); }
	void init(vector<LL> arg_s, T iv) {
		s = arg_s;
		LL p = 1;
		RF(e, s) { p *= e; }
		v = vector<T>(p, iv);
	}
	T & operator[](vector<LL> t) {
		assert(SI(t) == SI(s));
		LL a = 0, p = 1;
		dec(i, SI(s)) { a += t[i] * p; p *= s[i]; }
		return v.at(a);
	}
};

int main() {
	LL n, MOD = 1e9 + 7;
	cin >> n;
	n++;
	
	MD<LL> dp({ 61, 2, 2, 2 }, 0);
	dp[{ 60, 0, 0, 0 }] = 1;
	dec(i, 60) {
		inc(f1, 2) {
		inc(g1, 2) {
		inc(h1, 2) {
		inc(f2, 2) {
		inc(g2, 2) {
		inc(h2, 2) {
		inc(y, 2) {
		inc(x, 2) {
			if(
				(
					(f1 == 0 && f2 == y && x == 0) ||
					(f1 == 1 && f2 == 1)
				) && (
					(g1 == 0 && ((g2 == 1) == (y == 1 && x == 1))) ||
					(g1 == 1 && g2 == 1)
				) && (
					(h1 == 0 && h2 == 0 && y == bit(n, i)) ||
					(h1 == 0 && h2 == 1 && y <  bit(n, i)) ||
					(h1 == 1 && h2 == 1)
				)
			) {
				(dp[{ i, f2, g2, h2 }] += dp[{ i + 1, f1, g1, h1 }]) %= MOD;
			}
		}
		}
		}
		}
		}
		}
		}
		}
	}
	
	cout << dp[{ 0, 1, 1, 1 }] << endl;
	
	return 0;
}