slight simplification of tests/predsim.R