From 67fadc92a2fb487cfef96f1f119283eb7fde014d Mon Sep 17 00:00:00 2001
From: mcgratta <mcgratta@gmail.com>
Date: Wed, 24 Jun 2026 14:07:41 -0400
Subject: [PATCH] FDS Source: BC issue for leaking wall

---
 Source/wall.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Source/wall.f90 b/Source/wall.f90
index b71736f4e6..48552aca20 100644
--- a/Source/wall.f90
+++ b/Source/wall.f90
@@ -728,7 +728,7 @@ SUBROUTINE SURFACE_HEAT_TRANSFER(NM,T,SF,BC,B1,WALL_INDEX,CFACE_INDEX,PARTICLE_I
          TSI = T - B1%T_IGN
       ENDIF
 
-      IF (B1%U_NORMAL>TWENTY_EPSILON_EB) THEN
+      IF (B1%U_NORMAL>TWENTY_EPSILON_EB .AND. .NOT.ANY(SF%LEAK_PATH>0)) THEN
          B1%TMP_F = B1%TMP_G
       ELSEIF (SF%TMP_FRONT>0._EB) THEN
          B1%TMP_F = TMP_0(BC%KKG) + &