Four very similar procedures - one for each model - now refactored into one. This isn't all duplicated code, but a step in the right direction.

(And given the next patch, that four procedures would have been five if it weren't for this one...)