#include<bits/stdc++.h>
using namespace std;
#ifdef DEBUG
#include"debug.h"
#else
#define debug(...) void()
#endif
#define all(x) (x).begin(),(x).end()
template<class T>
auto ary(T *a,int l,int r){
	return vector<T>{a+l,a+1+r};
}
using ll=long long;
using ull=unsigned long long;
const int N=2e5+10,B=450,M=B*4+5;
int n,m;
ull a[N],b[N];
struct Tree{
	vector<int>to[N];
	void add(int u,int v){
		to[u].push_back(v),to[v].push_back(u);
	}
	int fa[N],dep[N],top[N],son[N],siz[N];
	void dfs1(int u){
		siz[u]=1,dep[u]=dep[fa[u]]+1;
		for(int v:to[u])if(v^fa[u]){
			fa[v]=u,dfs1(v);
			siz[u]+=siz[v];
			if(siz[v]>siz[son[u]])son[u]=v;
		}
	}
	int dft,pos[N],bg[N],ed[N];
	void dfs2(int u,int t){
		top[u]=t,pos[bg[u]=++dft]=u;
		if(son[u])dfs2(son[u],t);
		for(int v:to[u])if(v^fa[u]&&v^son[u])dfs2(v,v);
		ed[u]=dft;
	}
	int LCA(int u,int v){
		for(;top[u]^top[v];u=fa[top[u]]){
			if(dep[top[u]]<dep[top[v]])swap(u,v);
		}
		return dep[u]<dep[v]?u:v;
	}
	void init(){
		dfs1(1),dfs2(1,1);
	}
}S,T;
struct opts{
	int u,v;
	ull w;
}o[N];
ull ans[N];
void build(int u){
	b[u]=b[T.fa[u]]+a[u];
	for(int v:T.to[u])if(v^T.fa[u])build(v);
}
void pushdown(int u){
	for(int v:S.to[u])if(v^S.fa[u]){
		pushdown(v),b[u]+=b[v];
	}
	a[u]+=b[u];
}
int lca1[N],lca2[N];
int k1,k2,id1[N],id2[M],vis[N],nex[N];
int c[M],his[M][M];
void dfs(int u){
	c[nex[T.bg[u]]]++,c[nex[T.ed[u]+1]]--;
	if(vis[u]){
		id1[u]=++k1;
		for(int i=1;i<=k2;i++){
			his[k1][i]=his[k1][i-1]+c[i];
		}
	}
	for(int v:S.to[u])if(v^S.fa[u])dfs(v);
	c[nex[T.bg[u]]]--,c[nex[T.ed[u]+1]]++;
}
int calc(int u,int v,int w,int x,int y,int z){
	auto calc1=[&](int u,int x){
		if(!u||!x)return 0;
		return his[id1[u]][nex[T.bg[x]]];
	};
	auto calc2=[&](int u){
		return calc1(u,x)+calc1(u,y)-calc1(u,z)-calc1(u,T.fa[z]);
	};
	return calc2(u)+calc2(v)-calc2(w)-calc2(S.fa[w]);
}
int main(){
	scanf("%d%d",&n,&m);
	for(int i=1;i<=n;i++)scanf("%llu",&a[i]);
	for(int i=1,u,v;i<n;i++){
		scanf("%d%d",&u,&v),S.add(u,v);
	}
	for(int i=1,u,v;i<n;i++){
		scanf("%d%d",&u,&v),T.add(u,v);
	}
	S.init(),T.init();
	for(int i=1;i<=m;i++){
		scanf("%d%d%llu",&o[i].u,&o[i].v,&o[i].w);
	}
	for(int i=1;i<=m;i+=B){
		fill(vis,vis+1+n,0),fill(nex,nex+1+n+1,0);
		fill(id1,id1+1+n,0),fill(id2,id2+1+k2,0);
		fill(b,b+1+n,0);
		k1=k2=0;
		build(1);
		// memset(his,0,sizeof his);
		// exit(0);
		for(int j=i;j<=m&&j<i+B;j++){
			int u=o[j].u,v=o[j].v,t1=lca1[j]=S.LCA(u,v),t2=lca2[j]=T.LCA(u,v);
			ans[j]=b[u]+b[v]-b[t2]-b[T.fa[t2]];
			id2[++k2]=T.bg[u],id2[++k2]=T.bg[v],id2[++k2]=T.bg[t2];
			if(T.fa[t2])id2[++k2]=T.bg[T.fa[t2]];
			vis[u]=vis[v]=vis[t1]=vis[S.fa[t1]]=1;
		}
		sort(id2+1,id2+1+k2),k2=unique(id2+1,id2+1+k2)-id2-1;
		nex[n+1]=k2+1;
		for(int i=1;i<=k2;i++)nex[id2[i]]=i;
		for(int i=n;i>=1;i--)if(!nex[i])nex[i]=nex[i+1];
		fill(c,c+1+k2+1,0);
		dfs(1);
		// debug(k1,k2);
		for(int j=i;j<=m&&j<i+B;j++){
			for(int k=j;k>=i;k--){
				ans[j]+=o[k].w*calc(o[k].u,o[k].v,lca1[k],o[j].u,o[j].v,lca2[j]);
			}
		}
		fill(b,b+1+n,0);
		for(int j=i;j<=m&&j<i+B;j++){
			int u=o[j].u,v=o[j].v,t=lca1[j];
			ull w=o[j].w;
			b[u]+=w,b[v]+=w,b[t]-=w,b[S.fa[t]]-=w;
		}
		pushdown(1);
	}
	for(int i=1;i<=m;i++)printf("%llu\n",ans[i]);
	return 0;
}
#ifdef DEBUG
#include"debug.hpp"
#endif