#include<bits/stdc++.h>
using namespace std;
namespace IO{
	template<typename T>inline bool read(T &x){
		x=0;
		char ch=getchar();
		bool flag=0,ret=0;
		while(ch<'0'||ch>'9') flag=flag||(ch=='-'),ch=getchar();
		while(ch>='0'&&ch<='9') x=x*10+ch-'0',ch=getchar(),ret=1;
		x=flag?-x:x;
        return ret;
	}
	template<typename T,typename ...Args>inline bool read(T& a,Args& ...args){
	    return read(a)&&read(args...);
	}
	template<typename T>void prt(T x){
		if(x>9) prt(x/10);
		putchar(x%10+'0');
	}
	template<typename T>inline void put(T x){
		if(x<0) putchar('-'),x=-x;
		prt(x);
	}
	template<typename T>inline void put(char ch,T x){
		if(x<0) putchar('-'),x=-x;
		prt(x);
		putchar(ch);
	}
	template<typename T,typename ...Args>inline void put(T a,Args ...args){
	    put(a);
		put(args...);
	}
	template<typename T,typename ...Args>inline void put(const char ch,T a,Args ...args){
	    put(ch,a);
		put(ch,args...);
	}
	inline void put(string s){
		for(int i=0,sz=s.length();i<sz;i++) putchar(s[i]);
	}
	inline void put(const char* s){
		for(int i=0,sz=strlen(s);i<sz;i++) putchar(s[i]);
	}
}
using namespace IO;
#define N 450005
struct node{
	int w,val,rev,s[2],fa;
	node(){}
	node(int _w):w(_w),val(_w){
		rev=s[0]=s[1]=fa=0;
	} 
}t[N];
#define lc(x) t[x].s[0]
#define rc(x) t[x].s[1]
inline void push_up(int x){
	t[x].val=t[lc(x)].val^t[rc(x)].val^t[x].w;
}
inline void push_down(int x){
	if(t[x].rev){
		t[lc(x)].rev^=1,t[rc(x)].rev^=1;
		swap(lc(x),rc(x));
		t[x].rev^=1;
	}
}
inline int isroot(int x){
	return rc(t[x].fa)!=x&&lc(t[x].fa)!=x;
}
inline void rotate(int x){
	int y=t[x].fa,z=t[y].fa,k=rc(y)==x;
	if(!isroot(y)) t[z].s[rc(z)==y]=x;
	t[x].fa=z;
	t[t[x].s[k^1]].fa=y,t[y].s[k]=t[x].s[k^1];
	t[y].fa=x,t[x].s[k^1]=y;
	push_up(y),push_up(x);
}
int st[N];
inline void splay(int x){
	int tp=0,p=x;
	st[++tp]=p;
	while(!isroot(p)) st[++tp]=p=t[p].fa;
	while(tp) push_down(st[tp]),tp--;
	while(!isroot(x)){
		int y=t[x].fa,z=t[y].fa;
		if(!isroot(y)) rotate((rc(z)==y)==(rc(y)==x)?y:x);
		rotate(x);
	} 
}
inline void access(int x){
	int now=x;
	for(int lst=0;x;lst=x,x=t[x].fa)
		splay(x),rc(x)=lst,push_up(x);
	splay(now);
}
inline void makeroot(int x){
	access(x),t[x].rev^=1,push_down(x);
}
inline int findroot(int x){
	access(x);
	while(lc(x)) push_down(x),x=lc(x);
	splay(x);
	return x;
}
inline void split(int x,int y){
	makeroot(x),access(y);
}
inline void link(int x,int y){
	makeroot(x);
	if(findroot(y)!=x) t[x].fa=y; 
}
inline void cut(int x,int y){
	makeroot(x);
	if(findroot(y)==x&&t[y].fa==x&&!lc(y)) t[y].fa=rc(x)=0,push_up(x);
}
int n,m;
int main(){
	read(n,m);
	for(int i=1,x;i<=n;i++) read(x),t[i]=node(x);
	for(int i=1,op,x,y;i<=m;i++){
		read(op,x,y);
		if(op==0){
			if(findroot(x)!=findroot(y)) puts("-1");
			else split(x,y),put('\n',t[y].val);
		}else if(op==1) link(x,y);
		else if(op==2) cut(x,y);
		else if(op==3) splay(x),t[x].w=y,push_up(x); 
	}
	return 0;
}