Il Linguaggio Fortran 90/95

1.9 Procedure Intrinseche 85
LEN_TRIM(STRING)
Restituisce la lunghezza della stringa STRING depurata degli eventuali spazi bianchi di coda.
Se STRING è completamente ”bianca”, il valore restituito è zero.
Esempio:
CHARACTER(LEN=11) str
INTEGER :: i
...
i = LEN (’ ’) ! restituisce 0
i = LEN(’Una frase con 6 spazi bianchi ’) ! restituisce 24
LGE(STRING_A,STRING_B)
Restituisce il valore .TRUE. se STRING_A >= STRING_B secondo la sequenza di collating ASCII.
Gli argomenti STRING_A e STRING_B devono essere stringhe di caratteri con kind di default.
Esempio:
LOGICAL :: l
...
l = LGE(’abc’,’abd’) ! ris: .FALSE.
l = LGE (’ab’,’aaaaaaab’) ! ris: .TRUE.
LGT(STRING_A,STRING_B)
Restituisce il valore .TRUE. se STRING_A > STRING_B secondo la sequenza di collating ASCII.
Gli argomenti STRING_A e STRING_B devono essere stringhe di caratteri con kind di default.
Esempio:
LOGICAL :: l
...
l = LGT(’abc’,’abc’) ! ris: .FALSE.
l = LGT(’abc’,’aabc’) ! ris: .TRUE.
LLE(STRING_A,STRING_B)
Restituisce il valore .TRUE. se STRING_A