mirror of
https://github.com/TREX-CoE/irpjast.git
synced 2024-11-03 20:54:10 +01:00
14 lines
280 B
Fortran
14 lines
280 B
Fortran
program jastrow
|
|
implicit none
|
|
print *, 'The total Jastrow factor'
|
|
print *, jastrow_full
|
|
print *, 'REF'
|
|
print *, factor_een_deriv_e_ref
|
|
print *, 'X'
|
|
print *, factor_een_deriv_e
|
|
print *, 'BLAS'
|
|
print *, factor_een_deriv_e_blas
|
|
!PROVIDE jastrow_full
|
|
|
|
end program
|