| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_routines.F |
1211 |
BLMIX |
integer i, kn, ki |
|
./pkg/kpp/kpp_routines.F |
1248 |
BLMIX |
kn = int(caseA(i)+phepsi) *(kbl(i) -1) + |
|
./pkg/kpp/kpp_routines.F |
1255 |
BLMIX |
delhat = 0.5*hwide(kn) - zgrid(kn) - hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1256 |
BLMIX |
R = 1.0 - delhat / hwide(kn) |
|
./pkg/kpp/kpp_routines.F |
1257 |
BLMIX |
dvdzup = (diffus(i,kn-1,1) - diffus(i,kn ,1)) / hwide(kn) |
|
./pkg/kpp/kpp_routines.F |
1258 |
BLMIX |
dvdzdn = (diffus(i,kn ,1) - diffus(i,kn+1,1)) / hwide(kn+1) |
|
./pkg/kpp/kpp_routines.F |
1262 |
BLMIX |
dvdzup = (diffus(i,kn-1,2) - diffus(i,kn ,2)) / hwide(kn) |
|
./pkg/kpp/kpp_routines.F |
1263 |
BLMIX |
dvdzdn = (diffus(i,kn ,2) - diffus(i,kn+1,2)) / hwide(kn+1) |
|
./pkg/kpp/kpp_routines.F |
1267 |
BLMIX |
dvdzup = (diffus(i,kn-1,3) - diffus(i,kn ,3)) / hwide(kn) |
|
./pkg/kpp/kpp_routines.F |
1268 |
BLMIX |
dvdzdn = (diffus(i,kn ,3) - diffus(i,kn+1,3)) / hwide(kn+1) |
|
./pkg/kpp/kpp_routines.F |
1272 |
BLMIX |
visch = diffus(i,kn,1) + viscp * delhat |
|
./pkg/kpp/kpp_routines.F |
1273 |
BLMIX |
difsh = diffus(i,kn,2) + difsp * delhat |
|
./pkg/kpp/kpp_routines.F |
1274 |
BLMIX |
difth = diffus(i,kn,3) + diftp * delhat |