读取包含星号的字符串

Question

我想通过Fortran 77阅读这一行：

 CH2*                3.667979E-19

我写了这段代码来读这一行

PROGRAM READCH2
CHARACTER(10) :: SPEC
REAL(8) :: X
open(1,FILE='CH2.TXT')
  READ(1,*)SPEC,X
CLOSE(1)
PRINT*,SPEC,X
PAUSE
END PROGRAM READCH2

但代码无法读取CH2*因为它包含一个星号。 我怎么能阅读CH2*？