I am a professor of physical chemistry at Boise State University. I have been using Mathematica for years to teach quantum mechanics, spectroscopy, thermodynamics (classical and statistical), and kinetics. I am in the process of revising my materials for publication and distribution. You can find out more about this project at http://kevinausman.net