to_string_1_l_fbool Module Function

pure module function to_string_1_l_fbool(value) result(string)

Represent an logical of kind fbool as character sequence.

Arguments

Type IntentOptional Attributes Name
logical(kind=fbool), intent(in) :: value

Return Value character(len=1)


Source Code

   pure module function to_string_1_l_fbool(value) result(string)
      logical(fbool), intent(in) :: value
      character(len=1) :: string

      string = merge("T", "F", value)

   end function to_string_1_l_fbool