ll@n,@k;
Modint f[2d5],a=1,b,d=1;
rrep(i,n){
	a*=k+i;
	d*=(k+n-1-i)*(1+i);
	f[i]=d;
}
rep(i,n){
	b+=a*f[i];
	a*=(k-1-i)*(n-1-i);
	d*=1+i;
}
wt(b/d);