// TEMPLATE - START
// ----------------------------------------------------
// DEFINES - START
#include <bits/stdc++.h>
#define FAST \
ios_base::sync_with_stdio(0); \
cin.tie(0); \
cout.tie(0);
// Strings
#define nl "\n"
#define YES cout << "YES\n"
#define NO cout << "NO\n"
#define yn(x) \
if (x) \
cout << "YES\n"; \
else \
cout << "NO\n";
#define yns(x, s1, s2) \
if (x) \
cout << s1 << "\n"; \
else \
cout << s2 << "\n";
#define fail(cond) \
if (cond) \
{ \
NO; \
return; \
}
#define success(cond) \
if (cond) \
{ \
YES; \
return; \
}
// Types
#define ll long long
#define ull unsigned long long
#define vl vector<ll>
#define pll pair<ll, ll>
#define vpll vector<pair<ll, ll>>
#define all(x) (x).begin(), (x).end()
// Loops
#define lp(i, a, b) for (int i = (a); i < (b); i++)
#define rlp(i, a, b) for (int i = (b) - 1; i >= (a); i--)
#define readlp(arr, n) \
lp(i, 0, n) cin >> arr[i];
#define writelp(arr, n) \
lp(i, 0, n) cout << arr[i] << " "; \
cout << nl;
#define vv \
ll n; \
cin >> n; \
vl v(n); \
readlp(v, v.size());
// DEFINES - END
// ----------------------------------------------------
using namespace std;
// ----------------------------------------------------
// ALGORITHMS - START
// Binary Search Custom:
// To Find...,Logical Condition,If Condition is Met...,Return Value
// Lower Bound (First element ≥x),arr[m] >= x,r = m,r
// Upper Bound (First element >x),arr[m] > x,r = m,r
// Last element <x,arr[m] < x,l = m,l
// Last element ≤x,arr[m] <= x,l = m,l
int lowerBound(vector<ll> &v, ll x)
{
int l = -1, r = v.size();
while (r > l + 1)
{
int m = l + (r - l) / 2;
ll curr = v[m];
if (curr >= x)
r = m;
else
l = m;
}
return r;
}
// ALGORITHMS - END
// ----------------------------------------------------
// TEMPLATE END
// ====================================================
// Boody's Code
// 2026-07-30, 21:35:44
// CSES - CSES Problem Set
// Sum of Divisors
// https://c...content-available-to-author-only...s.fi/problemset/task/1082
// Time limit: 00, Memory limit: 1
// status:
// Time taken:
// ----------------------------------------------------
ll mod = 1000000007;
ll modmul(ll a, ll b)
{
return (((a % mod) * (b % mod)) % mod);
}
void solve()
{
ll n, inv2 = (mod + 1) / 2;
cin >> n;
ll sum = (n - 1 + modmul(modmul(n, (n + 1)), inv2)) % mod, a, b, c;
for (ll i = 2; i * i <= n; i++)
{
a = n / i, b = modmul(modmul(a, (a + 1)), inv2), c = modmul(modmul(i, (i + 1)), inv2);
sum += (modmul(a - i + 1, i) + ((b - c + mod) % mod)) % mod, sum %= mod;
}
cout << sum << nl;
}
int main()
{
#ifndef ONLINE_JUDGE
freopen("/home/rodex/rubuntu/CS/CP/input.txt", "r", stdin);
freopen("/home/rodex/rubuntu/CS/CP/output.txt", "w", stdout);
#endif
FAST;
int t = 1;
// cin >> t;
while (t--)
solve();
}
Ly8gVEVNUExBVEUgLSBTVEFSVAovLyAtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tCi8vIERFRklORVMgLSBTVEFSVAojaW5jbHVkZSA8Yml0cy9zdGRjKysuaD4KI2RlZmluZSBGQVNUICAgICAgICAgICAgICAgICAgICAgIFwKICAgIGlvc19iYXNlOjpzeW5jX3dpdGhfc3RkaW8oMCk7IFwKICAgIGNpbi50aWUoMCk7ICAgICAgICAgICAgICAgICAgIFwKICAgIGNvdXQudGllKDApOwovLyBTdHJpbmdzCiNkZWZpbmUgbmwgIlxuIgojZGVmaW5lIFlFUyBjb3V0IDw8ICJZRVNcbiIKI2RlZmluZSBOTyBjb3V0IDw8ICJOT1xuIgojZGVmaW5lIHluKHgpICAgICAgICAgICAgXAogICAgaWYgKHgpICAgICAgICAgICAgICAgXAogICAgICAgIGNvdXQgPDwgIllFU1xuIjsgXAogICAgZWxzZSAgICAgICAgICAgICAgICAgXAogICAgICAgIGNvdXQgPDwgIk5PXG4iOwojZGVmaW5lIHlucyh4LCBzMSwgczIpICAgICAgXAogICAgaWYgKHgpICAgICAgICAgICAgICAgICAgXAogICAgICAgIGNvdXQgPDwgczEgPDwgIlxuIjsgXAogICAgZWxzZSAgICAgICAgICAgICAgICAgICAgXAogICAgICAgIGNvdXQgPDwgczIgPDwgIlxuIjsKI2RlZmluZSBmYWlsKGNvbmQpIFwKICAgIGlmIChjb25kKSAgICAgIFwKICAgIHsgICAgICAgICAgICAgIFwKICAgICAgICBOTzsgICAgICAgIFwKICAgICAgICByZXR1cm47ICAgIFwKICAgIH0KI2RlZmluZSBzdWNjZXNzKGNvbmQpIFwKICAgIGlmIChjb25kKSAgICAgICAgIFwKICAgIHsgICAgICAgICAgICAgICAgIFwKICAgICAgICBZRVM7ICAgICAgICAgIFwKICAgICAgICByZXR1cm47ICAgICAgIFwKICAgIH0KLy8gVHlwZXMKI2RlZmluZSBsbCBsb25nIGxvbmcKI2RlZmluZSB1bGwgdW5zaWduZWQgbG9uZyBsb25nCiNkZWZpbmUgdmwgdmVjdG9yPGxsPgojZGVmaW5lIHBsbCBwYWlyPGxsLCBsbD4KI2RlZmluZSB2cGxsIHZlY3RvcjxwYWlyPGxsLCBsbD4+CiNkZWZpbmUgYWxsKHgpICh4KS5iZWdpbigpLCAoeCkuZW5kKCkKLy8gTG9vcHMKI2RlZmluZSBscChpLCBhLCBiKSBmb3IgKGludCBpID0gKGEpOyBpIDwgKGIpOyBpKyspCiNkZWZpbmUgcmxwKGksIGEsIGIpIGZvciAoaW50IGkgPSAoYikgLSAxOyBpID49IChhKTsgaS0tKQojZGVmaW5lIHJlYWRscChhcnIsIG4pIFwKICAgIGxwKGksIDAsIG4pIGNpbiA+PiBhcnJbaV07CiNkZWZpbmUgd3JpdGVscChhcnIsIG4pICAgICAgICAgICAgICAgIFwKICAgIGxwKGksIDAsIG4pIGNvdXQgPDwgYXJyW2ldIDw8ICIgIjsgXAogICAgY291dCA8PCBubDsKI2RlZmluZSB2diAgICBcCiAgICBsbCBuOyAgICAgXAogICAgY2luID4+IG47IFwKICAgIHZsIHYobik7ICBcCiAgICByZWFkbHAodiwgdi5zaXplKCkpOwovLyBERUZJTkVTIC0gRU5ECi8vIC0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0KdXNpbmcgbmFtZXNwYWNlIHN0ZDsKLy8gLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQovLyBBTEdPUklUSE1TIC0gU1RBUlQKLy8gQmluYXJ5IFNlYXJjaCBDdXN0b206Ci8vIFRvIEZpbmQuLi4sTG9naWNhbCBDb25kaXRpb24sSWYgQ29uZGl0aW9uIGlzIE1ldC4uLixSZXR1cm4gVmFsdWUKLy8gTG93ZXIgQm91bmQgKEZpcnN0IGVsZW1lbnQg4omleCksYXJyW21dID49IHgsciA9IG0scgovLyBVcHBlciBCb3VuZCAoRmlyc3QgZWxlbWVudCA+eCksYXJyW21dID4geCxyID0gbSxyCi8vIExhc3QgZWxlbWVudCA8eCxhcnJbbV0gPCB4LGwgPSBtLGwKLy8gTGFzdCBlbGVtZW50IOKJpHgsYXJyW21dIDw9IHgsbCA9IG0sbAoKaW50IGxvd2VyQm91bmQodmVjdG9yPGxsPiAmdiwgbGwgeCkKewogICAgaW50IGwgPSAtMSwgciA9IHYuc2l6ZSgpOwogICAgd2hpbGUgKHIgPiBsICsgMSkKICAgIHsKICAgICAgICBpbnQgbSA9IGwgKyAociAtIGwpIC8gMjsKICAgICAgICBsbCBjdXJyID0gdlttXTsKICAgICAgICBpZiAoY3VyciA+PSB4KQogICAgICAgICAgICByID0gbTsKICAgICAgICBlbHNlCiAgICAgICAgICAgIGwgPSBtOwogICAgfQogICAgcmV0dXJuIHI7Cn0KLy8gQUxHT1JJVEhNUyAtIEVORAovLyAtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tCi8vIFRFTVBMQVRFIEVORAoKLy8gPT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PQoKLy8gQm9vZHkncyBDb2RlCi8vIDIwMjYtMDctMzAsIDIxOjM1OjQ0Ci8vIENTRVMgLSBDU0VTIFByb2JsZW0gU2V0Ci8vIFN1bSBvZiBEaXZpc29ycwovLyBodHRwczovL2MuLi5jb250ZW50LWF2YWlsYWJsZS10by1hdXRob3Itb25seS4uLnMuZmkvcHJvYmxlbXNldC90YXNrLzEwODIKLy8gVGltZSBsaW1pdDogMDAsIE1lbW9yeSBsaW1pdDogMQovLyBzdGF0dXM6Ci8vIFRpbWUgdGFrZW46CgovLyAtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tCgpsbCBtb2QgPSAxMDAwMDAwMDA3OwpsbCBtb2RtdWwobGwgYSwgbGwgYikKewogICAgcmV0dXJuICgoKGEgJSBtb2QpICogKGIgJSBtb2QpKSAlIG1vZCk7Cn0KCnZvaWQgc29sdmUoKQp7CiAgICBsbCBuLCBpbnYyID0gKG1vZCArIDEpIC8gMjsKICAgIGNpbiA+PiBuOwogICAgbGwgc3VtID0gKG4gLSAxICsgbW9kbXVsKG1vZG11bChuLCAobiArIDEpKSwgaW52MikpICUgbW9kLCBhLCBiLCBjOwogICAgZm9yIChsbCBpID0gMjsgaSAqIGkgPD0gbjsgaSsrKQogICAgewogICAgICAgIGEgPSBuIC8gaSwgYiA9IG1vZG11bChtb2RtdWwoYSwgKGEgKyAxKSksIGludjIpLCBjID0gbW9kbXVsKG1vZG11bChpLCAoaSArIDEpKSwgaW52Mik7CiAgICAgICAgc3VtICs9IChtb2RtdWwoYSAtIGkgKyAxLCBpKSArICgoYiAtIGMgKyBtb2QpICUgbW9kKSkgJSBtb2QsIHN1bSAlPSBtb2Q7CiAgICB9CiAgICBjb3V0IDw8IHN1bSA8PCBubDsKfQoKaW50IG1haW4oKQp7CiNpZm5kZWYgT05MSU5FX0pVREdFCiAgICBmcmVvcGVuKCIvaG9tZS9yb2RleC9ydWJ1bnR1L0NTL0NQL2lucHV0LnR4dCIsICJyIiwgc3RkaW4pOwogICAgZnJlb3BlbigiL2hvbWUvcm9kZXgvcnVidW50dS9DUy9DUC9vdXRwdXQudHh0IiwgInciLCBzdGRvdXQpOwojZW5kaWYKICAgIEZBU1Q7CgogICAgaW50IHQgPSAxOwogICAgLy8gY2luID4+IHQ7CiAgICB3aGlsZSAodC0tKQogICAgICAgIHNvbHZlKCk7Cn0=