dc_string::tolower Interface Reference

Private Member Functions
subroutine	clower (ch)

Detailed Description

Definition at line 138 of file dc_string.f90.

Member Function/Subroutine Documentation

clower()

subroutine dc_string::tolower::clower ( character(len = *), intent(inout)  ch )

private

Definition at line 1368 of file dc_string.f90.

    !
    ! 文字列 ch に英字が含まれる場合、その英字を小文字に変換して ch
    ! に返します。 英字でない文字や既に小文字になっている文字は
    ! そのまま返します。
    !
    character(len = *), intent(inout):: ch
    integer:: i, lch, idx
  continue
    lch = len(ch)
    do, i = 1, lch
      idx = ichar(ch(i:i))
      if (65 <= idx .and. idx <= 90) then
        ch(i:i)=char(idx + 32)
      end if
    end do

---

The documentation for this interface was generated from the following file:

• dc_utils/dc_string.f90