| 1442 |
C nActive(n) :: number of active diagnostics (including counters) |
C nActive(n) :: number of active diagnostics (including counters) |
| 1443 |
C for output stream # n |
C for output stream # n |
| 1444 |
C fflags(n) :: character string with per-file flags |
C fflags(n) :: character string with per-file flags |
| 1445 |
|
C freq :: frequency (in s) to write output stream # n |
| 1446 |
|
C phase :: phase (in s) to write output stream # n |
| 1447 |
|
|
| 1448 |
integer nlists |
integer nlists |
| 1449 |
|
|
| 1450 |
_RL freq(numlists) |
_RL freq(numlists), phase(numlists) |
| 1451 |
integer nlevels(numlists) |
integer nlevels(numlists) |
| 1452 |
integer nfields(numlists) |
integer nfields(numlists) |
| 1453 |
integer nActive(numlists) |
integer nActive(numlists) |
| 1464 |
|
|
| 1465 |
common /diag_choices/ |
common /diag_choices/ |
| 1466 |
& levs, jdiag, flds, fnames, fflags, |
& levs, jdiag, flds, fnames, fflags, |
| 1467 |
& freq, nlevels, nfields, nActive, nlists, |
& freq, phase, nlevels, nfields, nActive, nlists, |
| 1468 |
& diag_mdsio, diag_mnc, |
& diag_mdsio, diag_mnc, |
| 1469 |
& diag_pickup_read, diag_pickup_write, |
& diag_pickup_read, diag_pickup_write, |
| 1470 |
& diag_pickup_read_mdsio, diag_pickup_write_mdsio, |
& diag_pickup_read_mdsio, diag_pickup_write_mdsio, |
Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch