A Shell Model for Atomistic Simulation of Charge Transfer in Titania