mathematic求解薛定谔方程程序

编程求解薛定谔方程：BeginPackage["QuantumWell`"]Clear[PsiSym,PsiASym,Spectrum]PsiSym::usage= "PsiSym[x_ ,k ,a