ll n;Mint a[2d5],f=1,k;{rd(n,k,a(n));rep(i,n)a[i]*=f,a[n+~i]*=f,f*=(~i-k)/~i;wt(sum(a(n)));}