read a value from a file
read a value from a file
(OP)
Hello,
I have a file that goes like this:
*** MODEL RUN ***
*** VERSION DATED 96043 ***
.
.
.
.
STACK HT (M) = 100.0000
STACK DIAMETER (M) = 2.6950
STACK VELOCITY (M/S) = 99.9020
How can I use the READ command to read the values 100.0000, 2.6950, 99.9020 and in general anything that is on the right of the = sign?
I have a file that goes like this:
*** MODEL RUN ***
*** VERSION DATED 96043 ***
.
.
.
.
STACK HT (M) = 100.0000
STACK DIAMETER (M) = 2.6950
STACK VELOCITY (M/S) = 99.9020
How can I use the READ command to read the values 100.0000, 2.6950, 99.9020 and in general anything that is on the right of the = sign?





RE: read a value from a file
2). Use INDEX to find the position of = in the string
3). Do an internal free format read on the substring after the =
CHARACTER*50 STRING
READ(5,'(A)')STRING
L=LENG(STRING)
K=INDEX(STRING,'=')
READ(STRING(K+1:L),*)VALUE
RE: read a value from a file
RE: read a value from a file