mirror of
https://github.com/TREX-CoE/irpjast.git
synced 2024-07-03 09:56:11 +02:00
7 lines
135 B
Fortran
7 lines
135 B
Fortran
program jastrow
|
|
implicit none
|
|
print *, 'The total Jastrow factor'
|
|
print *, dexp(factor_ee + factor_en + factor_een)
|
|
|
|
end program
|