| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_calc.F |
202 |
KPP_CALC |
_RL hbl ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy ) |
|
./pkg/kpp/kpp_calc.F |
563 |
KPP_CALC |
O , hbl |
|
./pkg/kpp/kpp_calc.F |
587 |
KPP_CALC |
KPPhbl(i,j,bi,bj) = hbl(i,j) * maskC(i,j,k,bi,bj) |
|
./pkg/kpp/kpp_routines.F |
1296 |
BLMIX |
I ustar, bfsfc, hbl, stable, casea, diffus, kbl |
|
./pkg/kpp/kpp_routines.F |
1328 |
BLMIX |
_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
132 |
KPPMIX |
_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
1379 |
BLMIX |
I sigma, hbl, ustar, bfsfc, |
|
./pkg/kpp/kpp_routines.F |
1404 |
BLMIX |
delhat = 0.5*hwide(kn) - zgrid(kn) - hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1427 |
BLMIX |
gat1m(i) = visch / hbl(i) / wm(i) |
|
./pkg/kpp/kpp_routines.F |
1430 |
BLMIX |
gat1s(i) = difsh / hbl(i) / ws(i) |
|
./pkg/kpp/kpp_routines.F |
1433 |
BLMIX |
gat1t(i) = difth / hbl(i) / ws(i) |
|
./pkg/kpp/kpp_routines.F |
1467 |
BLMIX |
sig = (-zgrid(ki) + 0.5 * hwide(ki)) / hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1478 |
BLMIX |
I sigma, hbl, ustar, bfsfc, |
|
./pkg/kpp/kpp_routines.F |
1490 |
BLMIX |
sig = (-zgrid(ki) + 0.5 * hwide(ki)) / hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1503 |
BLMIX |
blmc(i,ki,1) = hbl(i) * wm(i) * sig * (1. + sig * Gm) |
|
./pkg/kpp/kpp_routines.F |
1504 |
BLMIX |
blmc(i,ki,2) = hbl(i) * ws(i) * sig * (1. + sig * Gs) |
|
./pkg/kpp/kpp_routines.F |
1505 |
BLMIX |
blmc(i,ki,3) = hbl(i) * ws(i) * sig * (1. + sig * Gt) |
|
./pkg/kpp/kpp_routines.F |
1511 |
BLMIX |
tempVar = ws(i) * hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1523 |
BLMIX |
sig = -zgrid(kl-1) / hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1536 |
BLMIX |
I sigma, hbl, ustar, bfsfc, |
|
./pkg/kpp/kpp_routines.F |
1545 |
BLMIX |
sig = -zgrid(kl-1) / hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1552 |
BLMIX |
dkm1(i,1) = hbl(i) * wm(i) * sig * (1. + sig * Gm) |
|
./pkg/kpp/kpp_routines.F |
1553 |
BLMIX |
dkm1(i,2) = hbl(i) * ws(i) * sig * (1. + sig * Gs) |
|
./pkg/kpp/kpp_routines.F |
1554 |
BLMIX |
dkm1(i,3) = hbl(i) * ws(i) * sig * (1. + sig * Gt) |
|
./pkg/kpp/kpp_routines.F |
1565 |
ENHANCE |
I dkm1, hbl, kbl, diffus, casea |
|
./pkg/kpp/kpp_routines.F |
1586 |
ENHANCE |
_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
1610 |
ENHANCE |
delta = (hbl(i) + zgrid(ki)) / (zgrid(ki) - zgrid(ki+1)) |
|
./pkg/kpp/kpp_routines.F |
218 |
KPPMIX |
O , hbl, bfsfc, stable, casea, kbl, Rib, sigma |
|
./pkg/kpp/kpp_routines.F |
231 |
KPPMIX |
I ustar, bfsfc, hbl, stable, casea, diffus, kbl |
|
./pkg/kpp/kpp_routines.F |
248 |
KPPMIX |
I dkm1, hbl, kbl, diffus, casea |
|
./pkg/kpp/kpp_routines.F |
306 |
BLDEPTH |
O , hbl, bfsfc, stable, casea, kbl, Rib, sigma |
|
./pkg/kpp/kpp_routines.F |
388 |
BLDEPTH |
_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
440 |
BLDEPTH |
hbl(i) = -zgrid(kl) |
|
./pkg/kpp/kpp_routines.F |
45 |
KPPMIX |
O , hbl |
|
./pkg/kpp/kpp_routines.F |
613 |
BLDEPTH |
hbl(i) = -zgrid(kl-1) + (zgrid(kl-1)-zgrid(kl)) * |
|
./pkg/kpp/kpp_routines.F |
629 |
BLDEPTH |
worka(i) = hbl(i) |
|
./pkg/kpp/kpp_routines.F |
654 |
BLDEPTH |
worka(i) = hbl(i) |
|
./pkg/kpp/kpp_routines.F |
713 |
BLDEPTH |
hbl(i) = min(hbl(i),hlimit) |
|
./pkg/kpp/kpp_routines.F |
725 |
BLDEPTH |
hbl(i) = max(hbl(i),minKPPhbl) |
|
./pkg/kpp/kpp_routines.F |
741 |
BLDEPTH |
if ( kbl(i).eq.kmtj(i) .and. (-zgrid(kl)).gt.hbl(i) ) then |
|
./pkg/kpp/kpp_routines.F |
752 |
BLDEPTH |
worka(i) = hbl(i) |
|
./pkg/kpp/kpp_routines.F |
777 |
BLDEPTH |
worka(i) = hbl(i) |
|
./pkg/kpp/kpp_routines.F |
821 |
BLDEPTH |
1 sign(p5, -zgrid(kl) - p5*hwide(kl) - hbl(i)) |
|
./pkg/kpp/kpp_routines.F |
832 |
WSCALE |
I sigma, hbl, ustar, bfsfc, |
|
./pkg/kpp/kpp_routines.F |
858 |
WSCALE |
_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
884 |
WSCALE |
zehat = vonk*sigma(i)*hbl(i)*bfsfc(i) |