#include <bits/stdc++.h>
const int mod=1e9+7;
using namespace std;
struct seg{
	int mn,mx,sz;
	seg operator +(seg b){
		if(!sz) return b;
		if(!b.sz) return *this;
		if(mx>b.mn) puts("0"),exit(0);
		return (seg){mn,b.mx,sz+b.sz};
	}
}a[10010];
int n,m,K,f[2][5010],p,o;
void qmo(int &x){
	x+=(x>>31)&mod;
}
int main(){
	scanf("%d%d",&n,&K);
	for(int i=1,mx=0,w;i<=n;i++){
		scanf("%d",&w);
		if(w>mx) mx=w,a[++m]={w,w,1},a[++m]={0,0,0};
		else a[m]=a[m]+(seg){w,w,1};
	}
	for(int i=1;i<=m;i+=2){
		while(i+2<=m&&a[i+3].sz&&a[i].mx>a[i+3].mn){
			a[i]=a[i]+a[i+2];
			a[i+1]=a[i+1]+a[i+3];
			for(int j=i+2;j<=m-2;j++) a[j]=a[j+2];
			m-=2;
		}
	}
	f[0][0]=1,p=0,o=1;
	for(int i=1;i<=m;i+=2,p^=1,o^=1){
		for(int j=0;j<=n;j++) f[o][j]=0;
		for(int j=0;j<=n;j++) if(f[p][j]){
			qmo(f[o][j+a[i].sz]+=f[p][j]-mod);
			qmo(f[o][j+a[i+1].sz]+=f[p][j]-mod);
		}
	}
	int ans=0;
	for(int i=0;i<=n;i++) if(i<=K&&n-i<=K) qmo(ans+=f[p][i]-mod);
	printf("%d\n",ans);
}