diff --git a/src/Dets/occ_pattern.irp.f b/src/Dets/occ_pattern.irp.f index 5de21ec4..07bcd89b 100644 --- a/src/Dets/occ_pattern.irp.f +++ b/src/Dets/occ_pattern.irp.f @@ -207,7 +207,7 @@ end endif enddo j+=1 - if (j>=N_det) then + if (j>N_det) then exit endif enddo