9
1
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-10-14 03:31:32 +02:00
qp2/src/tools/print_var_energy.irp.f

12 lines
165 B
Fortran
Raw Normal View History

2021-03-15 17:40:37 +01:00
program print_var_energy
implicit none
read_wf = .True.
touch read_wf
call routine
end
subroutine routine
implicit none
print*,'psi_energy = ',psi_energy
end