wann_dipole.f 7.89 KB