sadjustl_character Function

public pure function sadjustl_character(self) result(adjusted)

Arguments

Type IntentOptional AttributesName
class(string), intent(in) :: self

The string.

Return Value character(kind=CK,len=len(self%raw))

Adjusted string.

Description

Left adjust a string by removing leading spaces (character output).

Called By

proc~~sadjustl_character~~CalledByGraph proc~sadjustl_character sadjustl_character interface~adjustl adjustl interface~adjustl->proc~sadjustl_character
Help

Source Code

  pure function sadjustl_character(self) result(adjusted)
  !---------------------------------------------------------------------------------------------------------------------------------
  !< Left adjust a string by removing leading spaces (character output).
  !---------------------------------------------------------------------------------------------------------------------------------
  class(string), intent(in)             :: self     !< The string.
  character(kind=CK, len=len(self%raw)) :: adjusted !< Adjusted string.
  !---------------------------------------------------------------------------------------------------------------------------------

  !---------------------------------------------------------------------------------------------------------------------------------
  if (allocated(self%raw)) adjusted = adjustl(self%raw)
  return
  !---------------------------------------------------------------------------------------------------------------------------------
  endfunction sadjustl_character