Il Linguaggio Fortran 90/95

1.9 Procedure Intrinseche 73
SQRT(X)
Restituisce la radice quadrata di X. Il valore fornito ha stesso tipo e parametro di kind dell’argomento.
X può essere di tipo REAL o COMPLEX. Se, in particolare, è di tipo reale, dovrà risultare
maggiore o uguale a zero; se, invece, è di tipo complesso la sua parte reale dovrà risultare
maggiore o uguale a zero, a meno che X non sia un immaginario ”puro”, nel qual caso è la sua
parte immaginaria che dovrà essere maggiore o uguale a zero.
TAN(X)
Restituisce la tangente di X. Il risultato della funzione ha stesso tipo e parametro di kind
dell’argomento. L’argomento deve essere di tipo REAL e rappresenta la misura di un arco
espresso in radianti.
TANH(X)
Restituisce la tangente iperbolica di X. Il risultato della funzione ha stesso tipo e parametro di
kind dell’argomento. L’argomento deve essere di tipo REAL e rappresenta la misura di un arco
espresso in radianti.
1.9.3 Funzioni numeriche
Sono raggruppate con questo nome altre funzioni intrinseche non contemplate fra quelle di
conversione di tipo o fra quelle matematiche. Esse, in generale, prevedono argomenti di tipo
intero, reale in singola o doppia precisione e forniscono risultati dello stesso tipo degli argomenti.
DIM(X,Y)
Restituisce la differenza positiva fra i suoi argomenti, ossia il massimo fra il valore di X-Y e 0.
Gli argomenti X e Y devono essere entrambi di tipo INTEGER o di tipo REAL e devono caratterizzarsi
per il medesimo valore di kind. Il risultato della funzione ha stesso tipo e parametro di
kind degli argomenti.
Esempio:
INTEGER :: i
REAL(KIND=single) :: r
REAL(KIND=double) :: d
...
i = DIM(10,5) ! ris: 5
r = DIM(-5.1,3.7) ! ris: 0.0
d = DIM(10.0D0,-5.0D0) ! ris: 15.0