pairUp xs=[(x,y)|x<-xs,y<-[x..last xs],x/=y]