mirror of
https://github.com/TREX-CoE/irpjast.git
synced 2024-08-25 06:31:46 +02:00
8 lines
215 B
Fortran
8 lines
215 B
Fortran
program jastrow_irp
|
|
implicit none
|
|
TOUCH elec_coord
|
|
print *, "J_{IRP} = ", jastrow_full
|
|
print *, "\nabla J_{IRP} = ", jastrow_derivs(1:3, :)
|
|
print *, "\nabla^2 J_{IRP} = ", jastrow_derivs(4, :)
|
|
end program
|