Skip to content

Commit 74d8b2c

Browse files
committed
FDS Source: Keep existing CONV_LENGTH for CARTESIAN particles.
1 parent fb70ade commit 74d8b2c

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

Source/wall.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -3536,7 +3536,7 @@ REAL(EB) FUNCTION HEAT_TRANSFER_COEFFICIENT(NMX,DELTA_N_TMP,H_FIXED,SFX,WALL_IND
35363536
BCX => BOUNDARY_COORD(LPX%BC_INDEX)
35373537
DN = SFX%CONV_LENGTH
35383538
R_DROP = LPX%RADIUS
3539-
IF (R_DROP>TWO_EPSILON_EB) CONV_LENGTH = 2._EB*R_DROP
3539+
IF (R_DROP>TWO_EPSILON_EB .AND. SFX%GEOMETRY/=SURF_CARTESIAN) CONV_LENGTH = 2._EB*R_DROP
35403540
TMP_G = P1X%TMP_G
35413541
RHO_G = P1X%RHO_G
35423542
ZZ_G(1:N_TRACKED_SPECIES) = P1X%ZZ_G(1:N_TRACKED_SPECIES)

0 commit comments

Comments
 (0)