adjustr(string): Right Adjust String

Right adjust a string.

Declaration

Sintaxe

retval = adjustr(string)
elemental function adjustr(string)

Argumentos

string: the input value must be of character type.

Valor de retorno

The return value is of type character and of the same kind as of input value string, with trailing spaces removed and same number of spaces added at the start.

Descrição

adjustr(string) adjusts input string by removing any trailing spaces and adding same number of spaces at the start of the input string.

Tipos

Supported argument type is character.

interface repeat
    module procedure repeati32, repeati64
end interface

contains

function adjustr(string)
    character(len=*), intent(in) :: string
end function

Exemplos

program intrinsics_adjustr
    use lfortran_intrinsic_string, only: adjustr
    implicit none
    character(*), parameter :: s1 = "A B "
    print *, adjustr(s1)
end program

Resultado:

 A B

Veja Também

adjustl.