diff --git a/devel/svdwf/Evar_TruncSVD.irp.f b/devel/svdwf/Evar_TruncSVD.irp.f
index 3476d0d..62befde 100644
--- a/devel/svdwf/Evar_TruncSVD.irp.f
+++ b/devel/svdwf/Evar_TruncSVD.irp.f
@@ -43,7 +43,7 @@ subroutine run
    r1(:,1) = r1(:,1) * dcos(dtwo_pi*r1(:,2))
    do k=1,N_det
      i = psi_bilinear_matrix_rows(k)
-	 j = psi_bilinear_matrix_columns(k)
+     j = psi_bilinear_matrix_columns(k)
      Z(i,l) = Z(i,l) + psi_bilinear_matrix_values(k,1) * r1(k,1)
    enddo
   enddo