#include <bits/stdc++.h>
using namespace std;

typedef long long   signed int LL;
typedef long long unsigned int LU;

#define incID(i, l, r) for(int i = (l)    ; i <  (r); i++)
#define incII(i, l, r) for(int i = (l)    ; i <= (r); i++)
#define decID(i, l, r) for(int i = (r) - 1; i >= (l); i--)
#define decII(i, l, r) for(int i = (r)    ; 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 PQ priority_queue

#define  ALL(v)  v.begin(),  v.end()
#define RALL(v) v.rbegin(), v.rend()
#define  FOR(it, v) for(auto it =  v.begin(); it !=  v.end(); ++it)
#define RFOR(it, v) for(auto it = v.rbegin(); it != v.rend(); ++it)

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; } }
template<typename T> T gcd(T a, T b) { return (b == 0 ? a : gcd(b, a % b)); }
template<typename T> T lcm(T a, T b) { return a / gcd(a, b) * b; }

// ---- ----

LL MOD = -1;
LL mod(LL x, LL m = MOD) { return (x % m + m) % m; }
pair<LL, LL> ex_gcd(LL a, LL b) {
	if(b == 0) { return MP(1, 0); }
	auto p = ex_gcd(b, a % b);
	return MP(p.SE, p.FI - (a / b) * p.SE);
}
LL inv(LL x, LL m = MOD) {
	assert(gcd(x, m) == 1);
	auto p = ex_gcd(x, m);
	return mod(p.FI, m);
}
LL promod(LL x, LL y, LL m = MOD) { return mod((x % m) * (y % m), m); }
LL divmod(LL x, LL y, LL m = MOD) { return promod(x, inv(y, m), m); }

// ----

#define bit(b, i) (((b) >> (i)) & 1)

LL n, dp[61][2][2][2][2];

int main() {
	MOD = 1e9 + 7;
	cin >> n;
	
	dp[60][1][1][0][0] = 1;
	dec(i, 60) {
		inc(v, 2) {
		inc(w, 2) {
		inc(x, 2) {
		inc(y, 2) {
			if(x == 1 && y == 1) { continue; }
			inc(vv, 2) {
			inc(ww, 2) {
			inc(xx, 2) {
			inc(yy, 2) {
				if(xx == 1 && yy == 1) { continue; }
				
				if(v == 0 && vv == 1) { continue; }
				if(w == 0 && ww == 1) { continue; }
				
				if(v == 1 && bit(n, i) <  xx) { continue; }
				if(w == 1 && bit(n, i) <  yy) { continue; }
				if(v == 1 && bit(n, i) >  xx && vv == 1) { continue; }
				if(w == 1 && bit(n, i) >  yy && ww == 1) { continue; }
				if(v == 1 && bit(n, i) == xx && vv == 0) { continue; }
				if(w == 1 && bit(n, i) == yy && ww == 0) { continue; }
				
				(dp[i][vv][ww][xx][yy] += dp[i + 1][v][w][x][y]) %= MOD;
			}
			}
			}
			}
		}
		}
		}
		}
	}
	
	LL s = 0;
	inc(i, 60) {
		LL u = 1;
		if(n + 1 >= (1LL << (i + 1))) {
			inc(j, 2 * i + 1) { (u *= 2) %= MOD; }
			(s += u) %= MOD;
		} else {
			u = (n + 1 - (1LL << i)) % MOD;
			inc(j, i + 1) { (u *= 2) %= MOD; }
			(s += u) %= MOD;
			break;
		}
	}
	(s += 1) %= MOD;
	
	LL t = 0;
	inc(v, 2) {
	inc(w, 2) {
	inc(x, 2) {
	inc(y, 2) {
		(t += dp[0][v][w][x][y]) %= MOD;
	}
	}
	}
	}
	
	// cout << "s, t: " << s << " " << t << endl;
	
	cout << divmod(s - t, 2) << endl;
	
	/*
	int g = 0, h = 0;
	incII(i, 0, n) {
	incII(j, 0, n) {
		if(i < j) { g++; }
		if((i & j) == 0) { h++; }
	}
	}
	cout << "g: " << g << endl;
	cout << "h: " << h << endl;
	*/
	
	return 0;
}