Convert character variable to lower case (Specification)
Version: experimental
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | string |
pure function to_lower(string) result(lower_string) character(len=*), intent(in) :: string character(len=len(string)) :: lower_string integer :: i do i = 1, len(string) lower_string(i:i) = char_to_lower(string(i:i)) end do end function to_lower