wann_dipole2.f 4.09 KB