Surprise with asterisk in list-directed read

[Beliavsky]

I agree it’s surprising, but it is consistent with the first two examples of the overloaded asterisk in the code

      program test23stars
      character:: b,c,d='?'
      integer j,k,n(2)
      data j,k/2*0/                 ! repeated value in data            (3)
      call input(n,'2*4',b,c,d,*666)! repeated value in list-directed input, 
C                                   ! alternate return
...

at

Overloaded asterisk

Years ago I wrote a Fortran 95 fixed source form program that has 19 different uses of the asterisk *, compiles and runs. Below is a Fortran 2018 version with 23 of them. It compiles and runs, though the two compilers I tried, gfortran and ifort, both gave some warnings. Are there any uses of * that I missed? C Program to show 23 ways Fortran uses the asterisk. Comments at ends of * lines mark uses of *, as here: ! Comment line, * character in it. (1,2) C This program is valid Fortran 2018…