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