File |
Line number |
Procedure |
Code |
./pkg/kpp/kpp_routines.F |
1122 |
BLMIX |
_KPP_RL f1, sig, a1, a2, a3, delhat |
./pkg/kpp/kpp_routines.F |
1223 |
BLMIX |
sig = (-zgrid(ki) + 0.5 * hwide(ki)) / hbl(i) |
./pkg/kpp/kpp_routines.F |
1224 |
BLMIX |
sigma(i) = stable(i)*sig + (1.-stable(i))*min(sig,epsilon) |
./pkg/kpp/kpp_routines.F |
1242 |
BLMIX |
sig = (-zgrid(ki) + 0.5 * hwide(ki)) / hbl(i) |
./pkg/kpp/kpp_routines.F |
1243 |
BLMIX |
a1 = sig - 2. |
./pkg/kpp/kpp_routines.F |
1244 |
BLMIX |
a2 = 3. - 2. * sig |
./pkg/kpp/kpp_routines.F |
1245 |
BLMIX |
a3 = sig - 1. |
./pkg/kpp/kpp_routines.F |
1255 |
BLMIX |
blmc(i,ki,1) = hbl(i) * wm(i) * sig * (1. + sig * Gm) |
./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 |
1274 |
BLMIX |
sig = -zgrid(kbl(i)-1) / hbl(i) |
./pkg/kpp/kpp_routines.F |
1275 |
BLMIX |
sigma(i) = stable(i) * sig |
./pkg/kpp/kpp_routines.F |
1276 |
BLMIX |
& + (1. - stable(i)) * min(sig,epsilon) |
./pkg/kpp/kpp_routines.F |
1291 |
BLMIX |
sig = -zgrid(kbl(i)-1) / hbl(i) |
./pkg/kpp/kpp_routines.F |
1292 |
BLMIX |
a1 = sig - 2. |
./pkg/kpp/kpp_routines.F |
1293 |
BLMIX |
a2 = 3. - 2. * sig |
./pkg/kpp/kpp_routines.F |
1294 |
BLMIX |
a3 = sig - 1. |
./pkg/kpp/kpp_routines.F |
1298 |
BLMIX |
dkm1(i,1) = hbl(i) * wm(i) * sig * (1. + sig * Gm) |
./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) |