Il Linguaggio Fortran 90/95

1.9 Procedure Intrinseche 77
I valori di b e di p , emin ed emax determinano l’insieme dei dati reali supportati dal processore.
Il parametro b è chiamato radice (o base) del sistema di numerazione utilizzato per rappresentare
i numeri reali su un dato processore. Praticamente tutti i moderni processori usano un
sistema a 2 bit, sicché b vale 2 e ciascun termine fk può valere 0 oppure 1 (fatta eccezione per
f1 che può valere solo 1).
I bit utilizzati per rappresentare un numero reale sono divisi in due gruppi: uno per la
mantissa (la parte intera del valore) e l’altro per l’esponente. Per un sistema in base 2, p
rappresenta il numero di bit per la mantissa mentre e è compreso in un intervallo rappresentabile
con un numero di bit pari a quello dell’esponente diminuito di un’unità.
A titolo di esempio, per una tipica rappresentazione di reali in singola precisione a 32 bit
su un processore con base 2, il modello reale diventa:
x =
dove ciascun fk può valere 0 o 1.
BIT_SIZE(I)
0
±2 e × 1
2 + 24
k=2 fk × 2 −k , − 126 ≤ e ≤ 127
Restituisce il numero di bit occupati dall’argomento I nella specifica implementazione, essendo
I un oggetto di tipo INTEGER.
DIGITS(X)
Restituisce il numero di cifre significative di X. A seconda che l’argomento X sia di tipo REAL o
di tipo INTEGER, il numero restituito sarà rappresentativo del valore di q o di p dei modelli di
rappresentazione precedentemente citati.
Si noti che questa funzione restituisce il numero di cifre significative nella base di numerazione
usata dal processore; se, come spesso accade, questa base è 2, la funzione fornisce il
numero di bit significativi. Se, invece, si è interessati a conoscere il numero di cifre decimali
significative, si dovrà fare uso della funzione PRECISION(X).
EPSILON(X)
Restituisce quel numero che sommato a 1.0 produce il valore immediatamente successivo
fra quelli rappresentabili sulla macchina in uso e per quel particolare parametro di kind.
L’argomento deve essere di tipo REAL e può avere kind qualsiasi.
EXPONENT(X)
Fornisce l’esponente di X nella base di numerazione adottata dal processore. L’argomento deve
essere di tipo REAL. Il valore fornito rappresenta il termine e del modello di rappresentazione
dei reali.