Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(string), | intent(in) | :: | self | The string. |
Adjusted string.
Left adjust a string by removing leading spaces.
elemental function sadjustl(self) result(adjusted)
!---------------------------------------------------------------------------------------------------------------------------------
!< Left adjust a string by removing leading spaces.
!---------------------------------------------------------------------------------------------------------------------------------
class(string), intent(in) :: self !< The string.
type(string) :: adjusted !< Adjusted string.
!---------------------------------------------------------------------------------------------------------------------------------
!---------------------------------------------------------------------------------------------------------------------------------
adjusted = self
if (allocated(adjusted%raw)) adjusted%raw = adjustl(adjusted%raw)
return
!---------------------------------------------------------------------------------------------------------------------------------
endfunction sadjustl