#include <iostream>
#include <vector>
#include <algorithm>
#include <cmath>
#include <queue>
#include <string>
#include <map>
#include <set>
#include <stack>
#include <tuple>
#include <deque>
#include <array>
#include <numeric>
#include <bitset>
#include <iomanip>
#include <cassert>
#include <chrono>
#include <random>
#include <limits>
#include <iterator>
#include <functional>
#include <sstream>
#include <fstream>
#include <complex>
#include <cstring>
#include <unordered_map>
#include <unordered_set>
using namespace std;

using ll = long long;
constexpr int INF = 1001001001;
constexpr int mod = 1000000007;
// constexpr int mod = 998244353;

template<class T>
inline bool chmax(T& x, T y){
    if(x < y){
        x = y;
        return true;
    }
    return false;
}
template<class T>
inline bool chmin(T& x, T y){
    if(x > y){
        x = y;
        return true;
    }
    return false;
}

template<typename T>
struct BinaryIndexedTree{
    vector<T> data;
    int sz;

    BinaryIndexedTree(int n){
        sz = n + 2;
        data.assign(sz, 0);
    }

    void add(int i, T x){
        ++i;
        while(i < sz){
            data[i] += x;
            i += i & -i;
        }
    }

    // [0, i] の区間和
    T sum(int i){
        T res = 0;
        ++i;
        while(i > 0){
            res += data[i];
            i -= i & -i;
        }
        return res;
    }

    // [l, r) の区間和
    T sum(int l, int r){
        if(l > r)   return 0;
        return sum(r - 1) - sum(l - 1);
    }

    // val 以上を満たす 0-indexed の位置を返す
    int lower_bound(T val){
        // if(val <= 0)    return -1;
        int res = 0;
        int n = 1;
        while(n < sz)   n <<= 1;
        for(int k = n >> 1; k > 0; k >>= 1){
            if(res + k < sz && data[res + k] < val){
                val -= data[res + k];
                res += k;
            }
        }
        return res;     // 1-indexed であれば、res + 1 を返す
    }
};

int main(){
    ios::sync_with_stdio(false);
    cin.tie(nullptr);

    int N, Q, A;
    cin >> N >> Q;
    BinaryIndexedTree<ll> bit(N);
    for(int i = 0; i < N; ++i){
        cin >> A;
        bit.add(i, A);
    }
    BinaryIndexedTree<int> left_pos(N);
    set<pair<int, int>> sections;
    for(int i = 0; i < N; ++i){
        left_pos.add(i, 1);
        sections.emplace(i, i + 1);
    }
    for(int q = 0; q < Q; ++q){
        int t, x;
        cin >> t >> x;
        --x;
        if(t == 1){
            int l1 = left_pos.lower_bound(left_pos.sum(0, x + 1));
            int l2 = left_pos.lower_bound(left_pos.sum(0, x + 2));
            auto s1 = *sections.lower_bound({l1, 0});
            auto s2 = *sections.lower_bound({l2, 0});
            if(s1 == s2)    continue;
            sections.erase(s1);
            sections.erase(s2);
            sections.emplace(s1.first, s2.second);
            left_pos.add(l2, -1);
        }
        else if(t == 2){
            int l1 = left_pos.lower_bound(left_pos.sum(0, x + 1));
            int l2 = left_pos.lower_bound(left_pos.sum(0, x + 2));
            auto s1 = *sections.lower_bound({l1, 0});
            auto s2 = *sections.lower_bound({l2, 0});
            if(s1 != s2)    continue;
            sections.erase(s1);
            sections.emplace(s1.first, x + 1);
            sections.emplace(x + 1, s1.second);
            left_pos.add(x + 1, 1);
        }
        else if(t == 3){
            bit.add(x, 1);
        }
        else{
            int l = left_pos.lower_bound(left_pos.sum(0, x + 1));
            auto s = *sections.lower_bound({l, 0});
            cout << bit.sum(s.first, s.second) << '\n';
        }
    }

    return 0;
}