Definition at line 183 of file dc_string.f90.
◆ cupper()
| subroutine dc_string::toupper::cupper |
( |
character(len = *), intent(inout) |
ch | ) |
|
文字列を大文字に変換(上書き)
文字列 ch に英字が含まれる場合、その英字を大文字に変換して ch に返します。 英字でない文字や既に大文字になっている文字はそのまま返します。
- Parameters
-
Definition at line 1729 of file dc_string.f90.
1730 character(len = *), intent(inout):: ch
1731 integer:: i, lch, idx
1732 continue
1733 lch = len(ch)
1734 do, i = 1, lch
1735 idx = ichar(ch(i:i))
1736 if (97 <= idx .and. idx <= 122) then
1737 ch(i:i)=char(idx - 32)
1738 end if
1739 end do
The documentation for this interface was generated from the following file:
- /build/gtool5-1.0.0~rc5/debian/build-parallel/src/dc_utils/dc_string.f90