Il Linguaggio Fortran 90/95

74 Tipi ed espressioni
MAX(A1,A2[,A3,...])
Restituisce l’argomento di valore massimo. Gli argomenti devono essere tutti di tipo INTEGER
o tutti di tipo REAL e devono caratterizzarsi per il medesimo parametro di kind. Il risultato
fornito dalla funzione ha stesso tipo e parametro di kind dei suoi argomenti.
Esempio:
INTEGER :: m1, m2
REAL :: r1, r2
m1 = MAX(5,6,7) ! ris: 7
m2 = MAX(-5.7,-1.23,-3.8) ! ris: -1
r1 = MAX(-5,-6,-7) ! ris: -5.0
r2 = MAX(-5.7,1.23,-3.8) ! ris: 1.23
MIN(A1,A2[,A3,...])
Restituisce l’argomento di valore minimo. Gli argomenti devono essere tutti di tipo INTEGER
o tutti di tipo REAL e devono caratterizzarsi per il medesimo parametro di kind. Il risultato
fornito dalla funzione ha stesso tipo e parametro di kind dei suoi argomenti.
Esempio:
MOD(A,P)
INTEGER :: m1, m2
REAL :: r1, r2
...
m1 = MIN(5,6,7) ! ris: 5
m2 = MIN(-5.7,1.23,-3.8) ! ris: -5
r1 = MIN(-5,-6,-7) ! ris: -7.0
r2 = MIN(-5.7,1.23,-3.8) ! ris: -5.7
Restituisce il resto intero della divisione A/P, ossia il valore A-P*INT(A/P). Il risultato dipende
dal processore nel caso in cui il valore di P risulti nullo. Gli argomenti possono essere di tipo
INTEGER o REAL ma devono avere in comune il tipo e il parametro di kind. Il risultato fornito
dalla funzione ha stesso tipo e parametro di kind degli argomenti.
Esempio:
INTEGER :: i, j
REAL :: r
...
r = MOD(9.0,2.0) ! ris: 1.0
i = MOD(18,5) ! ris: 3
j = MOD(-18,5) ! ris: -3