Problem:
MathJax.Hub.Config({ tex2jax: { inlineMath: [["$","$"], ["\\(","\\)"]], processEscapes: true }});

Transformation

Write a program which performs a sequence of commands to a given string $str$. The command is one of:

print a b: print from the a-th character to the b-th character of $str$

reverse a b: reverse from the a-th character to the b-th character of $str$

replace a b p: replace from the a-th character to the b-th character of $str$ with p

Note that the indices of $str$ start with 0.

Input

In the first line, a string $str$ is given. $str$ consists of lowercase letters. In the second line, the number of commands q is given. In the next q lines, each command is given in the above mentioned format.

Output

For each print command, print a string in a line.

Constraints

$1 \leq $ length of $str \leq 1000$

$1 \leq q \leq 100$

$0 \leq a \leq b < $ length of $str$

for replace command, $b - a + 1 = $ length of $p$

Sample Input 1

abcde
3
replace 1 3 xyz
reverse 0 2
print 1 4

Sample Output 1

xaze

Sample Input 2

xyz
3
print 0 2
replace 0 2 abc
print 0 2

Sample Output 2

xyz
abc

Solution in PHP (judge verdict: Wrong Answer)

<?php
fscanf(STDIN,"%s",$str);
fscanf(STDIN,"%s",$q);

while($order = trim(fgets(STDIN))){
    $array = explode(" ",$order);

    if ($array[0] == "print"){
        $str = print_ab($str,$array[1],$array[2]);
        echo $str.PHP_EOL;

    }elseif ($array[0] == "reverse"){
        $str = reverse($str,$array[1],$array[2]);

    }elseif ($array[0] == "replace"){
        $str = replace($str,$array[1],$array[2],$array[3]);
    }
}//while


//----------------
//kansuu
//----------------
function print_ab($text,$a,$b){
    return substr($text, $a, $b-$a+1);
}

function reverse($text,$a,$b){
    $change = strrev(substr($text, $a, $b-$a+1));
    return substr_replace($text, $change, $a, $b-$a+1);
}

function replace($text,$a,$b,$p){
    return substr_replace($text, $p, $a, $b-$a+1);
}