Manual Reference Pages - getname (3m_io)
NAME
getname(3f) - [M_io:QUERY] get name of the current executable
(LICENSE:PD)
CONTENTS
Synopsis
Description
Examples
Author
License
SYNOPSIS
function getname() result(name)
character(len=:),allocatable :: getname
DESCRIPTION
getname(3f) returns the name of the current executable using
get_command_argument(3f) and inquire(3f).
EXAMPLES
Sample getting a pathname of current executable:
program demo_getname
use M_io, only : getname
implicit none
write(*,(*(a)))Running ,getname()
end program demo_getname
AUTHOR
John S. Urban
LICENSE
Public Domain