¿Cómo obtener el nombre de un archivo que actúa como stdin / stdout?

Estoy teniendo el siguiente problema. Quiero escribir un programa en Fortran90 que quiero poder llamar así:

./program.x < main.in > main.out

Adicionalmente a "main.out" (cuyo nombre puedo establecer al llamar al programa), las salidas secundarias deben escribirse y quería que tuvieran un nombre similar a "main.in" o "main.out" (ellos en realidad no se llaman "main"); sin embargo, cuando uso:

INQUIRE(UNIT=5,NAME=sInputName)

El contenido de sInputName se convierte en "Stdin" en lugar del nombre del archivo. ¿Hay alguna forma de obtener el nombre de los archivos que están vinculados a stdin / stdout cuando se llama al programa ??

Respuestas a la pregunta(2)

Su respuesta a la pregunta