#include using namespace std; #define rep(i,n) for(int i=0;i<(int)(n);i++) #define repe(i,n) rep(i,(n)+1) #define per(i,n) for(int i=(int)(n)-1;i>=0;i--) #define pere(i,n) rep(i,(n)+1) #define all(x) (x).begin(),(x).end() #define SP <<" "<< #define MOD 1000000007 #define IINF 1000000000 #define LINF 1000000000000000000 typedef long long LL; typedef long double LD; long long modpow(long long a, long long n, long long mod) { long long res = 1; while (n > 0) { if (n & 1) res = res * a % mod; a = a * a % mod; n >>= 1; } return res; } // a^{-1} mod を計算する long long modinv(long long a, long long mod) { return modpow(a, mod - 2, mod); } int main(){ LL n,k; cin >> n >> k; vector a(n); vector inv(n+1); inv[0]=1; for(int i=1;i<=n;i++){ inv[i]=inv[i-1]*i%MOD; } for(int i=0;i> a[i]; sort(all(a)); LL ans=1; for(int i=n-1;i>=0;i--){ LL idx=distance(a.begin(),upper_bound(all(a),k-a[i])); if(idx-(n-1-i)<=0){ cout << 0 << endl; return 0; } if(idx>i){ LL nokori=n-2*(n-1-i); LL tmp=nokori/2; while(nokori){ ans=(ans*(nokori*(nokori-1)/2))%MOD; nokori-=2; } ans=ans*modinv(inv[tmp],MOD)%MOD; break; } ans=(ans*(idx-(n-1-i)))%MOD; } cout << ans << endl; return 0; }