Text this: A quantum-chemical study of phosphor impurity in BaTiO3 crystal