$$.times{|i|s=i;$:.map{s=eval [*"#{s}0".chars]*'**2+'};s==1&&p(i)}