fmt_logical Function

private pure function fmt_logical(v) result(str)

Format a logical as namelist .true./.false..

Arguments

Type IntentOptional Attributes Name
logical, intent(in) :: v

Return Value character(len=:), allocatable


Called by

proc~~fmt_logical~~CalledByGraph proc~fmt_logical fmt_logical proc~logical_default_string nml_logical_key_t%logical_default_string proc~logical_default_string->proc~fmt_logical proc~logical_value_string nml_logical_key_t%logical_value_string proc~logical_value_string->proc~fmt_logical

Source Code

   pure function fmt_logical(v) result(str)
      !! Format a logical as namelist `.true.`/`.false.`.
      logical, intent(in) :: v
      character(len=:), allocatable :: str
      if (v) then
         str = ".true."
      else
         str = ".false."
      end if
   end function fmt_logical