fileIsOpen = .FALSE.
fileIsOpen=.TRUE.
fileIsOpen=.FALSE.
IF (fileIsOpen) THEN
IF (fileIsOpen .AND. globalFile) THEN
LOGICAL globalFile,fileIsOpen
if (fileIsOpen) then
if (fileIsOpen .AND. globalFile) then
logical fileIsOpen
logical globalFile,fileIsOpen
IF ( fileIsOpen ) THEN
LOGICAL globalFile, fileIsOpen
LOGICAL fileIsOpen
IF (fileIsOpen .AND. (.NOT. globalFile)) THEN
fileIsOpen = .TRUE.
IF ( fileIsOpen .AND. ioUnit.EQ.0 ) THEN