This Mathematica notebook accompanies the paper "Accurate Binding Energy of the He Atom with Undergraduate Quantum Mechanics". The notebook contains the calculations described in that paper.