ll*x,N,K,X[2d4],a[100],t,k;{rd(N,K);rd(X[0..K-1],t);x=X+K;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++]=(t..i);x[k++]=-(1-t..~i);}wt(k,(x,1+x)(k));}