diff --git a/src/ao_one_e_ints/ao_one_e_ints.irp.f b/src/ao_one_e_ints/ao_one_e_ints.irp.f index e5a5454d..65981dc9 100644 --- a/src/ao_one_e_ints/ao_one_e_ints.irp.f +++ b/src/ao_one_e_ints/ao_one_e_ints.irp.f @@ -11,9 +11,6 @@ ELSE ao_one_e_integrals = ao_integrals_n_e + ao_kinetic_integrals -! IF (DO_PSEUDO) THEN -! ao_one_e_integrals += ao_pseudo_integrals -! ENDIF ENDIF DO j = 1, ao_num diff --git a/src/mo_one_e_ints/mo_one_e_ints.irp.f b/src/mo_one_e_ints/mo_one_e_ints.irp.f index e7a91dee..a6a614ab 100644 --- a/src/mo_one_e_ints/mo_one_e_ints.irp.f +++ b/src/mo_one_e_ints/mo_one_e_ints.irp.f @@ -12,10 +12,6 @@ BEGIN_PROVIDER [ double precision, mo_one_e_integrals,(mo_num,mo_num)] ELSE mo_one_e_integrals = mo_integrals_n_e + mo_kinetic_integrals -! IF (DO_PSEUDO) THEN -! mo_one_e_integrals += mo_pseudo_integrals -! ENDIF - ENDIF IF (write_mo_one_e_integrals) THEN