Mathematica数值计算在量子力学 第4页