diff --git a/src/Determinants/H_apply.irp.f b/src/Determinants/H_apply.irp.f index dab4390a..6e2b3a5a 100644 --- a/src/Determinants/H_apply.irp.f +++ b/src/Determinants/H_apply.irp.f @@ -249,7 +249,6 @@ subroutine remove_duplicates_in_psi_det(found_duplicates) psi_coef(k,:) = psi_coef_sorted_bit(i,:) endif enddo - print *, N_det,k N_det = k TOUCH N_det psi_det psi_coef endif