[N,K] = list(map(int,input().split()))

mod = pow(10,9)+7

kaijo = [1]
for i in range(1,N+1): 
  kaijo.append(kaijo[i-1]*i % mod)

s =0
for m in range((K+1)*(N>K)+(N)*(K>=N)):
  s += (kaijo[N]*pow((kaijo[m]*kaijo[N-m]),mod-2,mod ))%mod * (kaijo[N-1]*pow((kaijo[m]*kaijo[N-1-m]),mod-2,mod ) )%mod
  s = s%mod

print(s) [N,K] = list(map(int,input().split())) [N,K] N K list(map(int,input().split())) list map(int,input().split()) map int input().split() ().split () input split mod = pow(10,9)+7 mod pow(10,9)+7 pow(10,9) pow 10 9 7 kaijo = [1] kaijo [1] 1 for i in range(1,N+1): 
  kaijo.append(kaijo[i-1]*i % mod) i range(1,N+1) range 1 N+1 N 1 kaijo.append(kaijo[i-1]*i % mod) kaijo.append kaijo append kaijo[i-1]*i % mod kaijo[i-1]*i kaijo[i-1] kaijo i-1 i 1 i mod s =0 s 0 for m in range((K+1)*(N>K)+(N)*(K>=N)):
  s += (kaijo[N]*pow((kaijo[m]*kaijo[N-m]),mod-2,mod ))%mod * (kaijo[N-1]*pow((kaijo[m]*kaijo[N-1-m]),mod-2,mod ) )%mod
  s = s%mod m range((K+1)*(N>K)+(N)*(K>=N)) range (K+1)*(N>K)+(N)*(K>=N) (K+1)*(N>K) K+1 K 1 N>K N K (N)*(K>=N) N K>=N K N s += (kaijo[N]*pow((kaijo[m]*kaijo[N-m]),mod-2,mod ))%mod * (kaijo[N-1]*pow((kaijo[m]*kaijo[N-1-m]),mod-2,mod ) )%mod s (kaijo[N]*pow((kaijo[m]*kaijo[N-m]),mod-2,mod ))%mod * (kaijo[N-1]*pow((kaijo[m]*kaijo[N-1-m]),mod-2,mod ) )%mod (kaijo[N]*pow((kaijo[m]*kaijo[N-m]),mod-2,mod ))%mod * (kaijo[N-1]*pow((kaijo[m]*kaijo[N-1-m]),mod-2,mod ) ) (kaijo[N]*pow((kaijo[m]*kaijo[N-m]),mod-2,mod ))%mod kaijo[N]*pow((kaijo[m]*kaijo[N-m]),mod-2,mod ) kaijo[N] kaijo N pow((kaijo[m]*kaijo[N-m]),mod-2,mod ) pow kaijo[m]*kaijo[N-m] kaijo[m] kaijo m kaijo[N-m] kaijo N-m N m mod-2 mod 2 mod mod kaijo[N-1]*pow((kaijo[m]*kaijo[N-1-m]),mod-2,mod ) kaijo[N-1] kaijo N-1 N 1 pow((kaijo[m]*kaijo[N-1-m]),mod-2,mod ) pow kaijo[m]*kaijo[N-1-m] kaijo[m] kaijo m kaijo[N-1-m] kaijo N-1-m N-1 N 1 m mod-2 mod 2 mod mod s = s%mod s s%mod s mod print(s) print s s += (kaijo[N]*pow((kaijo[m]*kaijo[N-m]),mod-2,mod ))%mod * (kaijo[N-1]*pow((kaijo[m]*kaijo[N-1-m]),mod-2,mod ) )%mod (kaijo[N]*pow((kaijo[m]*kaijo[N-m]),mod-2,mod ))%mod * (kaijo[N-1]*pow((kaijo[m]*kaijo[N-1-m]),mod-2,mod ) )%mod s s = s%mod s%mod s kaijo = [1] [1] kaijo mod = pow(10,9)+7 pow(10,9)+7 mod s =0 0 s
[N,K] = list(map(int,input().split()))

mod = pow(10,9)+7

kaijo = [1]
for i in range(1,N+1): 
  kaijo.append(kaijo[i-1]*i % mod)

s =0
for m in range((K+1)*(N>K)+(N)*(K>=N)):
  s += (kaijo[N]*pow((kaijo[m]*kaijo[N-m]),mod-2,mod ))%mod * (kaijo[N-1]*pow((kaijo[m]*kaijo[N-1-m]),mod-2,mod ) )%mod
  s = s%mod

print(s)