From 394b6ce404385f95c19399d68646f52771f81d97 Mon Sep 17 00:00:00 2001
From: Kevin Gasperich <kgasperich@gmail.com>
Date: Mon, 27 Jan 2020 13:38:29 -0600
Subject: [PATCH] fixed problem with truncated mo_coef_imag save

---
 src/mo_basis/utils.irp.f | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/mo_basis/utils.irp.f b/src/mo_basis/utils.irp.f
index fd5c2b33..b3b52dd7 100644
--- a/src/mo_basis/utils.irp.f
+++ b/src/mo_basis/utils.irp.f
@@ -83,7 +83,7 @@ subroutine save_mos_truncated(n)
   call ezfio_set_mo_basis_mo_class(mo_class)
   if (is_periodic) then
     buffer = 0.d0
-    do j = 1, mo_num
+    do j = 1, n
       do i = 1, ao_num
         buffer(i,j) = mo_coef_imag(i,j)
       enddo