Fortran：從字符串中讀取數字數據

Question

我已經檢查了一個類似的現有主題（ 如何從FORTRAN中的字符串中讀取數字數據 ），但是我無法做我想做的事情。

我需要打開一個文件並從字符串中讀取一個數值。 在下面的文件中有一部分。 我想讀取“ ELEMENTS：”旁邊的整數，但到目前為止，我還無法讀取。

      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

感謝您的回答。