main=do l<-readFile"test.hs";putStr[c|c<-['\0'..'\DEL'],all(/=c)l]