File |
Line number |
Procedure |
Code |
./pkg/diagnostics/diagnostics_set_pointers.F |
130 |
DIAGNOSTICS_SET_POINTERS |
ndiagcount = 0 |
./pkg/diagnostics/diagnostics_set_pointers.F |
140 |
DIAGNOSTICS_SET_POINTERS |
CALL DIAGNOSTICS_SETDIAG(mate,ndiagcount,md,ld,nd,myThid) |
./pkg/diagnostics/diagnostics_set_pointers.F |
160 |
DIAGNOSTICS_SET_POINTERS |
IF ( ndiagcount.LE.numDiags .AND. |
./pkg/diagnostics/diagnostics_set_pointers.F |
164 |
DIAGNOSTICS_SET_POINTERS |
& ndiagcount, ' levels' |
./pkg/diagnostics/diagnostics_set_pointers.F |
168 |
DIAGNOSTICS_SET_POINTERS |
IF ( ndiagcount.GT.numDiags ) THEN |
./pkg/diagnostics/diagnostics_set_pointers.F |
175 |
DIAGNOSTICS_SET_POINTERS |
& ' but needs at least', ndiagcount |
./pkg/diagnostics/diagnostics_set_pointers.F |
35 |
DIAGNOSTICS_SET_POINTERS |
INTEGER ndiagcount, ndCount |
./pkg/diagnostics/diagstats_set_pointers.F |
116 |
DIAGSTATS_SET_POINTERS |
IF ( ndiagcount.LE.diagSt_size .AND. |
./pkg/diagnostics/diagstats_set_pointers.F |
120 |
DIAGSTATS_SET_POINTERS |
& ndiagcount, ' levels' |
./pkg/diagnostics/diagstats_set_pointers.F |
124 |
DIAGSTATS_SET_POINTERS |
IF ( ndiagcount.GT.diagSt_size ) THEN |
./pkg/diagnostics/diagstats_set_pointers.F |
131 |
DIAGSTATS_SET_POINTERS |
& ' but needs at least', ndiagcount |
./pkg/diagnostics/diagstats_set_pointers.F |
36 |
DIAGSTATS_SET_POINTERS |
INTEGER ndiagcount, ndCount |
./pkg/diagnostics/diagstats_set_pointers.F |
57 |
DIAGSTATS_SET_POINTERS |
ndiagcount = 0 |
./pkg/diagnostics/diagstats_set_pointers.F |
67 |
DIAGSTATS_SET_POINTERS |
CALL DIAGSTATS_SETDIAG(mate,ndiagcount,md,ld,nd,myThid) |