_==0 "exec" "gawk" "-f" "$0"
NR==1{ n=$1;for(i=1;i<=n;i++)a[i]=n+1-i }
NR==2{ for(i=1;i<=NF;i++){t=a[n+1-$i];for(j=n+1-$i;j<n;j++)a[j]=a[j+1];a[n]=t} }
END{ print a[n] }