close_functional_test Subroutine

private subroutine close_functional_test(test_name)

FIXME : Add documentation

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	test_name

Contents

Source Code

close_functional_test

Source Code

  subroutine close_functional_test(test_name)
    character(*), intent(in) :: test_name
    if (verbosity() .gt. 0) call print_with_stars('Completed functional test: ', test_name)
  end subroutine close_functional_test