This Mathematica notebook demonstrates how to calculate fairly accurate He energy levels using undergraduate level quantum mechanics. It is intended to accompany the manuscript "Accurate Binding Energy of the He Atom with ...