#include <bits/stdc++.h>
using namespace std;
const long long MOD = 1000000007;
long long modpow(long long a, long long b){
	long long ans = 1;
	while (b > 0){
		if (b % 2 == 1){
			ans *= a;
			ans %= MOD;
		}
		a *= a;
		a %= MOD;
		b /= 2;
	}
	return ans;
}
long long modinv(long long a){
	return modpow(a, MOD - 2);
}
vector<long long> mf = {1};
vector<long long> mfi = {1};
long long modfact(int n){
	if (mf.size() > n){
		return mf[n];
	} else {
		for (int i = mf.size(); i <= n; i++){
			long long next = mf.back() * i % MOD;
			mf.push_back(next);
			mfi.push_back(modinv(next));
		}
		return mf[n];
	}
}
long long modfactinv(int n){
	if (mfi.size() > n){
		return mfi[n];
	} else {
		return modinv(modfact(n));
	}
}
long long modbinom(int n, int k){
	if (n < 0 || k < 0 || k > n){
		return 0;
	} else {
		return modfact(n) * modfactinv(k) % MOD * modfactinv(n - k) % MOD;
	}
}
int main(){
  int N, M;
  cin >> N >> M;
  vector<int> imos(N + 2, 0);
  for (int i = M; i <= N; i++){
    int L = max(N - i * 2, 0) + i;
    int R = N;
    imos[L]++;
    imos[R + 1]--;
  }
  for (int i = 0; i <= N; i++){
    imos[i + 1] += imos[i];
  }
  long long ans = 0;
  for (int i = 0; i <= N; i++){
    long long cnt = modbinom(N, i) - modbinom(N, i + 1) + MOD;
    long long f = i * 2;
    ans += cnt * f % MOD * imos[i] % MOD;
  }
  ans %= MOD;
  cout << ans << endl;
}