private module function argument_present(acceptable_argument) result(found)
result is .true. only if a command-line argument matches an element of this function's argument
Arguments
Type
Intent
Optional
Attributes
Name
character(len=*),
intent(in)
::
acceptable_argument(:)
sample list: [character(len=len()):: "--benchmark", "-b", "/benchmark", "/b"]
where dashes support Linux/macOS, slashes support Windows, and must be replaced
by the longest list element ("--benchmark" above)
Return Value
logical
procedure, public, nopass ::
flag_value
interface
private module function flag_value(flag)
result is the value passed adjacent to a command-line flag