#include #include #include using namespace std; template inline void YES(T condition){ if(condition) cout << "YES" << endl; else cout << "NO" << endl; } template inline void Yes(T condition){ if(condition) cout << "Yes" << endl; else cout << "No" << endl; } template inline void POSS(T condition){ if(condition) cout << "POSSIBLE" << endl; else cout << "IMPOSSIBLE" << endl; } template inline void Poss(T condition){ if(condition) cout << "Possible" << endl; else cout << "Impossible" << endl; } template inline void First(T condition){ if(condition) cout << "First" << endl; else cout << "Second" << endl; } int character_count(string text, char character){ int ans = 0; for(int i = 0; i < text.size(); i++){ ans += (text[i] == character); } return ans; } long power(long base, long exponent, long module){ if(exponent % 2){ return power(base, exponent - 1, module) * base % module; }else if(exponent){ long root_ans = power(base, exponent / 2, module); return root_ans * root_ans % module; }else{ return 1; }} struct position{ int y, x; }; position move_pattern[4] = {{-1, 0}, {0, 1}, {1, 0}, {0, -1}}; // double euclidean(position first, position second){ return sqrt((second.x - first.x) * (second.x - first.x) + (second.y - first.y) * (second.y - first.y)); } template void array_output(itr start, itr goal){ string ans; for(auto i = start; i != goal; i++){ ans += to_string(*i) + " "; } ans.pop_back(); cout << ans << endl; } long gcd(long a, long b){ if(a && b){ return gcd(min(a, b), max(a, b) % min(a, b)); }else{ return a; }} #define mod long(1e9 + 7) #define all(x) (x).begin(), (x).end() #define bitcount(n) __builtin_popcountl(long(n)) #define int __int128 #define long __int128 ostream &operator<<(ostream &os, __int128_t value) { if (ostream::sentry(os)) { __uint128_t tmp = value < 0 ? -value : value; char buffer[64]; char *d = end(buffer); do { --d; *d = "0123456789"[tmp % 10]; tmp /= 10; } while (tmp != 0); if (value < 0) { --d; *d = '-'; } int len = end(buffer) - d; if (os.rdbuf()->sputn(d, len) != len) { os.setstate(ios_base::badbit); } } return os; } istream &operator>>(istream &is, __int128_t &value) { string in; is >> in; value = 0; for (const char &c : in) { if ('0' <= c && c <= '9') value = 10 * value + (c - '0'); } if (in[0] == '-') value *= -1; return is; } long N; long dp[70][3][3]; long choose(int now, int is_less_count, int phase){ // is_less_count : is_less_x + is_less_y, phase : nothing -> hetero -> dominant homo if(now < 0){ return phase == 2; }else if(dp[now][is_less_count][phase] != -1){ return dp[now][is_less_count][phase]; }else if(is_less_count == 2){ if(phase == 2){ return dp[now][is_less_count][phase] = choose(now - 1, 2, 2) * 4 % mod; }else if(phase == 1){ return dp[now][is_less_count][phase] = (choose(now - 1, 2, 2) + choose(now - 1, 2, 1) * 3) % mod; }else{ return dp[now][is_less_count][phase] = (choose(now - 1, 2, 1) * 2 + choose(now - 1, 2, 0)) % mod; } }else if(is_less_count == 1 && ((N >> now) & 1)){ if(phase == 2){ return dp[now][is_less_count][phase] = (choose(now - 1, 2, 2) * 2 + choose(now - 1, 1, 2) * 2) % mod; }else{ return dp[now][is_less_count][phase] = (choose(now - 1, 1, 2) + choose(now - 1, 1, 1) + choose(now - 1, 2, 1) * 2) % mod; } }else if(is_less_count == 1){ return dp[now][is_less_count][phase] = choose(now - 1, 1, phase) * 2 % mod; }else if((N >> now) & 1){ return dp[now][is_less_count][phase] = (choose(now - 1, 1, 1) * 2 + choose(now - 1, 2, 0)) % mod; }else{ return dp[now][is_less_count][phase] = choose(now - 1, 0, 0) % mod; } } signed main(){ cin >> N; for(int i = 0; i < 70; i++){ for(int j = 0; j < 3; j++){ for(int k = 0; k < 3; k++){ dp[i][j][k] = -1; } } } cout << choose(60, 0, 0) / 2 << endl; }