10
0
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-11-07 22:53:52 +01:00
QuantumPackage/src/basis_correction/basis_correction.irp.f

17 lines
360 B
Fortran
Raw Normal View History

2020-04-07 11:03:19 +02:00
program basis_correction
implicit none
BEGIN_DOC
! TODO : Put the documentation of the program here
END_DOC
read_wf = .True.
touch read_wf
no_core_density = .True.
touch no_core_density
if(io_mo_two_e_integrals .ne. "Read")then
provide ao_two_e_integrals_in_map
endif
2020-04-07 11:03:19 +02:00
provide mo_two_e_integrals_in_map
call print_basis_correction
end