Il Linguaggio Fortran 90/95

More documents

Recommendations

Info

216 Operazioni di I/O interattive
Capitolo 5 Unità di Programma Un qualsiasi programma <strong>Fortran</strong> può comporsi di più unità distinte dette unità di programma. Per unità di programma si intende un programma principale (o main), una procedura (che può essere, indifferentemente, esterna, interna o di modulo) o un modulo. In ogni caso, un programma eseguibile consiste sempre di un unico main e di un numero qualsiasi (anche zero) di altre unità di programma. L’unico legame tra le diverse unità di programma è l’interfaccia attraverso la quale un’unità ne invoca un’altra per nome. Lo ”spacchettamento” di un programma in più unità indipendenti presenta numerosi vantaggi: • Le singole unità di programma possono essere scritte e testate indipendentemente l’una dall’altra. • Un’unità di programma che abbia un solo compito ben preciso da svolgere è molto più semplice da comprendere e da mantenere. • Una volta che un modulo o una procedura che siano state sviluppate e testate, è possibile riutilizzarle in altri programmi dando, così, la possibilità al programmatore di costruirsi una propria libreria di programmi. • Alcuni compilatori riescono meglio ad ottimizzare un codice quando il sorgente sia stato scritto in forma modulare. 5.1 <strong>Il</strong> programma principale Tutti i programmi hanno uno ed un solo programma principale. L’esecuzione di un qualsiasi programma parte sempre con l’esecuzione della prima istruzione del main e procede da quel punto in poi. La forma generale dell’unità di programma principale è la seguente: [PROGRAM [nome_programma]] [istruzioni di definizione e dichiarazione di variabili] [istruzioni eseguibili] 217
Page 1:
Il Linguaggio Fortran 90/95 Raucci
Page 4 and 5:
1.9.3 Funzioni numeriche . . . . .
Page 6 and 7:
5 Unità di Programma 217 5.1 Il pr
Page 8 and 9:
8.3.2 I/O con meccanismo namelist .
Page 10 and 11:
10 • Tipi di dati intrinseci non
Page 12 and 13:
12 Tipi ed espressioni Quale che si
Page 14 and 15:
14 Tipi ed espressioni Nella forma
Page 16 and 17:
16 Tipi ed espressioni • Un nome
Page 18 and 19:
18 Tipi ed espressioni eseguire il
Page 20 and 21:
20 Tipi ed espressioni 1.3.1 Costan
Page 22 and 23:
22 Tipi ed espressioni INTEGER [[([
Page 24 and 25:
24 Tipi ed espressioni 1.3.5 Oggett
Page 26 and 27:
26 Tipi ed espressioni Se una costa
Page 28 and 29:
28 Tipi ed espressioni 1.5 Istruzio
Page 30 and 31:
30 Tipi ed espressioni Dal momento
Page 32 and 33:
32 Tipi ed espressioni 2. Vengono c
Page 34 and 35:
34 Tipi ed espressioni 1/2 + 1./4.
Page 36 and 37:
36 Tipi ed espressioni risultati im
Page 38 and 39:
38 Tipi ed espressioni x × 2 x + x
Page 40 and 41:
40 Tipi ed espressioni Si noti che
Page 42 and 43:
42 Tipi ed espressioni Data attuale
Page 44 and 45:
44 Tipi ed espressioni 1.5.3 Espres
Page 46 and 47:
46 Tipi ed espressioni l_1 .NOT.l_1
Page 48 and 49:
48 Tipi ed espressioni L’istruzio
Page 50 and 51:
50 Tipi ed espressioni Se, ad esemp
Page 52 and 53:
52 Tipi ed espressioni MODULE mymod
Page 54 and 55:
54 Tipi ed espressioni Ancora una v
Page 56 and 57:
56 Tipi ed espressioni dfdx_4 = (f2
Page 58 and 59:
58 Tipi ed espressioni Se non è di
Page 60 and 61:
60 Tipi ed espressioni ... END PROG
Page 62 and 63:
62 Tipi ed espressioni risulta corr
Page 64 and 65:
64 Tipi ed espressioni ! Definizion
Page 66 and 67:
66 Tipi ed espressioni TYPE(isotopo
Page 68 and 69:
68 Tipi ed espressioni istruzione S
Page 70 and 71:
70 Tipi ed espressioni DBLE(A) Conv
Page 72 and 73:
72 Tipi ed espressioni COS(X) Resti
Page 74 and 75:
74 Tipi ed espressioni MAX(A1,A2[,A
Page 76 and 77:
76 Tipi ed espressioni 1.9.4 Funzio
Page 78 and 79:
78 Tipi ed espressioni FRACTION(X)
Page 80 and 81:
80 Tipi ed espressioni SET_EXPONENT
Page 82 and 83:
82 Tipi ed espressioni Base: 2 Rang
Page 84 and 85:
84 Tipi ed espressioni IACHAR(C) Re
Page 86 and 87:
86 Tipi ed espressioni l = LLE(’A
Page 88 and 89:
88 Tipi ed espressioni
Page 90 and 91:
90 Istruzioni di controllo 2.2 Istr
Page 92 and 93:
92 Istruzioni di controllo READ(*,*
Page 94 and 95:
94 Istruzioni di controllo d = b**2
Page 96 and 97:
96 Istruzioni di controllo Una cosa
Page 98 and 99:
98 Istruzioni di controllo che hann
Page 100 and 101:
100 Istruzioni di controllo L’ist
Page 102 and 103:
102 Istruzioni di controllo Tabelli
Page 104 and 105:
104 Istruzioni di controllo esso de
Page 106 and 107:
106 Istruzioni di controllo La vari
Page 108 and 109:
108 Istruzioni di controllo Il segu
Page 110 and 111:
110 Istruzioni di controllo ! IMPLI
Page 112 and 113:
112 Istruzioni di controllo PRINT*,
Page 114 and 115:
114 Istruzioni di controllo READ(*,
Page 116 and 117:
116 Istruzioni di controllo Armstro
Page 118 and 119:
118 Istruzioni di controllo DO i=1,
Page 120 and 121:
120 Istruzioni di controllo realizz
Page 122 and 123:
122 Istruzioni di controllo
Page 124 and 125:
124 Array • Le modalità di acces
Page 126 and 127:
126 Array E’ anche possibile defi
Page 128 and 129:
128 Array 3.3.2 Costruttore di arra
Page 130 and 131:
130 Array Inizializzazione attraver
Page 132 and 133:
132 Array Se uno degli operandi è
Page 134 and 135:
134 Array Come ulteriore esempio, s
Page 136 and 137:
136 Array e tre variabili intere m,
Page 138 and 139:
138 Array ! *** Sezione esecutiva *
Page 140 and 141:
140 Array 3.8.1 Loop interchange I
Page 142 and 143:
142 Array che è un valore di un or
Page 144 and 145:
144 Array ! ciclo ottimizzato con l
Page 146 and 147:
146 Array ! Sezione dichiarativa IM
Page 148 and 149:
148 Array a(n-1) = a(n-1) + a(n-2)*
Page 150 and 151:
150 Array stesso spazio di iterazio
Page 152 and 153:
152 Array b(i+1) = b(i) + a(i) END
Page 154 and 155:
154 Array b(i) = b(i)+b(2) END DO D
Page 156 and 157:
156 Array I cicli così riscritti p
Page 158 and 159:
158 Array cicli in quanto non sempr
Page 160 and 161:
160 Array In questo caso la lista d
Page 162 and 163:
162 Array con cui l’introduzione
Page 164 and 165:
164 Array INTEGER :: numero_atomico
Page 166 and 167: 166 Array in cui espressione_schema
Page 168 and 169: 168 Array per far sì che una opera
Page 170 and 171: 170 Array FORALL (i=1:n-1) FORALL (
Page 172 and 173: 172 Array Così, ad esempio, con ri
Page 174 and 175: 174 Array
Page 176 and 177: 176 Operazioni di I/O interattive
Page 178 and 179: 178 Operazioni di I/O interattive c
Page 180 and 181: 180 Operazioni di I/O interattive i
Page 182 and 183: 182 Operazioni di I/O interattive I
Page 184 and 185: 184 Operazioni di I/O interattive d
Page 186 and 187: 186 Operazioni di I/O interattive 4
Page 190 and 191: 190 Operazioni di I/O interattive V
Page 192 and 193: 192 Operazioni di I/O interattive L
Page 196 and 197: 196 Operazioni di I/O interattive W
Page 198 and 199: 198 Operazioni di I/O interattive v
Page 200 and 201: 200 Operazioni di I/O interattive a
Page 202 and 203: 202 Operazioni di I/O interattive h
Page 206 and 207: 206 Operazioni di I/O interattive S
Page 210 and 211: 210 Operazioni di I/O interattive &
Page 212 and 213: 212 Operazioni di I/O interattive S
Page 214 and 215: 214 Operazioni di I/O interattive R
Page 218 and 219: 218 Unità di Programma [CONTAINS p
Page 220 and 221: 220 Unità di Programma [prefisso]
Page 222 and 223: 222 Unità di Programma FUNCTION li
Page 224 and 225: 224 Unità di Programma PROGRAM mai
Page 226 and 227: 226 Unità di Programma REAL FUNCTI
Page 228 and 229: 228 Unità di Programma 5.5 Moduli
Page 230 and 231: 230 Unità di Programma END MODULE
Page 232 and 233: 232 Unità di Programma REAL(r8),PA
Page 234 and 235: 234 Unità di Programma definite in
Page 236 and 237: 236 Unità di Programma SEQUENCE IN
Page 238 and 239: 238 Unità di Programma RETURN CONT
Page 240 and 241: 240 Unità di Programma Nel seguent
Page 242 and 243: 242 Unità di Programma - abbia un
Page 244 and 245: 244 Unità di Programma FUNCTION f(
Page 246 and 247: 246 Unità di Programma I nomi dei
Page 248 and 249: 248 Unità di Programma In questo e
Page 250 and 251: 250 Unità di Programma vengono pas
Page 252 and 253: 252 Unità di Programma ma di solit
Page 254 and 255: 254 Unità di Programma Un semplice
Page 256 and 257: 256 Unità di Programma REAL :: one
Page 258 and 259: 258 Unità di Programma CALL do_mat
Page 260 and 261: 260 Unità di Programma INTEGER, IN
Page 262 and 263: 262 Unità di Programma IMPLICIT NO
Page 264 and 265: 264 Unità di Programma - Procedure
Page 266 and 267:
266 Unità di Programma Differenza
Page 268 and 269:
268 Unità di Programma Il seguente
Page 270 and 271:
270 Unità di Programma Del program
Page 272 and 273:
272 Unità di Programma Come esempi
Page 274 and 275:
274 Unità di Programma IMPLICIT NO
Page 276 and 277:
276 Unità di Programma ! INTEGER,
Page 278 and 279:
278 Unità di Programma mnth = moun
Page 280 and 281:
280 Unità di Programma n dischi pe
Page 282 and 283:
282 Unità di Programma RECURSIVE S
Page 284 and 285:
284 Unità di Programma IMPLICIT NO
Page 286 and 287:
286 Unità di Programma SUBROUTINE
Page 288 and 289:
288 Unità di Programma IF(s(i:i)==
Page 290 and 291:
290 Unità di Programma 17.7999992
Page 292 and 293:
292 Unità di Programma FUNCTION ve
Page 294 and 295:
294 Unità di Programma definite. I
Page 296 and 297:
296 Unità di Programma ==========
Page 298 and 299:
298 Unità di Programma Per il calc
Page 300 and 301:
300 Unità di Programma C:\MYPROG>p
Page 302 and 303:
302 Unità di Programma matrix al f
Page 304 and 305:
304 Unità di Programma Tutte le va
Page 306 and 307:
306 Unità di Programma END FUNCTIO
Page 308 and 309:
308 Unità di Programma FUNCTION f(
Page 310 and 311:
310 Unità di Programma x = findRoo
Page 312 and 313:
312 Unità di Programma
Page 314 and 315:
314 Array Processing 6.2 Array di f
Page 316 and 317:
316 Array Processing Tuttavia, se u
Page 318 and 319:
318 Array Processing 6.5 Array allo
Page 320 and 321:
320 Array Processing matrice quadra
Page 322 and 323:
322 Array Processing INTEGER :: sta
Page 324 and 325:
324 Array Processing In tal caso, l
Page 326 and 327:
326 Array Processing CONTAINS SUBRO
Page 328 and 329:
328 Array Processing ! Costruzione
Page 330 and 331:
330 Array Processing ANY((/.FALSE.,
Page 332 and 333:
332 Array Processing • L’array
Page 334 and 335:
334 Array Processing • Se l’arg
Page 336 and 337:
336 Array Processing L’argomento
Page 338 and 339:
338 Array Processing dove il risult
Page 340 and 341:
340 Array Processing ! *** Sezione
Page 342 and 343:
342 Array Processing 0 8 0 0 0 0 7
Page 344 and 345:
344 Array Processing FIELD deve ess
Page 346 and 347:
346 Array Processing L’argomento
Page 348 and 349:
348 Array Processing MAXLOC(mat,DIM
Page 350 and 351:
350 Array Processing Esempi: Sia v
Page 352 and 353:
352 Array Processing • Il valore
Page 354 and 355:
354 Array Processing 6.6.7 Procedur
Page 356 and 357:
356 Array Processing • Se MATRIX_
Page 358 and 359:
358 Array Processing WRITE(*,*) " I
Page 360 and 361:
360 Array Processing ELSE m(k,k:n+1
Page 362 and 363:
362 Puntatori in cui: tipo, POINTER
Page 364 and 365:
364 Puntatori nome_puntatore => nom
Page 366 and 367:
366 Puntatori il cui nome è sul la
Page 368 and 369:
368 Puntatori ... NULLIFY(pt1) ! pt
Page 370 and 371:
370 Puntatori END TYPE matrix INTER
Page 372 and 373:
372 Puntatori CALL setm(2,2,tmp(1:2
Page 374 and 375:
374 Puntatori PRINT*, q ! ...stampa
Page 376 and 377:
376 Puntatori END PROGRAM sort Si r
Page 378 and 379:
378 Puntatori REAL,DIMENSION(10,10)
Page 380 and 381:
380 Puntatori SUBROUTINE sub(p) REA
Page 382 and 383:
382 Puntatori 7.9 Funzioni Puntator
Page 384 and 385:
384 Puntatori INTEGER, POINTER :: p
Page 386 and 387:
386 Puntatori value pointer Figura
Page 388 and 389:
388 Puntatori Uno dei vantaggi che
Page 390 and 391:
390 Puntatori search: DO IF ((ptr%v
Page 392 and 393:
392 Puntatori MODULE linked_list US
Page 394 and 395:
394 Puntatori PROGRAM main ! Scopo:
Page 396 and 397:
396 Puntatori value pointer ❄ ❄
Page 398 and 399:
398 Puntatori INTERFACE OPERATOR(==
Page 400 and 401:
400 Puntatori RECURSIVE SUBROUTINE
Page 402 and 403:
402 Puntatori operazioni di ricerca
Page 404 and 405:
404 Puntatori END IF ! Stampa il co
Page 406 and 407:
406 Puntatori equal_to = .TRUE. ELS
Page 408 and 409:
408 Puntatori Reed Oliver 618-813-1
Page 410 and 411:
410 Operazioni di I/O su file Un re
Page 412 and 413:
412 Operazioni di I/O su file lista
Page 414 and 415:
414 Operazioni di I/O su file • L
Page 416 and 417:
416 Operazioni di I/O su file • L
Page 418 and 419:
418 Operazioni di I/O su file • N
Page 420 and 421:
420 Operazioni di I/O su file 1 L
Page 422 and 423:
422 Operazioni di I/O su file invec
Page 424 and 425:
424 Operazioni di I/O su file Chiar
Page 426 and 427:
426 Operazioni di I/O su file ACTIO
Page 428 and 429:
428 Operazioni di I/O su file EXIT
Page 430 and 431:
430 Operazioni di I/O su file ! del
Page 432 and 433:
432 Operazioni di I/O su file 8.3.1
Page 434 and 435:
434 Operazioni di I/O su file NAMEL
Page 436 and 437:
436 Operazioni di I/O su file • N
Page 438 and 439:
438 Operazioni di I/O su file Al fi
Page 440 and 441:
440 Operazioni di I/O su file 16/12
Page 442 and 443:
442 Operazioni di I/O su file CHARA
Page 444 and 445:
444 Insieme di codifica ASCII
Page 446 and 447:
446 Precedenza degli operatori nel
Page 448 and 449:
448 Ordinamento delle istruzioni Fo
Page 450 and 451:
450 Applicabilità degli specificat
Page 452 and 453:
452 Procedure intrinseche A Qualsia
Page 454 and 455:
454 Procedure intrinseche Nome gene
Page 456 and 457:
456 Procedure intrinseche Nome gene
show all

Il Linguaggio Fortran 90/95

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?