adjustl(string): ajuste de cadena a izquierda

Ajusta a izquierda una cadena.

Declaración

Sintaxis

retval = adjustl(string)
elemental function adjustl(string)

Argumentos

string: el valor de entrada debe ser de tipo carácter.

Valor devuelto

El valor devuelto es de tipo carácter y del mismo tipo que el valor de entrada string, con los espacios iniciales eliminados y el mismo número de espacios añadidos.

Descripción

adjustl(cadena) ajusta la cadena de entrada eliminando cualquier espacio inicial y agregando la misma cantidad de espacios.

Tipos

El tipo de argumento admitido es el carácter.

interface repeat
    module procedure repeati32, repeati64
end interface

contains

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

Ejemplos

program intrinsics_adjustl
    implicit none
    character(*), parameter :: s1 = " A B "
    print *, adjustl(s1)
end program

Result:

A B  

Ver también

lge.