diff --git a/src/Determinants/determinants.irp.f b/src/Determinants/determinants.irp.f index 276755fa..38b08172 100644 --- a/src/Determinants/determinants.irp.f +++ b/src/Determinants/determinants.irp.f @@ -721,7 +721,7 @@ subroutine apply_excitation(det, exc, res, ok, Nint) case default print *, degree print *, "apply ex" - print *, 1.d0/0.d0 ! For traceback +! print *, 1.d0/0.d0 ! For traceback STOP end select ! END INLINE