added nth-root procedure