mirror of
https://github.com/QuantumPackage/qp2.git
synced 2025-03-19 07:06:29 +01:00
8 lines
101 B
Fortran
8 lines
101 B
Fortran
program print_dipole
|
|
implicit none
|
|
read_wf = .True.
|
|
TOUCH read_wf
|
|
call print_dipole_moments
|
|
|
|
end
|