---
from: http://rosettacode.org/wiki/Radical_of_an_integer