Converted to use the Econ-Growth-R-Functions.R file.