fdoc

functionhas_rootpureprivate

pure logical function has_root(path)

True if path is absolute.

Arguments

NameTypeIntentAttributesDescription
pathcharacter(len=*)in

the path

Result

NameTypeAttributesDescription
has_rootlogical

Calls

Source

Show the code
pure logical function has_root(path)
    character(len=*), intent(in) :: path    !! the path

    has_root = has_drive(path)
    if (len(path) > 0) has_root = has_root .or. path(1:1) == '/'
end function has_root

Graphs

Calls

Called by