main=interact$unlines.f.read f 0=[""] f n=[x:y|x<-".#",y<-f$n-1]