main=interact(>>=f)
f '0'=[]
f x=x:[x|y<-['2'..x],x<':']