Fortran：从字符串中读取数字数据

Question

我已经检查了类似的现有主题（How to read numeric data from a string in FORTRAN），但我无法做我想做的事。

我需要打开一个文件并从字符串中读取数值。贝娄那里有相关文件的一部分。我想阅读“元素”旁边的整数：＆＃39;，但到目前为止，我无法这样做。

      ELEMENT GROUP 2.4.6
GROUP:          1 ELEMENTS:     187169 MATERIAL:          2 NFLAGS:          1
                           fluid
       0
       1       2       3       4       5       6       7       8       9      10
      11      12      13      14      15      16      17      18      19      20
      21      22      23      24      25      26      27      28      29      30
      31      32      33      34      35      36      37      38      39      40

有人可以帮我吗？

Answer 1

好的，多亏了你的答案，该计划正在运作！

进一步参考，这是代码的阅读部分：

READ(77,'(A)') str
ipos = INDEX(str,"ELEMENTS:",back=.true.) + 9
READ (str(1+ipos:),*) k
PRINT*, k

感谢答案。