int a[4][2d5];
{
	int @n,@k,@m;
	rd(a(4,n));
	sortF(n,a[0..3]);
	modint z;
	z.setmod(m);
	rep(i,n){
		sortE(a[0][i],a[1][i],a[2][i],a[3][i]);
		modint d;
		d=a[3][i]-a[0][i];
		z+=d**k;
	}
	wt(z);
}