Skip to content

Commit 7e886f1

Browse files
authored
Merge pull request #14563 from drjfloyd/master
FDS Source: Remove debug statement
2 parents 65a3b25 + 93c2c1d commit 7e886f1

File tree

1 file changed

+0
-1
lines changed

1 file changed

+0
-1
lines changed

Source/hvac.f90

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -3120,7 +3120,6 @@ SUBROUTINE COLLAPSE_HVAC_BC(T)
31203120
DN=> DUCTNODE(DUCT(ND)%NODE_INDEX(1))
31213121
DN2=> DUCTNODE(DUCT(ND)%NODE_INDEX(2))
31223122
P_OFFSET = 0.5_EB*(EVALUATE_RAMP(DN%XYZ(3),I_RAMP_P0_Z) - EVALUATE_RAMP(DN2%XYZ(3),I_RAMP_P0_Z))
3123-
WRITE(LU_ERR,'(A,A,5(1X,E13.6))') 'POFF:',TRIM(DUCT(ND)%ID),DN%XYZ(3),DN2%XYZ(3),DN%P,DN2%P, P_OFFSET
31243123
DN%P = DN%P - P_OFFSET
31253124
DN2%P = DN2%P + P_OFFSET
31263125
ENDDO SAME_Z_LEAK

0 commit comments

Comments
 (0)