Topic: Warning message in Support

Paul,

This is just a minor remark:

In the attached program, I would not expect the warning:

```
    Integer :: recl_exist         
```

WARNING - Variable RECL_EXIST has been used without being given an initial value NO ERRORS, 1 WARNING [<TEST54> FTN95/Win32 v6.00.0] Creating executable: Test54.EXE

Best regards,

Klaus Lassmann

      Winapp

      Program Test54
        Implicit None
        Integer :: recl_exist         
        Logical :: nfile_exist
        Character (len=10) :: nfile
 
        nfile     = 'abcdefghij'

!       --- Check whether data set already exists
!           Inquire the record length

        Inquire ( File = nfile, recl = recl_exist, exist = nfile_exist )

        If ( nfile_exist ) Then
          write (*,*) 'Name of data set =', nfile
        End If

      End Program Test54