C Library Functions - upper_quoted (3)
NAME
upper_quoted(3f) - [M_strings:CASE] elemental function converts string to
uppercase skipping strings quoted per Fortran syntax rules
(LICENSE:PD)
CONTENTS
Synopsis
Description
Options
Returns
Examples
See Also
Author
License
SYNOPSIS
elemental pure function upper_quoted(str) result (string)
character(*), intent(in) :: str
character(len(str)) :: string ! output string
DESCRIPTION
upper_quoted(string) returns a copy of the input string with all not-quoted
characters converted to uppercase, assuming ASCII character sets
are being used. The quoting rules are the same as for Fortran source.
Either a single or double quote starts a quoted string, and a quote
character of the same type is doubled when it appears internally in
the quoted string. If a double quote quotes the string single quotes
may appear in the quoted string as single characters, and vice-versa
for single quotes.
OPTIONS
|
str |
string to convert to uppercase
|
|
RETURNS
|
upper |
copy of the input string with all unquoted characters converted
to uppercase
|
|
EXAMPLES
Sample program:
program demo_upper_quoted
use M_strings, only: upper_quoted
implicit none
character(len=:),allocatable :: s
s= ABCDEFG abcdefg "Double-Quoted" Single-Quoted "with ""&
& Quote" everything else
write(*,*) mixed-case input string is ....,s
write(*,*) upper-case output string is ...,upper_quoted(s)
write(*,(1x,a,*(a:,"+"))) upper_quoted(3f) is elemental ==>, &
& upper_quoted(["abc","def","ghi"])
end program demo_upper_quoted
Expected output:
mixed-case input string is .... ABCDEFG abcdefg "Double-Quoted" ...
... Single-Quoted "with "" Quote" everything else
upper-case output string is ... ABCDEFG ABCDEFG "Double-Quoted" ...
... Single-Quoted "with "" Quote" EVERYTHING ELSE
upper_quoted(3f) is elemental ==>ABC+DEF+GHI
SEE ALSO
flower(1)
AUTHOR
John S. Urban
LICENSE
Public Domain
| Nemo Release 3.1 | upper_quoted (3) | June 29, 2025 |
Generated by manServer 1.08 from 453ef906-8b42-4f63-bafc-18c82204035a using man macros.