PTEROSOR/QuantumPackage
10
0
Fork 0
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-12-23 04:43:45 +01:00
Code Releases Activity

Merge pull request #190 from Ydrnan/qp2_dev

Browse Source 
dipole moments x,y,z
This commit is contained in:
Anthony Scemama 2022-03-16 10:26:33 +01:00 committed by GitHub
commit 44d953b47c
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
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 implicit none
print*, '' print*, ''
print*, '' 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*, 'z_dipole_moment = ',z_dipole_moment
print*, '****************************************' print*, '****************************************'
end end

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

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