ll@h,@w,a[h+1]{},b[w+1]{};
rd(a(h),b(w));
sortA(h+1,a);
sortA(w+1,b);
Mint y,z;
for(ll c=h,d=w;a[c]|b[d];){
	y+=a[c]>=b[d]?d-=a[c]==b[d],a[c--]:b[d--];
}
for(ll s=sum(a(h+1)),c=h,d=w;b[d];--d){
	while(a[c]>b[d]){
		s-=a[c--];
	}
	z+=s+b[d]*(h-c);
}
wtLn(y,z);