Problem: Given n numbers a0, a1, ..., an-1 and q.
I want you to perform appropriate processing for q queries.
The query has the following three types of operations.


* Shift the value
Given a pair of l and r. (l <r) Circular shift the value from al to ar.

0 1 2 3 4 5 6 7 8 9

Is given the query l = 2, r = 5.

The shifted number sequence is

0 1 5 2 3 4 6 7 8 9

Will be.


* Find the minimum value
Given a pair of l and r. (l ≤ r)
Find the smallest value from al to ar.


* Update value
Given a pair of pos and val. Update the value of apos to val.



Input

The input is given in the following format.


n q
a0
a1
..
..
..
an-1
x1 y1 z1
x2 y2 z2
..
..
..
xq yq zq


If xi = 0, it represents a shift query. At this time, let l = yi and r = zi.
If xi = 1, it represents a query for the minimum value. At this time, let l = yi and r = zi.
If xi = 2, it represents a query that updates the value. At this time, pos = yi, val = zi.


Input meets the following constraints
1 ≤ n, q ≤ 200,000
0 ≤ ai ≤ 10,000,000 For queries that update values, 0 ≤ val ≤ 10,000,000

Output

When xi = 1 is given as a query, output the value of the answer on one line.

Examples

Input

10 3
0
1
2
3
4
5
6
7
8
9
1 5 7
0 2 5
1 5 7


Output

5
4


Input

10 10
289383
930886
692777
636915
747793
238335
885386
760492
516649
641421
2 7 368690
1 3 6
0 2 6
1 1 8
0 2 9
2 2 665123
1 5 9
0 2 8
2 7 961393
1 1 2


Output

238335
238335
238335
368690

Solution (in CPP):

Solution:
#include <cstdlib>
#include <cassert>
#include <utility>
#include <tuple>
#include <ctime>
#include <cstdio>
#include <vector>
#include <algorithm>
#define loop(i,a,b) for(int i=(a);i<int(b);i++)
#define rep(i,n) loop(i,0,n)

using namespace std;

int const inf = 1e9;
#define np nullptr

unsigned int xor128(){
    static unsigned int x = 123456789, y = 362436069, z = 521288629, w = time(0);
    unsigned long t = x^(x<<11);
    x = y; y = z; z = w;
    return w=(w^(w>>19))^(t^(t>>8));
}
unsigned int xor128r(int n){
    return xor128()%n;
}
double xor128d(){
    return xor128() * 0.00000000023283064365386962890625;
}

struct Node {
    int val;
    Node * ch[2];
    int pri, cnt, sum;
    int min;
    Node(int v, int p) : val(v), pri(p), cnt(1), sum(v), min(v) {
        ch[0] = ch[1] = np;
    }
    // ~Node(){
    //     if(ch[0]) delete ch[0];
    //     if(ch[1]) delete ch[1];
    // }
    void * operator new(size_t sz){
        static int pos = 0;
        static char mem[400020*sizeof(Node)];
        Node * res = (Node*)(mem+pos);
        pos += sizeof(Node);
        return res;
    }
};


int count(Node * t){
    return t == np ? 0 : t->cnt;
}
int sum(Node * t){
    return t == np ? 0 : t->sum;
}
int min(Node * t){
    return t == np ? inf : t->min;
}

void show(Node * n, int ofs=0){
    if(!n) return;
    show(n->ch[0],ofs+1);
    rep(i,ofs*2) putchar(' ');
    printf("v:%d m:%d (%p)\n",n->val,n->min,n);
    show(n->ch[1],ofs+1);
}

void update(Node * t){
    t->cnt = count(t->ch[0]) + count(t->ch[1]) + 1;
    t->sum = sum(t->ch[0]) + sum(t->ch[1]) + t->val;
    t->min = min({ min(t->ch[0]), min(t->ch[1]), t->val });
}

Node * merge(Node * l, Node * r){
    if(l == np || r == np) return l == np ? r : l;
    if(l->pri > r->pri){
        l->ch[1] = merge(l->ch[1],r);
        update(l);
        return l;
    } else {
        r->ch[0] = merge(l,r->ch[0]);
        update(r);
        return r;
    }
}

pair<Node*,Node*> split(Node * t, int k){
    if(t == np) return make_pair(np,np);
    if(k <= count(t->ch[0])){
        auto s = split(t->ch[0],k);
        t->ch[0] = s.second;
        update(t);
        return make_pair(s.first, t);
    } else {
        k -= count(t->ch[0]) + 1;
        auto s = split(t->ch[1],k);
        t->ch[1] = s.first;
        update(t);
        return make_pair(t,s.second);
    }
}

Node * erase(Node * t, int k){
    Node *l,*m,*r;
    tie(l,m) = split(t,k);
    tie(m,r) = split(m,1);
    //delete m;
    return merge(l,r);
}

Node * at(Node * t, int k){
    int lc = count(t->ch[0]);
    if(k < lc) return at(t->ch[0],k);
    else if(k == lc) return t;
    else return at(t->ch[1], k-lc-1);
}

Node * insert(Node * t, int k, int v){
    Node *l,*m = new Node(v,xor128()), *r;
    tie(l,r) = split(t,k);
    return merge(merge(l,m),r);
}

int min(Node * t, int l, int r){
    if(r - l <= 0) return inf;
    if(r - l == count(t)) return min(t);
    int lc = count(t->ch[0]);
    if(l == lc && r - lc == 1) return t->val;
    int res = inf;
    if(l < lc) res = min(res, min(t->ch[0], l, min(lc,r)));
    if(l <= lc && lc < r) res = min(res, min(t, lc, lc+1));
    if(lc+1 < r) res = min(res, min(t->ch[1], max(0,l-lc-1), r-lc-1));
    return res;
}

void set(Node * t, int k, int x){
    int lc = count(t->ch[0]);
    //t->min = min(t->min,x);
    if(k < lc){
        set(t->ch[0], k, x);
    } else if(k == lc){
        t->val = x;
    } else if(k > lc){
        set(t->ch[1], k-lc-1, x);
    }
    update(t);
}

int get(){
    int x;
    scanf("%d",&x);
    return x;
}
void put(int x){
    //printf("ans : %d\n",x);
    printf("%d\n",x);
}

int main(){
#ifdef DEBUG
    freopen("in","r",stdin);
#endif
    int n = get(), q = get();
    Node * root = np;
    rep(i,n) root = insert(root,i,get());

    rep(i,q){
        int op = get();
        if(false){
        } else if(op == 0){
            int l = get(), r = get();
            int x = at(root,r)->val;
            root = erase(root,r);
            root = insert(root,l,x);
        } else if(op == 1){
            int l = get(), r = get();
            r++;
            put(min(root,l,r));
        } else if(op == 2){
            int p = get(), v = get();
            set(root, p, v);
            // printf("set %d %d\n",p,v);
            // show(root);
            // root = erase(root,p);
            // root = insert(root,p,v);
        }
    }
    //delete root;
}