#include <bits/stdc++.h>
using namespace std;
const int maxn = 100000 + 100;
const int mod = 1000000000 + 7;
long long ten[maxn];
string s;
long long power(long long a, long long b) {
  long long res = 1;
  while (b) {
    if (b & 1) res = res * a % mod;
    b >>= 1;
    a = a * a % mod;
  }
  return res % mod;
}
void init() {
  ten[0] = 1;
  long long t = 1;
  for (int i = 1; i <= 100000; i++) {
    t = t * 10 % mod;
    ten[i] = (ten[i - 1] + (i + 1) * t % mod) % mod;
  }
}
long long cal(long long x, long long y) {
  long long res = 0;
  if (y - 1 >= 0) res = (res + ten[y - 1]) % mod;
  res = (res + (x * x + x) / 2 % mod * power(10, y)) % mod;
  return res;
}
int main() {
  init();
  cin >> s;
  int n = s.size();
  long long ans = 0;
  for (int i = 0; i < n; i++) {
    long long dig = s[i] - '0';
    ans = (ans + dig * cal(i, n - i - 1) % mod) % mod;
  }
  cout << ans << endl;
  return 0;
}
