Making some progress. spr.R et al function OK for the old-style. new.R et all starting to perhaps come together thanks to any.tex