Cleaned up the shift backward calculation
Cleaned up the shift backward calculation

I think this version is easier to understand and also fixes a couple
bugs that the last one had.

pculture/unisubs,pculture/unisubs,pculture/unisubs,pculture/unisubs