#include<bits/stdc++.h>
#define For(i,a,b) for(register int i=(a);i<=(b);++i)
#define Rep(i,a,b) for(register int i=(a);i>=(b);--i)
//#define int long long
using namespace std;
#define ui unsigned int
inline ui read()
{
	char c=getchar();ui x=0;
	for(;!isdigit(c);c=getchar());
	for(;isdigit(c);c=getchar())x=(x<<1)+(x<<3)+(c^48);
	return x;
}

#define fi first
#define se second
#define pb push_back
#define mkp make_pair
typedef pair<int,int>pii;
typedef vector<int>vi;

#define maxn 200005
#define inf 0x3f3f3f3f
#define ll long long

/*
把修改操作刻画为：将颜色 x 在块 k 中次数 +=c
f(i,j) 表示 i~j 所有整块的答案，考虑贡献
g(i,x) 为 前 i 个块中出现 j 的次数 
i,j<k    delta = 0
i<k<=j   delta = g[i][x] * c
k<=i,j   delta = c*c + c*(g[i][x]+g[j][x]) 
维护 delta 在 两个方向上的差分 

修改 g[] 的复杂度是 sqrt 
纯块要当做散点来处理掉，不需要修改 g[]，复杂度就正确了

交换前缀和数组两维 
*/

int n,m,a[maxn];
int B,t,bel[maxn],L[455],R[455];
int g[maxn][455],tag[455];
int tmp[maxn];
ll f[455][455],s1[455][455],s2[455][455];

// 维护 F(i,j) 
void down(int b){
	if(b==-1){
		puts("WA");
		exit(0);
	} 
	ll sum=0;
	For(i,b,t){
		sum+=s1[b][i],s1[b][i]=0;
		f[b][i]+=sum;
	}
	sum=0;
	For(i,1,b){
		sum+=s2[b][i],s2[b][i]=0;
		f[i][b]+=sum;
	}
}
void add(int b,int x,int c){
	For(i,1,b-1)s1[i][b]+=g[x][i]*c;
	For(i,b,t){
		s1[i][i]+=g[x][i]*c;
		s2[i][b]+=(g[x][i]+c)*c;
		g[x][i]+=c;
	}
}
inline ll F(int l,int r){
	if(l!=1)down(l-1); down(r);
	return f[r][r]-2*f[l-1][r]+f[l-1][l-1];
}

inline void downtag(int b){
	if(tag[b])
		For(i,L[b],R[b])a[i]=tag[b];
}
int stk[maxn],top;
ll ask(int l,int r)
{
	ll res=0;
	int bl=bel[l],br=bel[r];
	if(bl==br){
		if(tag[bl]) return 1ll*(r-l+1)*(r-l+1);
		For(i,l,r) ++tmp[a[i]];
		For(i,l,r) if(tmp[a[i]]) res+=tmp[a[i]]*tmp[a[i]],tmp[a[i]]=0;
		return res;
	}
	downtag(bl),downtag(br);
	if(bl+1<=br-1)res=F(bl+1,br-1);
	For(i,l,R[bl]){
		if(!tmp[a[i]])stk[++top]=a[i];
		++tmp[a[i]];
	}
	For(i,L[br],r){
		if(!tmp[a[i]])stk[++top]=a[i];
		++tmp[a[i]];
	}
	For(i,bl+1,br-1)
		if(tag[i]){
			if(!tmp[tag[i]])stk[++top]=tag[i];
			tmp[tag[i]]+=R[i]-L[i]+1;
		}
	For(i,1,top){
		int u=stk[i];
		res+=1ll*tmp[u]*tmp[u];
		if(bl+1<=br-1)res+=2ll*tmp[u]*(g[u][br-1]-g[u][bl]);
		tmp[u]=0;
	}
	top=0;
	return res;
}

void cover(int l,int r,int x)
{
	int b=bel[l];
	if(tag[b]){
		if(tag[b]==x)return;
		For(i,L[b],R[b])a[i]=tag[b];
		For(i,l,r)a[i]=x;
		add(b,x,r-l+1),add(b,tag[b],(R[b]-L[b]+1)-(r-l+1)),tag[b]=0;
		return;
	}
	For(i,l,r)++tmp[a[i]];
	For(i,l,r){
		if(tmp[a[i]])add(b,a[i],-tmp[a[i]]),tmp[a[i]]=0;
		a[i]=x;
	}
	add(b,x,r-l+1);
}
void assign(int l,int r,int x)
{
	int bl=bel[l],br=bel[r];
	if(bl==br)return cover(l,r,x);
	cover(l,R[bl],x);
	cover(L[br],r,x);
	For(i,bl+1,br-1){
		if(!tag[i]){
			For(j,L[i],R[i]) ++tmp[a[j]];
			For(j,L[i],R[i]) if(tmp[a[j]]) add(i,a[j],-tmp[a[j]]),tmp[a[j]]=0;
		}
		tag[i]=x;
	}
}

signed main()
{
//	freopen("data.in","r",stdin);
//	freopen("my.out","w",stdout);
	n=read(),m=read();
	B=sqrt(n);
	For(i,1,n)bel[i]=(i-1)/B+1;
	t=bel[n];
	For(i,1,n)a[i]=read();
	For(j,1,t){
		L[j]=(j-1)*B+1,R[j]=min(n,j*B);
		For(i,L[j],R[j]) For(j1,j,t) ++g[a[i]][j1];
	}
	For(j,1,t){
		For(j1,j,t){
			f[j][j1]=f[j-1][j1];
			For(i,L[j],R[j]) f[j][j1]+=g[a[i]][j1];
		}
	}
	ui l,r,x,lst=0;
	For(i,1,m){
		int op=read(); l=read()^lst,r=read()^lst;
		if(l>n||r>n||l<=0||r<=0){
			puts("WA");
			return 0;
		}
		if(op==1)x=read()^lst,assign(l,r,x);
		else {
			ll res=(ask(l,r)-(r-l+1))/2;
			lst=res; printf("%lld\n",res); // lst=0;
		}
	}
	return 0;
}