CALL TtyNam(Unit, Name)
INTEGER; scalar; INTENT(IN).
CHARACTER; scalar; INTENT(OUT).
Sets Name to the name of the terminal device open on logical unit Unit or to a blank string if Unit is not connected to a terminal.
Some non-GNU implementations of Fortran provide this intrinsic as only a function, not as a subroutine.
For information on other intrinsics with the same name: See TtyNam Intrinsic (function).