| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_routines.F |
1095 |
SMOOTH_HORIZ |
_RL tempVar |
|
./pkg/kpp/kpp_routines.F |
1110 |
SMOOTH_HORIZ |
tempVar = |
|
./pkg/kpp/kpp_routines.F |
1120 |
SMOOTH_HORIZ |
IF ( tempVar .GE. p25 ) THEN |
|
./pkg/kpp/kpp_routines.F |
1131 |
SMOOTH_HORIZ |
& / tempVar |
|
./pkg/kpp/kpp_routines.F |
1216 |
BLMIX |
_RL tempVar |
|
./pkg/kpp/kpp_routines.F |
1358 |
BLMIX |
tempVar = ws(i) * hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1359 |
BLMIX |
ghat(i,ki) = (1.-stable(i)) * cg / max(phepsi,tempVar) |
|
./pkg/kpp/kpp_routines.F |
754 |
WSCALE |
_RL wbm, was, wbs, u3, tempVar |
|
./pkg/kpp/kpp_routines.F |
793 |
WSCALE |
tempVar = u3 + conc1 * zehat |
|
./pkg/kpp/kpp_routines.F |
794 |
WSCALE |
wm(i) = vonk * ustar(i) * u3 / tempVar |
|
./pkg/seaice/cost_ice_test.F |
101 |
COST_ICE_TEST |
& tempVar * rA(i,j,bi,bj) * HEFF(i,j,bi,bj) |
|
./pkg/seaice/cost_ice_test.F |
114 |
COST_ICE_TEST |
& tempVar * rA(i,j,bi,bj) * AREA(i,j,bi,bj) |
|
./pkg/seaice/cost_ice_test.F |
148 |
COST_ICE_TEST |
& tempVar * rA(i,j,bi,bj) * ( |
|
./pkg/seaice/cost_ice_test.F |
164 |
COST_ICE_TEST |
& tempVar * rA(i,j,bi,bj) * ( |
|
./pkg/seaice/cost_ice_test.F |
179 |
COST_ICE_TEST |
& tempVar * rA(i,j,bi,bj) * ( |
|
./pkg/seaice/cost_ice_test.F |
75 |
COST_ICE_TEST |
_RL tempVar |
|
./pkg/seaice/cost_ice_test.F |
85 |
COST_ICE_TEST |
tempVar = 1. _d 0/ |
|
./pkg/ctrl/ctrl_smooth.F |
29 |
CTRL_SMOOTH |
_RL tempVar |
|
./pkg/ctrl/ctrl_smooth.F |
50 |
CTRL_SMOOTH |
tempVar = |
|
./pkg/ctrl/ctrl_smooth.F |
60 |
CTRL_SMOOTH |
IF ( tempVar .GE. p25 ) THEN |
|
./pkg/ctrl/ctrl_smooth.F |
71 |
CTRL_SMOOTH |
& / tempVar |