#include<stdio.h>
#include<string.h>
#include<iostream>
#define LL long long
const int N = 1e5;
using namespace std;
LL mod = 1e9 + 7;


char a[N + 5];
LL ans = 0, p[N + 5], s[N + 5];


int main() {
    scanf("%s", a + 1);
    int l = strlen(a + 1);
    p[1] = 1;
    for(int i = 2; i <= l; ++i)
        p[i] = (p[i - 1] * 10) % mod;
    for(int i = 1; i <= l; ++i)
        s[i] = (s[i - 1] + i * p[i] % mod) % mod;    
    ans = (l - 1) * l / 2 % mod * (a[l] - '0') % mod;
    // cout << ans << endl;/
    for(int i = l - 1; i >= 1; --i) {
        int t = a[i] - '0';
        ans = (ans + (i - 1) * i / 2 * t * p[l - i + 1] % mod) % mod;
        ans = (ans + s[l - i] * t % mod) % mod;
        // cout << ans << endl;
    }
    cout << ans << endl;
    return 0;
}