Revises padShifts

Instead of 'take n $ repeat a' we have a Prelude function
'replicate n a'. This decreases line noise a bit and I find it to be a
slightly easier read.