finding the intersection of a list of Sets

I have a list of sets in variable lsets .

Now I want to find the intersection of all the sets.

r = lsets[0]
for s in r[0:]:
   r = r & s

Is there any other shorter way?

Thanks in advance,
Suresh
.