functionis_placeholderpureprivate
pure logical function is_placeholder(text)
True if text is one placeholder.
Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
| text | character(len=*) | in | the text |
Result
| Name | Type | Attributes | Description |
|---|---|---|---|
| is_placeholder | logical |
Source
Show the code
pure logical function is_placeholder(text)
character(len=*), intent(in) :: text !! the text
is_placeholder = .false.
if (len(text) < 3) return
is_placeholder = text(1:1) == STX .and. index(text, ETX) == len(text)
end function is_placeholder