to_lower Function

public elemental function to_lower(string) result(lower_string)

Convert character variable to lower case

Version: experimental

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: string

Return Value character(len=len)


Calls

proc~~to_lower~~CallsGraph proc~to_lower to_lower proc~char_to_lower char_to_lower proc~to_lower->proc~char_to_lower

Variables

Type Visibility Attributes Name Initial
integer, private :: i

Source Code

   elemental 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