Select Code to Download

 :fn(cm, t) =sum over m((-i/h)*<n|V|m>exp(-i(Em -En)t/h))Cm)

use warnings;
...
 
 };
close (FILE);