INTEGER FUNCTION IT_EXIST ( FILE )

Argument Definitions (+ indicates altered content)
CHARACTER*(*)      FILE
Description
if FILE does     exist, it_exist=1 
if FILE does not exist, it_exist=0
Source file:it_exist.f
Local Variables (+ indicates altered content)
INTEGER           +ERROR_CODE
LOGICAL           +DOESIT