File |
Line number |
Procedure |
Code |
./pkg/diagnostics/diagnostics_interp_vert.F |
113 |
DIAGNOSTICS_INTERP_VERT |
tmpLev = 1. _d 0 |
./pkg/diagnostics/diagnostics_interp_vert.F |
114 |
DIAGNOSTICS_INTERP_VERT |
CALL GETDIAG( tmpLev,undef, |
./pkg/diagnostics/diagnostics_interp_vert.F |
119 |
DIAGNOSTICS_INTERP_VERT |
tmpLev = k |
./pkg/diagnostics/diagnostics_interp_vert.F |
120 |
DIAGNOSTICS_INTERP_VERT |
CALL GETDIAG(tmpLev,undef, |
./pkg/diagnostics/diagnostics_interp_vert.F |
72 |
DIAGNOSTICS_INTERP_VERT |
_RL pk, pkTop, tmpLev |
./pkg/diagnostics/diagnostics_out.F |
145 |
DIAGNOSTICS_OUT |
tmpLev = FLOAT(i) |
./pkg/diagnostics/diagnostics_out.F |
146 |
DIAGNOSTICS_OUT |
IF ( timeRec(1).NE.tmpLev ) i = i - 1 |
./pkg/diagnostics/diagnostics_out.F |
156 |
DIAGNOSTICS_OUT |
tmpLev = FLOAT(i) - 0.5 _d 0 |
./pkg/diagnostics/diagnostics_out.F |
157 |
DIAGNOSTICS_OUT |
IF ( timeRec(1).EQ.tmpLev ) i = i - 1 |
./pkg/diagnostics/diagnostics_out.F |
209 |
DIAGNOSTICS_OUT |
tmpLev = myTime + deltaTClock*(jj -jjMx) |
./pkg/diagnostics/diagnostics_out.F |
211 |
DIAGNOSTICS_OUT |
CALL MNC_CW_RL_W_S('D',diag_mnc_bn,0,0,'T',tmpLev,myThid) |
./pkg/diagnostics/diagnostics_out.F |
409 |
DIAGNOSTICS_OUT |
tmpLev = k |
./pkg/diagnostics/diagnostics_out.F |
411 |
DIAGNOSTICS_OUT |
I tmpLev,undef, |
./pkg/diagnostics/diagnostics_out.F |
73 |
DIAGNOSTICS_OUT |
_RL tmpLev |