#define MD 998244353
Comb<Mint>c;ll@n,@x[n],@y[n],a;sortA(n,x);rsortA(n,y);a=sum[ll][i,0,n](x[i]<y[i]);wt(c.fac(a)*c.fac(n-a));