# LNBLNK

Portability Function: Locates the position of the last nonblank character in a string.

## Module

USE IFPORT

result = LNBLNK (string)

string | (Input) Character*(*). String to be searched. Cannot be an array.

## Results

The result type is INTEGER(4). The result is the index of the last nonblank character in string.

LNBLNK is very similar to the intrinsic function LEN_TRIM, except that string cannot be an array.

## Example

    USE IFPORT
    integer(4) p
    p = LNBLNK(' GOOD DAY ') ! returns 9
    p = LNBLNK(' ')          ! returns 0

Parent topic: J to L

## See Also

LEN_TRIM