Fortran 90 question about reading files with text

[dealove]

I have a file with text and adjacent to it, the number i want to read. Below is the format. I was wondering how to read just the numbers without touching the text.

trhy 30.0
difje 30.0
sdjk 66.5
xmb 15.0
dcos 15.0
fjvm 2.573e-4
srht 9.05e-3
art3 0.0
19.954
39.499
43.852
48.713
51.660
53.801
54.715
55.602

another format is:

is...o2. mw2 31.998 htf2 0.0
is...n2. mw3 28.014 htf3 0.0
is..co2. mw4 44.009 htf4 -93.965
is..h2o. mw5 18.015 htf5 -57.103

if above two formats are in the same file, can I use DO loops for first format and second format individually by counting the number of lines?

 

[NoobixCube]

if the second set always starts with 'is' then once you are able to identify strings you can use this as a starting point to start your second do loop.
I have found a tutorial with source code online. This should help you out:
http://www.cs.mtu.edu/~shene/COURSES/cs201/NOTES/chap05/class-avg.html"