ll N,K,X[2d4],a[100],t,k;
{
	rd(N,K);
	rd(X[0..K-1],t);
	a[cin>>t,t-1]=(1..N);
	
	rep(i,N){
		t=a[i];
		t+=(t==X[0..K+k-1])-(t==X[0..]+1);
		X[K+k++]=(t..i);
		X[K+k++]=-(1-t..~i);
	}

	wt(k,((X+K),1+(X+K))(k));
}