#include <iostream>
#define llint long long
#define mod 1000000007

using namespace std;

llint n, k;
const int FACT_MAX = 100005;
llint fact[FACT_MAX], fact_inv[FACT_MAX];

llint modpow(llint a, llint n)
{
	if(n == 0) return 1;
	if(n % 2){
		return ((a%mod) * (modpow(a, n-1)%mod)) % mod;
	}
	else{
		return modpow((a*a)%mod, n/2) % mod;
	}
}

void make_fact()
{
	llint val = 1;
	fact[0] = 1;
	for(int i = 1; i < FACT_MAX; i++){
		val *= i;
		val %= mod;
		fact[i] = val;
	}
	fact_inv[FACT_MAX-1] = modpow(fact[FACT_MAX-1], mod-2);
	for(int i = FACT_MAX-2; i >= 0; i--){
		fact_inv[i] = fact_inv[i+1] * (i+1) % mod;
	}
}

llint comb(llint n, llint k)
{
	llint ret = 1;
	ret *= fact[n];
	ret *= fact_inv[k], ret %= mod;
	ret *= fact_inv[n-k], ret %= mod;
	return ret;
}

int main(void){
  cin >> n >> k;
  make_fact();

  llint ans = 0;
  for(int i = 1; i <= n; i++){
    llint cnt = 0;
    if(n-1 >= k) cnt += comb(n-1, k) * fact[k] % mod;
    if(n >= 2 && k >= 2 && i < n){
      cnt += comb(n-2, k-2) * fact[k] % mod * modpow(2, mod-2) % mod;
      cnt %= mod;
    }
    ans += i * cnt % mod;
    ans %= mod;
  }
  cout << ans << endl;

  return 0;
}