Il Linguaggio Fortran 90/95

1.9 Procedure Intrinseche 83
Naturalmente su calcolatori che non supportano tutti i parametri di kind elencati alcuni valori
potranno essere non rappresentativi. Ad esempio su un PC con processore Intel molti
compilatori attribuiscono alla costante qp, rappresentativa della quadrupla precisione, il valore
-1.
1.9.5 Funzioni per il trattamento dei caratteri
ACHAR(I)
Restituisce il carattere corrispondente alla posizione I nella tabella ASCII. Se I è compreso
tra 0 e 127, il risultato fornito è effettivamente l’I_mo carattere della tabella; se, invece, I è
maggiore di 127, il risultato sarà dipendente dal processore.
Ad esempio, se a è una variabile di tipo CHARACTER, l’istruzione:
a = ACHAR(87)
restituisce il valore ’W’.
ADJUSTL(STRING)
Restituisce la stringa STRING giustificata a sinistra. In altre parole rimuove i bianchi di testa e
li sposta in coda.
Esempio:
CHARACTER(LEN=16) :: str
str = ADJUSTL(’ Fortran 90 ’) ! restituisce: ’Fortran 90 ’
ADJUSTR(STRING)
Restituisce la stringa STRING giustificata a destra. In altre parole rimuove i bianchi di coda e li
sposta in testa.
Esempio:
CHARACTER(LEN=16) :: str
str = ADJUSTR(’ Fortran 90 ’) ! restituisce: ’ Fortran 90’
CHAR(I[,KIND])
Restituisce il carattere che occupa la posizione I nella sequenza di collating del processore,
associato al parametro di kind KIND opzionalmente specificato. Gli argomenti I e KIND devono
entrambi di tipo intero. In particolare il valore di I deve essere compreso tra 0 ed n-1, essendo
n il numero di caratteri del sistema di codifica adottato dal processore. La funzione CHAR è
l’inversa di ICHAR.