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

#define rep(i,n) for(long long i = 0; i < (long long)(n); i++)
#define all(x) (x).begin(), (x).end()
#define fi first
#define se second
using ll = long long; using vll = vector<ll>; using vvll = vector<vll>; using P = pair<ll, ll>;
static const long long mo = 1e9+7;

int main(void) {
    ll n; cin >> n; assert(0<=n&&n<=1000000000000000000ll);
    string s; while (n) s += char(n % 2), n >>= 1; reverse(all(s));

    ll dp[100][2][2][2][2] = {}; 
    // dp[i][j][h][k][l] = 
    // i桁目まで見て、
    // n未満が確定していて(j)、
    // X<Yが確定していて(h)、
    // AND<XORが確定していて(k)、
    // XOR<ORが確定している(l)場合の数
    //
    // これを気合で配るDPします

    dp[0][0][0][0][0] = 1;
    rep(i, s.length()) {
        rep(j, 2) rep(h, 2) rep(k, 2) rep(l, 2) if (dp[i][j][h][k][l]) {
            set<P> t = {P(0,0), P(0,1), P(1,0), P(1,1) };
            // n未満確定していたらyは何でも選べる、そうでなければsに束縛
            if (!j) if (s[i] == 0) t.erase(P(0, 1)), t.erase(P(1, 1));
            // X<Yが確定していれば何でも選べる、そうでなければXに1, Yに0は配れない
            if (!h) t.erase(P(1, 0));
            // AND<XORが確定していないと、Xに1、Yに1は選べない。
            if (!k) t.erase(P(1, 1));

            for (auto x : t) 
                (dp[i+1][j|(x.se<s[i])][h|(x.fi<x.se)][k|(x.fi^x.se)][l|(x.fi&x.se)] += dp[i][j][h][k][l]) %= mo;
        }
    }

    ll ret = 0;
    rep(j, 2) rep(h, 2)
        (ret += dp[s.length()][j][h][1][1]) %= mo;

    cout << ret << endl;

    return 0;
}