We have a lovely new Adjacent() proc for this.