| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/diagnostics_fill.F |
66 |
DIAGNOSTICS_FILL |
INTEGER ndId, ipt, iSp |
|
./pkg/diagnostics/diagnostics_fill.F |
84 |
DIAGNOSTICS_FILL |
ipt = idiag(m,n) |
|
./pkg/diagnostics/diagnostics_fill.F |
85 |
DIAGNOSTICS_FILL |
IF ( ndiag(ipt,bi,bj).GE.0 ) THEN |
|
./pkg/diagnostics/diagnostics_fill.F |
90 |
DIAGNOSTICS_FILL |
I ndId, ipt, kLev, nLevs, |
|
./pkg/diagnostics/diagnostics_clear.F |
32 |
DIAGNOSTICS_CLEAR |
INTEGER m, ndId, ipt |
|
./pkg/diagnostics/diagnostics_clear.F |
37 |
DIAGNOSTICS_CLEAR |
ipt = idiag(m,listId) |
|
./pkg/diagnostics/diagnostics_clear.F |
38 |
DIAGNOSTICS_CLEAR |
CALL DIAGNOSTICS_CLRDIAG ( ndId, ipt, myThid ) |
|
./pkg/diagnostics/diagnostics_clear.F |
50 |
DIAGNOSTICS_CLRDIAG |
SUBROUTINE DIAGNOSTICS_CLRDIAG ( ndId, ipt, myThid ) |
|
./pkg/diagnostics/diagnostics_clear.F |
70 |
DIAGNOSTICS_CLRDIAG |
INTEGER ndId, ipt |
|
./pkg/diagnostics/diagnostics_clear.F |
87 |
DIAGNOSTICS_CLRDIAG |
qdiag(i,j,ipt+k-1,bi,bj) = 0.0 |
|
./pkg/diagnostics/diagnostics_clear.F |
91 |
DIAGNOSTICS_CLRDIAG |
ndiag(ipt,bi,bj) = 0 |
|
./pkg/diagnostics/diagnostics_summary.F |
105 |
DIAGNOSTICS_SUMMARY |
ipt = ABS(idiag(md,ld)) |
|
./pkg/diagnostics/diagnostics_summary.F |
106 |
DIAGNOSTICS_SUMMARY |
IF (ipt.NE.0) THEN |
|
./pkg/diagnostics/diagnostics_summary.F |
109 |
DIAGNOSTICS_SUMMARY |
WRITE(msgBuf,'(A,I6,A)') tmpBuf(1:iLen),ndiag(ipt,1,1),' |' |
|
./pkg/diagnostics/diagnostics_summary.F |
163 |
DIAGNOSTICS_SUMMARY |
ipt = ABS(iSdiag(md,ld)) |
|
./pkg/diagnostics/diagnostics_summary.F |
164 |
DIAGNOSTICS_SUMMARY |
IF (ipt.NE.0) THEN |
|
./pkg/diagnostics/diagnostics_summary.F |
168 |
DIAGNOSTICS_SUMMARY |
& qSdiag(0,0,ipt,1,1),' |' |
|
./pkg/diagnostics/diagnostics_summary.F |
33 |
DIAGNOSTICS_SUMMARY |
INTEGER md, ld, ipt, im |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
71 |
DIAGNOSTICS_SCALE_FILL |
INTEGER ndId, ipt, iSp |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
87 |
DIAGNOSTICS_SCALE_FILL |
ipt = idiag(m,n) |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
88 |
DIAGNOSTICS_SCALE_FILL |
IF ( ndiag(ipt,bi,bj).GE.0 ) THEN |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
93 |
DIAGNOSTICS_SCALE_FILL |
I ndId, ipt, kLev, nLevs, |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
100 |
DIAGNOSTICS_FRACT_FILL |
IF ( ndiag(ipt,bi,bj).GE.0 ) THEN |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
121 |
DIAGNOSTICS_FRACT_FILL |
I ndId, ipt, kLev, nLevs, |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
80 |
DIAGNOSTICS_FRACT_FILL |
INTEGER ndId, ipt, iSp |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
99 |
DIAGNOSTICS_FRACT_FILL |
ipt = idiag(m,n) |
|
./pkg/diagnostics/diagnostics_utils.F |
136 |
DIAGNOSTICS_COUNT |
INTEGER ipt |
|
./pkg/diagnostics/diagnostics_utils.F |
144 |
DIAGNOSTICS_COUNT |
ipt = idiag(m,n) |
|
./pkg/diagnostics/diagnostics_utils.F |
145 |
DIAGNOSTICS_COUNT |
IF (ndiag(ipt,1,1).GE.0) THEN |
|
./pkg/diagnostics/diagnostics_utils.F |
150 |
DIAGNOSTICS_COUNT |
ndiag(ipt,bi,bj) = ndiag(ipt,bi,bj) + 1 |
|
./pkg/diagnostics/diagnostics_utils.F |
156 |
DIAGNOSTICS_COUNT |
ndiag(ipt,bi,bj) = ndiag(ipt,bi,bj) + 1 |