Skip to content

Commit 46f94b6

Browse files
committed
FDS Source: fix unititialized ramp values in read
1 parent 6fe5509 commit 46f94b6

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

Source/read.f90

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -10338,6 +10338,8 @@ SUBROUTINE READ_RAMP
1033810338
CTRL_ID = 'null'
1033910339
X = -1.E6_EB
1034010340
Z = -1.E6_EB
10341+
T = 0._EB
10342+
F = 1._EB
1034110343
CALL CHECKREAD('RAMP',LU_INPUT,IOS) ; IF (STOP_STATUS==SETUP_STOP) RETURN
1034210344
IF (IOS==1) EXIT SEARCH_LOOP2
1034310345
READ(LU_INPUT,RAMP)

0 commit comments

Comments
 (0)