Skip to content

Commit fbde735

Browse files
committed
fix result variable names
1 parent 692d13b commit fbde735

File tree

1 file changed

+9
-9
lines changed

1 file changed

+9
-9
lines changed

src/stdlib_string_type.f90

+9-9
Original file line numberDiff line numberDiff line change
@@ -480,31 +480,31 @@ end function repeat_string
480480

481481

482482
!> Convert the character sequence hold by the input string to lower case
483-
elemental function to_lower_string(string) result(lowered_string)
483+
elemental function to_lower_string(string) result(lowercase_string)
484484
type(string_type), intent(in) :: string
485-
type(string_type) :: lowered_string
485+
type(string_type) :: lowercase_string
486486

487-
lowered_string%raw = to_lower_(maybe(string))
487+
lowercase_string%raw = to_lower_(maybe(string))
488488

489489
end function to_lower_string
490490

491491

492492
!> Convert the character sequence hold by the input string to upper case
493-
elemental function to_upper_string(string) result(uppered_string)
493+
elemental function to_upper_string(string) result(uppercase_string)
494494
type(string_type), intent(in) :: string
495-
type(string_type) :: uppered_string
495+
type(string_type) :: uppercase_string
496496

497-
uppered_string%raw = to_upper_(maybe(string))
497+
uppercase_string%raw = to_upper_(maybe(string))
498498

499499
end function to_upper_string
500500

501501

502502
!> Convert the character sequence hold by the input string to title case
503-
elemental function to_title_string(string) result(titled_string)
503+
elemental function to_title_string(string) result(titlecase_string)
504504
type(string_type), intent(in) :: string
505-
type(string_type) :: titled_string
505+
type(string_type) :: titlecase_string
506506

507-
titled_string%raw = to_title_(maybe(string))
507+
titlecase_string%raw = to_title_(maybe(string))
508508

509509
end function to_title_string
510510

0 commit comments

Comments
 (0)