如何找一一对应关系

shiyiming

data a;
input x $ y $;
cards;
x1 y1
x1 y2
x1 y3
x2 y3
x2 y3
x2 y4
x3 y1
...
;
run;
在data a里,想找出x和y一一对应的records,并付一个值给ind,比如看前面7个records(假设后面的records和这7个没有任何联系):
x3-y1(x3只有y1与之一一对应),
y4-x2(y4只有x2与之一一对应),
y2-x1(y2只有x1与之一一对应)一一对应,于是先把这2个record取出,付值ind=1.
然后再在余下的records里继续找,
y1-x1(y1只有x1与之一一对应)一一对应,再把这个record取出,付值ind=2.
然后继续在余下的records里继续找,
x1-y3(x1只有y3与之一一对应)一一对应,于是再把这个record取出,付值ind=3.
然后,
x2-y3一一对应,付值ind=4
x2-y3一一对应,付值ind=5
最后得到:
x    y   ind
x1 y1 2
x1 y2 1
x1 y3 3
x2 y3 4
x2 y3 5
x2 y4 1
x3 y1 1
大概的要求就是这样,请高手帮忙!
谢谢!