PTEROSOR/QuantumPackage
10
0
Fork 0
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-06-26 15:12:19 +02:00
Code Releases Activity

dipole moments x,y,z

Browse Source
This commit is contained in:
Yann Damour 2022-03-15 16:25:21 +01:00
parent 27dc0c06ae
commit 6b0162e229
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/determinants/dipole_moments.irp.f
View File

@ -55,11 +55,13 @@ END_PROVIDER
subroutine print_z_dipole_moment_only
subroutine print_dipole_moments
implicit none
print*, ''
print*, ''
print*, '****************************************'
print*, 'x_dipole_moment = ',x_dipole_moment
print*, 'y_dipole_moment = ',y_dipole_moment
print*, 'z_dipole_moment = ',z_dipole_moment
print*, '****************************************'
end

2
src/tools/print_dipole.irp.f
View File

@ -1,5 +1,5 @@
program print_dipole
implicit none
call print_z_dipole_moment_only
call print_dipole_moments
end