Skip to content

Commit 19c9f4a

Browse files
committed
FDS source: minor formatting edit - add some spaces in an if statment
1 parent 6b2affa commit 19c9f4a

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

Source/dump.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2282,7 +2282,7 @@ SUBROUTINE WRITE_SMOKEVIEW_FILE
22822282
DO NN=-3,3
22832283
IF (NN.EQ.0) CYCLE
22842284
SHOW_BNDF(NN)=0
2285-
IF(OB%SHOW_BNDF(NN))SHOW_BNDF(NN) = 1
2285+
IF (OB%SHOW_BNDF(NN)) SHOW_BNDF(NN) = 1
22862286
END DO
22872287
IF (OB%COLOR_INDICATOR/=-3) THEN
22882288
WRITE(MYSTR,'(8I5,A,L1,1X,6I2,1X,6I2)') OB%I1,OB%I2,OB%J1,OB%J2,OB%K1,OB%K2,OB%COLOR_INDICATOR,OB%TYPE_INDICATOR, &

0 commit comments

Comments
 (0)