mirror of
https://github.com/LCPQ/quantum_package
synced 2024-06-02 11:25:26 +02:00
21 lines
419 B
Fortran
21 lines
419 B
Fortran
program write_integrals
|
|
implicit none
|
|
BEGIN_DOC
|
|
! Saves the two-electron integrals with the :math:`erf(\mu r_{12})/r_{12}` oprerator into the EZFIO folder
|
|
END_DOC
|
|
io_mo_two_e_integrals = 'None'
|
|
touch io_mo_two_e_integrals
|
|
io_ao_two_e_integrals = 'None'
|
|
touch io_ao_two_e_integrals
|
|
call routine
|
|
|
|
end
|
|
|
|
subroutine routine
|
|
implicit none
|
|
call save_erf_two_e_integrals_ao
|
|
call save_erf_two_e_integrals_mo
|
|
|
|
end
|
|
|