diff --git a/fem/src/CRSMatrix.F90 b/fem/src/CRSMatrix.F90
index f471242a55..393fce3e6b 100644
--- a/fem/src/CRSMatrix.F90
+++ b/fem/src/CRSMatrix.F90
@@ -138,6 +138,7 @@ SUBROUTINE CRS_ZeroRow( A,n )
     LOGICAL :: isMass, isDamp, EigenAnalysis, DampedAnalysis, HarmonicAnalysis, Found
 
     EigenAnalysis=.FALSE.; HarmonicAnalysis=.FALSE.
+    DampedAnalysis = .FALSE.
     IF(ASSOCIATED(A % Solver)) THEN
        EigenAnalysis = A % Solver % NOFEigenValues > 0 .AND. &
            ListGetLogical( A % Solver % Values, 'Eigen Analysis',Found)