|
Il Fortran 90 ufficializza l'istruzione INCLUDE, già
supportata in semilegalità da molti compilatori F77, per includere al
volo, al momento della compilazione, un file esterno in un file
sorgente.
|
PROGRAM includente INCLUDE 'inclusof.h' INCLUDE 'universalf.h' INTEGER :: a, b READ*,a END PROGRAM includente |
|
Il file da includere deve ovviamente conformarsi al formato del file
includente (free/fixed); nel caso di file relativamente semplici è
possibile utilizzare una sintassi ibrida che permette ad un file di
soddisfare entrambi i formati contemporaneamente, senza comunque un
successo garantito con ogni compilatore.
|
! Porzione di codice Fortran includibile quasi indifferentemente
! nei formati free e fixed
!234567890123456789012345678901234567890123456789012345678901234567890123
INTEGER a, b
REAL pres, temp, temp_rug, temp_bulb_bagn, temp_pot, &
& temp_pot_equiv, temp_pot_equiv_bulb_bagn
|