string_default_string Function

private function string_default_string(this) result(str)

Type Bound

nml_string_key_t

Arguments

Type IntentOptional Attributes Name
class(nml_string_key_t), intent(in) :: this

Return Value character(len=:), allocatable


Source Code

   function string_default_string(this) result(str)
      class(nml_string_key_t), intent(in) :: this
      character(len=:), allocatable :: str
      str = '"'//trim(this%default)//'"'
   end function string_default_string