From 0874108d5a5107f61614287686ac582dcb28021d Mon Sep 17 00:00:00 2001
From: Marcos Vanella <marcos.vanella@nist.gov>
Date: Tue, 12 May 2026 16:32:21 -0400
Subject: [PATCH] FDS source: Remove debug statements from LU_ERR.

---
 Source/pres.f90 | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

diff --git a/Source/pres.f90 b/Source/pres.f90
index c35113521f..f1caa31f79 100644
--- a/Source/pres.f90
+++ b/Source/pres.f90
@@ -2808,13 +2808,7 @@ SUBROUTINE ULMAT_H_MATRIX_SOLVER_SETUP(NM,IPZ)
 MNUM   = 1
 
 ! Set level MSG to 1 for factorization:
-IF (CHECK_POISSON) THEN
-   MSGLVL = 1
-   SELECT CASE(ULMAT_SOLVER_LIBRARY)
-      CASE(MKL_PARDISO_FLAG); IF(MY_RANK==0) WRITE(LU_ERR,*) 'ULMAT : PARDISO factorization for MESH,ZONE=',NM,IPZ,ZM%NUNKH
-      CASE(HYPRE_FLAG);       IF(MY_RANK==0) WRITE(LU_ERR,*) 'HYPRE : Matrix and Solver setup for MESH,ZONE=',NM,IPZ,ZM%NUNKH
-   END SELECT
-ENDIF
+IF (CHECK_POISSON) MSGLVL = 1
 ERROR = 0 ! initialize error flag
 
 ! Each MPI process builds its local set of rows.