| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_routines.F |
1238 |
SMOOTH_HORIZ |
_RL tempVar |
|
./pkg/kpp/kpp_routines.F |
1253 |
SMOOTH_HORIZ |
tempVar = |
|
./pkg/kpp/kpp_routines.F |
1263 |
SMOOTH_HORIZ |
IF ( tempVar .GE. p25 ) THEN |
|
./pkg/kpp/kpp_routines.F |
1274 |
SMOOTH_HORIZ |
& / tempVar |
|
./pkg/kpp/kpp_routines.F |
1359 |
BLMIX |
_RL tempVar |
|
./pkg/kpp/kpp_routines.F |
1511 |
BLMIX |
tempVar = ws(i) * hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1512 |
BLMIX |
ghat(i,ki) = (1.-stable(i)) * cg / max(phepsi,tempVar) |
|
./pkg/kpp/kpp_routines.F |
876 |
WSCALE |
_RL wbm, was, wbs, u3, tempVar |
|
./pkg/kpp/kpp_routines.F |
925 |
WSCALE |
tempVar = u3 + conc1 * zehat |
|
./pkg/kpp/kpp_routines.F |
926 |
WSCALE |
wm(i) = vonk * ustar(i) * u3 / tempVar |
|
./pkg/seaice/cost_ice_test.F |
102 |
COST_ICE_TEST |
& tempVar * rA(i,j,bi,bj) * HEFF(i,j,bi,bj) |
|
./pkg/seaice/cost_ice_test.F |
115 |
COST_ICE_TEST |
& tempVar * rA(i,j,bi,bj) * AREA(i,j,bi,bj) |
|
./pkg/seaice/cost_ice_test.F |
149 |
COST_ICE_TEST |
& tempVar * rA(i,j,bi,bj) * ( |
|
./pkg/seaice/cost_ice_test.F |
165 |
COST_ICE_TEST |
& tempVar * rA(i,j,bi,bj) * ( |
|
./pkg/seaice/cost_ice_test.F |
180 |
COST_ICE_TEST |
& tempVar * rA(i,j,bi,bj) * ( |
|
./pkg/seaice/cost_ice_test.F |
76 |
COST_ICE_TEST |
_RL tempVar |
|
./pkg/seaice/cost_ice_test.F |
86 |
COST_ICE_TEST |
tempVar = 1. _d 0/ |
|
./pkg/thsice/thsice_cost_test.F |
108 |
THSICE_COST_TEST |
& tempVar*rA(i,j,bi,bj)*iceMask(i,j,bi,bj) |
|
./pkg/thsice/thsice_cost_test.F |
72 |
THSICE_COST_TEST |
_RL tempVar |
|
./pkg/thsice/thsice_cost_test.F |
82 |
THSICE_COST_TEST |
tempVar = 1. _d 0/ |
|
./pkg/thsice/thsice_cost_test.F |
95 |
THSICE_COST_TEST |
& tempVar*rA(i,j,bi,bj)*iceHeight(i,j,bi,bj) |
|
./pkg/ctrl/ctrl_smooth.F |
28 |
CTRL_SMOOTH |
_RL tempVar |
|
./pkg/ctrl/ctrl_smooth.F |
47 |
CTRL_SMOOTH |
tempVar = |
|
./pkg/ctrl/ctrl_smooth.F |
57 |
CTRL_SMOOTH |
IF ( tempVar .GE. p25 ) THEN |
|
./pkg/ctrl/ctrl_smooth.F |
68 |
CTRL_SMOOTH |
& / tempVar |