Il Linguaggio Fortran 90/95

1.5 Istruzioni di assegnazione ed espressioni 37
STOP
END PROGRAM globo
Si osservi che alcune funzioni intrinseche permettono di eseguire operazioni di conversione
di tipo e possono essere usate per modificare il tipo del risultato dell’espressione che costituisce
il loro argomento. Così, ad esempio, la funzione intrinseca REAL permette di convertire in reale
un valore di tipo intero o di estrarre la parte reale di un valore complesso. Il suo utilizzo può
essere esemplificato dalle seguenti espressioni:
Espressione Significato
REAL(2+1)/2 1.5
REAL(1/2)*a 0.
REAL((3.1,-4.0)) 3.1
Allo stesso modo, la funzione intrinseca INT converte un valore reale o complesso nell’intero
corrispondente. Ciò avviene troncando la parte decimale dell’argomento reale o della parte
reale dell’argomento complesso.
Espressione Significato
INT(2.+1.5)/2 1
INT(3.9) 3
INT((3.,-4.)) 3
In maniera del tutto analoga a quanto visto per le funzioni intrinsecheREAL eINT, la funzione
intrinseca CMPLX(X,Y) combina gli argomenti X e Y a formare un dato di tipo complesso. Gli
argomenti X e Y possono essere interi, reali o complessi, ed inoltre possono essere sia dati scalari
che array. L’argomento Y è opzionale: se esso viene omesso si assume che abbia valore nullo.
Nel caso particolare in cui X è un valore di tipo COMPLEX, soltanto le componenti di X verranno
impiegate a formare il valore complesso finale.
Una nota sugli operatori aritmetici
Non tutte le operazioni aritmetiche avvengono sfruttando le stesse risorse di macchina o si caratterizzano
per lo stesso tempo di esecuzione. Ad esempio, le operazioni aritmetiche fra interi
sono molto più veloci delle corrispondenti operazioni su reali ed enormemente più veloci delle
corrispondenti operazioni su complessi. Ma anche fra gli operatori applicabili allo stesso tipo di
dati ne esistono alcuni più efficienti ed altri più lenti ed impegnativi. L’operazione di ottimizzazione
detta di strength reduction ha lo scopo di sostituire una espressione con una equivalente
ma che faccia uso di operatori meno ”costosi”. Del tutto in generale si può dire che l’operazione
di somma fra interi è certamente più efficiente dell’operazione di moltiplicazione così come la
somma di due reali è più veloce del prodotto misto fra un intero ed un reale. L’operazione di
moltiplicazione, poi, è sempre più efficiente di una operazione di divisione ed enormemente più
rapida di un elevamento a potenza intera o reale. Di seguito si riportano a titolo di esempio,
alcune semplici istruzioni aritmetiche e la loro versione più efficiente (con i e c si sono indicati
due generici valori interi, con x un valore reale):