JRH - Added non-adiabatic mathematica script; may be most effective way to build matrix and solve problem. Matrix does not seem diagonal, puzzling at best.