### R code from vignette source 'geography-sol.rnw'