| File |
Line number |
Procedure |
Code |
|
./pkg/shelfice/shelfice_cost_accumulate.F |
31 |
SHELFICE_COST_ACCUMULATE |
_RL drLoc |
|
./pkg/shelfice/shelfice_forcing.F |
158 |
SHELFICE_FORCING_S |
_RS drLoc |
|
./pkg/shelfice/shelfice_forcing.F |
168 |
SHELFICE_FORCING_S |
drLoc = drF(kLev)*( 1. _d 0 - _hFacC(I,J,kLev,bi,bj) ) |
|
./pkg/shelfice/shelfice_forcing.F |
169 |
SHELFICE_FORCING_S |
drLoc = MIN( drLoc, drF(Kp1) * _hFacC(I,J,Kp1,bi,bj) ) |
|
./pkg/shelfice/shelfice_forcing.F |
170 |
SHELFICE_FORCING_S |
drLoc = MAX( drLoc, 0. _d 0) |
|
./pkg/shelfice/shelfice_forcing.F |
172 |
SHELFICE_FORCING_S |
& /( drF(kLev)*_hFacC(I,J,kLev,bi,bj)+drLoc ) |
|
./pkg/shelfice/shelfice_forcing.F |
176 |
SHELFICE_FORCING_S |
drLoc = drF(km1)*( 1. _d 0 - _hFacC(I,J,km1,bi,bj) ) |
|
./pkg/shelfice/shelfice_forcing.F |
177 |
SHELFICE_FORCING_S |
drLoc = MIN( drLoc, drF(kLev) * _hFacC(I,J,kLev,bi,bj) ) |
|
./pkg/shelfice/shelfice_forcing.F |
178 |
SHELFICE_FORCING_S |
drLoc = MAX( drLoc, 0. _d 0) |
|
./pkg/shelfice/shelfice_forcing.F |
180 |
SHELFICE_FORCING_S |
& /( drF(km1)*_hFacC(I,J,km1,bi,bj)+drLoc ) |
|
./pkg/shelfice/shelfice_forcing.F |
186 |
SHELFICE_FORCING_S |
& * drLoc*recip_drF(kLev)* _recip_hFacC(i,j,kLev,bi,bj) |
|
./pkg/shelfice/shelfice_forcing.F |
66 |
SHELFICE_FORCING_T |
_RS drLoc |
|
./pkg/shelfice/shelfice_forcing.F |
76 |
SHELFICE_FORCING_T |
drLoc = drF(kLev)*( 1. _d 0 - _hFacC(I,J,kLev,bi,bj) ) |
|
./pkg/shelfice/shelfice_forcing.F |
77 |
SHELFICE_FORCING_T |
drLoc = MIN( drLoc, drF(Kp1) * _hFacC(I,J,Kp1,bi,bj) ) |
|
./pkg/shelfice/shelfice_forcing.F |
78 |
SHELFICE_FORCING_T |
drLoc = MAX( drLoc, 0. _d 0) |
|
./pkg/shelfice/shelfice_forcing.F |
80 |
SHELFICE_FORCING_T |
& /( drF(kLev)*_hFacC(I,J,kLev,bi,bj)+drLoc ) |
|
./pkg/shelfice/shelfice_forcing.F |
84 |
SHELFICE_FORCING_T |
drLoc = drF(km1)*( 1. _d 0 - _hFacC(I,J,km1,bi,bj) ) |
|
./pkg/shelfice/shelfice_forcing.F |
85 |
SHELFICE_FORCING_T |
drLoc = MIN( drLoc, drF(kLev) * _hFacC(I,J,kLev,bi,bj) ) |
|
./pkg/shelfice/shelfice_forcing.F |
86 |
SHELFICE_FORCING_T |
drLoc = MAX( drLoc, 0. _d 0) |
|
./pkg/shelfice/shelfice_forcing.F |
88 |
SHELFICE_FORCING_T |
& /( drF(km1)*_hFacC(I,J,km1,bi,bj)+drLoc ) |
|
./pkg/shelfice/shelfice_forcing.F |
94 |
SHELFICE_FORCING_T |
& * drLoc*recip_drF(kLev)* _recip_hFacC(i,j,kLev,bi,bj) |
|
./pkg/diagnostics/diagstats_local.F |
122 |
DIAGSTATS_LOCAL |
drLoc = drF(k) |
|
./pkg/diagnostics/diagstats_local.F |
123 |
DIAGSTATS_LOCAL |
IF ( parsFld(9:9).EQ.'L') drLoc = drC(k) |
|
./pkg/diagnostics/diagstats_local.F |
124 |
DIAGSTATS_LOCAL |
IF ( parsFld(9:9).EQ.'U') drLoc = drC(MIN(k+1,Nr)) |
|
./pkg/diagnostics/diagstats_local.F |
137 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
149 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
160 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
193 |
DIAGSTATS_LOCAL |
drLoc = 1. _d 0 |
|
./pkg/diagnostics/diagstats_local.F |
204 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
215 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
226 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
92 |
DIAGSTATS_LOCAL |
_RL drLoc |
|
./pkg/diagnostics/diagstats_others_calc.F |
109 |
DIAGSTATS_LM_CALC |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_others_calc.F |
123 |
DIAGSTATS_LM_CALC |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_others_calc.F |
209 |
DIAGSTATS_G_CALC |
_RL drLoc |
|
./pkg/diagnostics/diagstats_others_calc.F |
215 |
DIAGSTATS_G_CALC |
drLoc = land_dzF(kl) |
|
./pkg/diagnostics/diagstats_others_calc.F |
217 |
DIAGSTATS_G_CALC |
drLoc = 1. _d 0 |
|
./pkg/diagnostics/diagstats_others_calc.F |
228 |
DIAGSTATS_G_CALC |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_others_calc.F |
84 |
DIAGSTATS_LM_CALC |
_RL drLoc |
|
./pkg/diagnostics/diagstats_others_calc.F |
99 |
DIAGSTATS_LM_CALC |
drLoc = 1. _d 0 |