| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_routines.F |
1118 |
BLMIX |
_KPP_RL ws(imt), wm(imt) |
|
./pkg/kpp/kpp_routines.F |
1140 |
BLMIX |
O wm, ws ) |
|
./pkg/kpp/kpp_routines.F |
1146 |
BLMIX |
ws(i) = sign(eins,ws(i))*max(phepsi,abs(ws(i))) |
|
./pkg/kpp/kpp_routines.F |
1186 |
BLMIX |
gat1s(i) = difsh / hbl(i) / ws(i) |
|
./pkg/kpp/kpp_routines.F |
1187 |
BLMIX |
dat1s(i) = -difsp / ws(i) + f1 * difsh |
|
./pkg/kpp/kpp_routines.F |
1189 |
BLMIX |
gat1t(i) = difth / hbl(i) / ws(i) |
|
./pkg/kpp/kpp_routines.F |
1190 |
BLMIX |
dat1t(i) = -diftp / ws(i) + f1 * difth |
|
./pkg/kpp/kpp_routines.F |
1233 |
BLMIX |
O wm, ws ) |
|
./pkg/kpp/kpp_routines.F |
1256 |
BLMIX |
blmc(i,ki,2) = hbl(i) * ws(i) * sig * (1. + sig * Gs) |
|
./pkg/kpp/kpp_routines.F |
1257 |
BLMIX |
blmc(i,ki,3) = hbl(i) * ws(i) * sig * (1. + sig * Gt) |
|
./pkg/kpp/kpp_routines.F |
1263 |
BLMIX |
tempVar = ws(i) * hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1286 |
BLMIX |
O wm, ws ) |
|
./pkg/kpp/kpp_routines.F |
1299 |
BLMIX |
dkm1(i,2) = hbl(i) * ws(i) * sig * (1. + sig * Gs) |
|
./pkg/kpp/kpp_routines.F |
1300 |
BLMIX |
dkm1(i,3) = hbl(i) * ws(i) * sig * (1. + sig * Gt) |
|
./pkg/kpp/kpp_routines.F |
313 |
BLDEPTH |
_KPP_RL wm(imt), ws(imt) |
|
./pkg/kpp/kpp_routines.F |
380 |
BLDEPTH |
O wm, ws ) |
|
./pkg/kpp/kpp_routines.F |
396 |
BLDEPTH |
vtsq = -zgrid(kl) * ws(i) * sqrt(abs(bvsq)) * Vtc |
|
./pkg/kpp/kpp_routines.F |
565 |
WSCALE |
O wm, ws ) |
|
./pkg/kpp/kpp_routines.F |
594 |
WSCALE |
_KPP_RL wm(imt), ws(imt) |
|
./pkg/kpp/kpp_routines.F |
639 |
WSCALE |
ws(i) = (1.-ufrac) * wbs + ufrac * was |
|
./pkg/kpp/kpp_routines.F |
646 |
WSCALE |
ws(i) = wm(i) |