File |
Line number |
Procedure |
Code |
./pkg/diagnostics/diagnostics_calc_phivel.F |
130 |
DIAGNOSTICS_CALC_PHIVEL |
& *qtmp2(i,j,ks,bi,bj)*maskInS(i,j,bi,bj) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
14 |
DIAGNOSTICS_CALC_PHIVEL |
U qtmp1, qtmp2, |
./pkg/diagnostics/diagnostics_calc_phivel.F |
323 |
DIAGNOSTICS_CALC_PHIVEL |
qtmp2(i,j,ks,bi,bj) = psiVel(i,j,bi,bj) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
46 |
DIAGNOSTICS_CALC_PHIVEL |
_RL qtmp2(1-OLx:sNx+OLx,1-OLy:sNy+OLy,NrMax,nSx,nSy) |
./pkg/diagnostics/diagnostics_interp_vert.F |
120 |
DIAGNOSTICS_INTERP_VERT |
O qtmp2(1-OLx,1-OLy,1,bi,bj), |
./pkg/diagnostics/diagnostics_interp_vert.F |
138 |
DIAGNOSTICS_INTERP_VERT |
qtmp2(i,j,k,bi,bj) = rC(k) |
./pkg/diagnostics/diagnostics_interp_vert.F |
14 |
DIAGNOSTICS_INTERP_VERT |
O qtmp2, |
./pkg/diagnostics/diagnostics_interp_vert.F |
163 |
DIAGNOSTICS_INTERP_VERT |
pkz(i,j,k) = qtmp2(i,j,k,bi,bj)**kappa |
./pkg/diagnostics/diagnostics_interp_vert.F |
180 |
DIAGNOSTICS_INTERP_VERT |
pkz(i,j,k) = qtmp2(i,j,kLev,bi,bj)**kappa |
./pkg/diagnostics/diagnostics_interp_vert.F |
52 |
DIAGNOSTICS_INTERP_VERT |
_RL qtmp2(1-OLx:sNx+OLx,1-OLy:sNy+OLy,NrMax,nSx,nSy) |
./pkg/diagnostics/diagnostics_out.F |
316 |
DIAGNOSTICS_OUT |
O qtmp2(1-OLx,1-OLy,k,bi,bj), |
./pkg/diagnostics/diagnostics_out.F |
337 |
DIAGNOSTICS_OUT |
O qtmp2(1-OLx,1-OLy,1,bi,bj), |
./pkg/diagnostics/diagnostics_out.F |
353 |
DIAGNOSTICS_OUT |
U qtmp1, qtmp2, |
./pkg/diagnostics/diagnostics_out.F |
377 |
DIAGNOSTICS_OUT |
U qtmp1, qtmp2, |
./pkg/diagnostics/diagnostics_out.F |
412 |
DIAGNOSTICS_OUT |
I qtmp2, -nRec, myIter, myThid ) |
./pkg/diagnostics/diagnostics_out.F |
426 |
DIAGNOSTICS_OUT |
I diag_mnc_bn, qtmp2, |
./pkg/diagnostics/diagnostics_out.F |
63 |
DIAGNOSTICS_OUT |
_RL qtmp2(1-OLx:sNx+OLx,1-OLy:sNy+OLy,NrMax,nSx,nSy) |
./pkg/diagnostics/diagstats_global.F |
12 |
DIAGSTATS_GLOBAL |
O qtmp1, qtmp2, |
./pkg/diagnostics/diagstats_global.F |
132 |
DIAGSTATS_GLOBAL |
_GLOBAL_SUM_RL(qtmp2(i,k),myThid) |
./pkg/diagnostics/diagstats_global.F |
155 |
DIAGSTATS_GLOBAL |
IF ( qtmp2(0,k).GT.0. ) THEN |
./pkg/diagnostics/diagstats_global.F |
156 |
DIAGSTATS_GLOBAL |
IF ( qtmp2(0,0).LE.0. ) THEN |
./pkg/diagnostics/diagstats_global.F |
158 |
DIAGSTATS_GLOBAL |
qtmp2(i,0) = qtmp2(i,k) |
./pkg/diagnostics/diagstats_global.F |
162 |
DIAGSTATS_GLOBAL |
qtmp2(i,0) = qtmp2(i,0) + qtmp2(i,k) |
./pkg/diagnostics/diagstats_global.F |
188 |
DIAGSTATS_GLOBAL |
qtmp2(0,0) = qtmp1(0,0) |
./pkg/diagnostics/diagstats_global.F |
193 |
DIAGSTATS_GLOBAL |
IF ( qtmp2(0,kCnt).LE.0. ) THEN |
./pkg/diagnostics/diagstats_global.F |
197 |
DIAGSTATS_GLOBAL |
ELSEIF ( qtmp2(1,kCnt).LE.0. ) THEN |
./pkg/diagnostics/diagstats_global.F |
203 |
DIAGSTATS_GLOBAL |
qtmp1(i,k) = qtmp1(i,k) / qtmp2(1,kCnt) |
./pkg/diagnostics/diagstats_global.F |
43 |
DIAGSTATS_GLOBAL |
_RL qtmp2(0:nStats,0:nLev) |
./pkg/diagnostics/diagstats_global.F |
59 |
DIAGSTATS_GLOBAL |
qtmp2(i,k) = 0. |
./pkg/diagnostics/diagstats_global.F |
93 |
DIAGSTATS_GLOBAL |
IF ( qtmp2(0,k).LE.0. ) THEN |
./pkg/diagnostics/diagstats_global.F |
95 |
DIAGSTATS_GLOBAL |
qtmp2(i,k) = qSdiag(i,jReg,kd,bi,bj) |
./pkg/diagnostics/diagstats_global.F |
99 |
DIAGSTATS_GLOBAL |
qtmp2(i,k) = qtmp2(i,k) + qSdiag(i,jReg,kd,bi,bj) |