Problem:
Score : 1100 points

Problem Statement

We will call a string that can be obtained by concatenating two equal strings an even string.
For example, xyzxyz and aaaaaa are even, while ababab and xyzxy are not.

For a non-empty string S, we will define f(S) as the shortest even string that can be obtained by appending one or more characters to the end of S.
For example, f(abaaba)=abaababaab.
It can be shown that f(S) is uniquely determined for a non-empty string S.

You are given an even string S consisting of lowercase English letters.
For each letter in the lowercase English alphabet, find the number of its occurrences from the l-th character through the r-th character of f^{10^{100}} (S).

Here, f^{10^{100}} (S) is the string f(f(f( ... f(S) ... ))) obtained by applying f to S 10^{100} times.

Constraints

2 \leq |S| \leq 2\times 10^5

1 \leq l \leq r \leq 10^{18}

S is an even string consisting of lowercase English letters.

l and r are integers.

Input

Input is given from Standard Input in the following format:

S
l r

Output

Print 26 integers in a line with spaces in between.
The i-th integer should be the number of the occurrences of the i-th letter in the lowercase English alphabet from the l-th character through the r-th character of f^{10^{100}} (S).

Sample Input 1

abaaba
6 10

Sample Output 1

3 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0

Since f(abaaba)=abaababaab, the first ten characters in f^{10^{100}}(S) is also abaababaab. Thus, the sixth through the tenth characters are abaab. In this string, a appears three times, b appears twice and no other letters appear, and thus the output should be 3 and 2 followed by twenty-four 0s.

Sample Input 2

xx
1 1000000000000000000

Sample Output 2

0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1000000000000000000 0 0

Sample Input 3

vgxgpuamkvgxgvgxgpuamkvgxg
1 1000000000000000000

Sample Output 3

87167725689669676 0 0 0 0 0 282080685775825810 0 0 0 87167725689669676 0 87167725689669676 0 0 87167725689669676 0 0 0 0 87167725689669676 141040342887912905 0 141040342887912905 0 0

Solution in Rust (1.15.1) (judge verdict: Runtime Error)

use std::io::*;
use std::str::FromStr;
use std::collections::HashMap;

#[allow(dead_code)]
fn read<T: FromStr>() -> T {
    let stdin = stdin();
    let stdin = stdin.lock();
    let token: String = stdin
        .bytes()
        .map(|c| c.expect("failed to read char") as char)
        .skip_while(|c| c.is_whitespace())
        .take_while(|c| !c.is_whitespace())
        .collect();
    token.parse().ok().expect("failed to parse token")
}

#[allow(dead_code)]
fn print_s(s: &Vec<char>) {
    for &c in s.iter() {
        print!("{}", c);
    }
    println!("");
}

fn expand_s(s: &Vec<char>) -> Vec<char> {
    let mut skip = 0;
    'inner_loop: for i in s.len() / 2 + 1..s.len() {
        for j in i..s.len() {
            if s[j] != s[j - i] {
                continue 'inner_loop;
            }
        }
        skip = s.len() - i;
        break;
    }
    // println!("{}", skip);
    let ret = s.iter()
        .chain(s[skip..s.len() - skip].iter())
        .cloned()
        .collect::<Vec<_>>();
    ret
}

#[allow(dead_code)]
fn naive(s: &Vec<char>, l: usize, r: usize) -> Vec<usize> {
    let mut s = s.clone();
    while s.len() < r {
        s = expand_s(&s);
    }
    let mut cnts = vec![0; 26];
    for i in l..r {
        cnts[(s[i] as u8 - 'a' as u8) as usize] += 1;
    }
    cnts
}

fn solve(s: &Vec<char>, l: usize, r: usize) -> Vec<usize> {
    let mut temp_s = s.clone();
    let mut lens = vec![s.len()];
    for _ in 0..2 {
        temp_s = expand_s(&temp_s);
        lens.push(temp_s.len());
    }
    // println!("{:?}", lens);
    for i in 2.. {
        if r <= lens[i] {
            break;
        }
        if lens[0] + lens[1] == lens[2] {
            let v = lens[i - 1] + lens[i];
            lens.push(v);
        } else {
            let v = lens[i] + (lens[i] - lens[i - 1]);
            lens.push(v);
        }
    }
    let mut cnts = vec![0; 26];
    cnts
}

fn main() {
    let s = read::<String>().chars().collect::<Vec<char>>();
    let l = read::<usize>() - 1;
    let r = read::<usize>();
    let cnts = solve(&s, l, r);
    for i in 0..26 {
        if i != 0 {
            print!(" ");
        }
        print!("{}", cnts[i]);
    }
    println!("");
}