test_lower Subroutine

public subroutine test_lower()

Arguments

None

Calls

proc~~test_lower~~CallsGraph proc~test_lower test_lower assert_that assert_that proc~test_lower->assert_that none~lower~3 String%lower proc~test_lower->none~lower~3 true true proc~test_lower->true

Source Code

   subroutine test_lower()
      type(String) :: s

      s = 'aAbBcC'
      @assert_that(s%lower() == 'aabbcc', is(true()))
      
   end subroutine test_lower