1 #include<cstdio>
  2 #include<iostream>
  3 #include<algorithm>
  4
  5 using namespace std;
  6
  7 #define N 50001
  8
  9 const int mod=1e9+7;
 10
 11 typedef long long LL;
 12
 13 int n;
 14
 15 int C[N][11];
 16
 17 int f[N<<2];
 18 int siz[N<<2],mid[N<<2];
 19 bool rev[N<<2];
 20
 21 struct node { int sum[11]; }ans[N<<2];
 22
 23 void read(int &x)
 24 {
 25     x=0; int ff=1; char c=getchar();
 26     while(!isdigit(c)) { if(c=='-') ff=-1; c=getchar(); }
 27     while(isdigit(c)) { x=x*10+c-'0'; c=getchar(); }
 28     x*=ff;
 29 }
 30
 31 int tot=0;
 32
 33 void MOD(int &a,int b)
 34 {
 35     a+=b;
 36     a-= a>=mod ? mod : 0;
 37 }
 38
 39 void pre(int n)
 40 {
 41     C[0][0]=1;
 42     for(int i=1;i<=n;i++)
 43     {
 44         C[i][0]=1;
 45         for(int j=1;j<=min(i,10);j++) C[i][j]=(C[i-1][j]+C[i-1][j-1])%mod;
 46     }
 47 }
 48
 49 void update(int k)
 50 {
 51     for(int i=1;i<=10;i++)
 52     {
 53         ans[k].sum[i]=0;
 54         for(int j=1;j<i;j++) MOD(ans[k].sum[i],1ll*ans[k<<1].sum[j]*ans[k<<1|1].sum[i-j]%mod);
 55         MOD(ans[k].sum[i],ans[k<<1].sum[i]); MOD(ans[k].sum[i],ans[k<<1|1].sum[i]);
 56     }
 57 }
 58
 59 void build(int k,int l,int r)
 60 {
 61     siz[k]=r-l+1;
 62     if(l==r) { read(ans[k].sum[1]); MOD(ans[k].sum[1],0); return; }
 63     mid[k]=l+r>>1;
 64     build(k<<1,l,mid[k]); build(k<<1|1,mid[k]+1,r);
 65     update(k);
 66 }
 67
 68 void insert(int k,int w)
 69 {
 70     MOD(f[k],w);
 71     for(int i=10;i;i--)
 72     {
 73         int x=w;
 74         for(int j=i-1;j;j--,x=1ll*x*w%mod)
 75             MOD(ans[k].sum[i],1ll*x*ans[k].sum[j]%mod*C[siz[k]-j][i-j]%mod);
 76         MOD(ans[k].sum[i],1ll*x*C[siz[k]][i]%mod);
 77     }
 78 }
 79
 80 void turn(int k)
 81 {
 82     rev[k]^=1;
 83     if(f[k]) f[k]=mod-f[k];
 84     for(int i=9;i>0;i-=2)
 85         if(ans[k].sum[i]) ans[k].sum[i]=mod-ans[k].sum[i];
 86 }
 87
 88 void down(int k)
 89 {
 90     if(rev[k]) turn(k<<1),turn(k<<1|1),rev[k]=0;
 91     if(f[k]) insert(k<<1,f[k]),insert(k<<1|1,f[k]),f[k]=0;
 92 }
 93
 94 void add(int k,int l,int r,int opl,int opr,int w)
 95 {
 96     if(l>=opl && r<=opr) { insert(k,w); return; }
 97     down(k);
 98     if(opl<=mid[k]) add(k<<1,l,mid[k],opl,opr,w);
 99     if(opr>mid[k]) add(k<<1|1,mid[k]+1,r,opl,opr,w);
100     update(k);
101 }
102
103 void reverse(int k,int l,int r,int opl,int opr)
104 {
105     if(l>=opl && r<=opr)  { turn(k); return; }
106     down(k);
107     if(opl<=mid[k]) reverse(k<<1,l,mid[k],opl,opr);
108     if(opr>mid[k]) reverse(k<<1|1,mid[k]+1,r,opl,opr);
109     update(k);
110 }
111
112 node query(int k,int l,int r,int opl,int opr,int w)
113 {
114     if(l>=opl && r<=opr) return ans[k];
115     down(k);
116     if(opr<=mid[k]) return query(k<<1,l,mid[k],opl,opr,w);
117     else if(opl>mid[k]) return query(k<<1|1,mid[k]+1,r,opl,opr,w);
118     else
119     {
120         node L=query(k<<1,l,mid[k],opl,opr,w),R=query(k<<1|1,mid[k]+1,r,opl,opr,w);
121         node tmp;
122         for(int i=1;i<=w;i++)
123         {
124             tmp.sum[i]=(L.sum[i]+R.sum[i])%mod;
125             for(int j=1;j<i;j++) MOD(tmp.sum[i],1ll*L.sum[j]*R.sum[i-j]%mod);
126         }
127         return tmp;
128     }
129 }
130
131 int main()
132 {
133     freopen("game.in","r",stdin);
134     freopen("game.out","w",stdout);
135     int n,m;
136     read(n); read(m);
137     pre(n);
138     build(1,1,n);
139     int ty,l,r,w;
140     while(m--)
141     {
142         read(ty); read(l); read(r);
143         if(ty==1)
144         {
145             read(w); w%=mod;
146             w+= w<0 ? mod : 0;
147             add(1,1,n,l,r,w);
148         }
149         else if(ty==2) reverse(1,1,n,l,r);
150         else
151         {
152             read(w);
153             node p=query(1,1,n,l,r,w);
154             printf("%d\n",query(1,1,n,l,r,w).sum[w]);
155         }
156     }
157 }