f(c:l)=1-f[d|d<-l,d/=c];f""=0
m@main=getLine>>=print.f>>m