Name is not allowed since it has already been defined; specification is ignored.
30
Cause . . . . . : The name has already been defined as a file name, record name, constant name, tag name, prototype name or subroutine name.
Recovery . . . : Change the name. Compile again.