| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_calc.F |
184 |
KPP_CALC |
_KPP_RL hbl ( ibot:itop , jbot:jtop ) |
|
./pkg/kpp/kpp_calc.F |
659 |
KPP_CALC |
O , hbl ) |
|
./pkg/kpp/kpp_calc.F |
675 |
KPP_CALC |
KPPhbl(i,j,bi,bj) = hbl(i,j) * maskC(i,j,1,bi,bj) |
|
./pkg/kpp/kpp_routines.F |
1066 |
BLMIX |
I ustar, bfsfc, hbl, stable, casea, diffus, kbl |
|
./pkg/kpp/kpp_routines.F |
1093 |
BLMIX |
_KPP_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
1139 |
BLMIX |
I sigma, hbl, ustar, bfsfc, |
|
./pkg/kpp/kpp_routines.F |
1160 |
BLMIX |
delhat = 0.5*hwide(kn) - zgrid(kn) - hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1183 |
BLMIX |
gat1m(i) = visch / hbl(i) / wm(i) |
|
./pkg/kpp/kpp_routines.F |
1186 |
BLMIX |
gat1s(i) = difsh / hbl(i) / ws(i) |
|
./pkg/kpp/kpp_routines.F |
1189 |
BLMIX |
gat1t(i) = difth / hbl(i) / ws(i) |
|
./pkg/kpp/kpp_routines.F |
1223 |
BLMIX |
sig = (-zgrid(ki) + 0.5 * hwide(ki)) / hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1232 |
BLMIX |
I sigma, hbl, ustar, bfsfc, |
|
./pkg/kpp/kpp_routines.F |
1242 |
BLMIX |
sig = (-zgrid(ki) + 0.5 * hwide(ki)) / hbl(i) |
|
./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 |
1263 |
BLMIX |
tempVar = ws(i) * hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1274 |
BLMIX |
sig = -zgrid(kbl(i)-1) / hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1285 |
BLMIX |
I sigma, hbl, ustar, bfsfc, |
|
./pkg/kpp/kpp_routines.F |
1291 |
BLMIX |
sig = -zgrid(kbl(i)-1) / hbl(i) |
|
./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) |
|
./pkg/kpp/kpp_routines.F |
1311 |
ENHANCE |
I dkm1, hbl, kbl, diffus, casea |
|
./pkg/kpp/kpp_routines.F |
1330 |
ENHANCE |
_KPP_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
1354 |
ENHANCE |
delta = (hbl(i) + zgrid(ki)) / (zgrid(ki) - zgrid(ki+1)) |
|
./pkg/kpp/kpp_routines.F |
171 |
KPPMIX |
O , hbl, bfsfc, stable, casea, kbl, Rib, sigma |
|
./pkg/kpp/kpp_routines.F |
181 |
KPPMIX |
I ustar, bfsfc, hbl, stable, casea, diffus, kbl |
|
./pkg/kpp/kpp_routines.F |
194 |
KPPMIX |
I dkm1, hbl, kbl, diffus, casea |
|
./pkg/kpp/kpp_routines.F |
233 |
BLDEPTH |
O , hbl, bfsfc, stable, casea, kbl, Rib, sigma |
|
./pkg/kpp/kpp_routines.F |
29 |
KPPMIX |
O , hbl ) |
|
./pkg/kpp/kpp_routines.F |
300 |
BLDEPTH |
_KPP_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
338 |
BLDEPTH |
hbl(i) = -zgrid(kbl(i)) |
|
./pkg/kpp/kpp_routines.F |
439 |
BLDEPTH |
hbl(i) = -zgrid(kl-1) + (zgrid(kl-1)-zgrid(kl)) * |
|
./pkg/kpp/kpp_routines.F |
452 |
BLDEPTH |
worka(i) = hbl(i) |
|
./pkg/kpp/kpp_routines.F |
493 |
BLDEPTH |
hbl(i) = min(hbl(i),hlimit) |
|
./pkg/kpp/kpp_routines.F |
500 |
BLDEPTH |
hbl(i) = max(hbl(i),minKPPhbl) |
|
./pkg/kpp/kpp_routines.F |
513 |
BLDEPTH |
if ( kbl(i).eq.kmtj(i) .and. (-zgrid(kl)).gt.hbl(i) ) then |
|
./pkg/kpp/kpp_routines.F |
524 |
BLDEPTH |
worka(i) = hbl(i) |
|
./pkg/kpp/kpp_routines.F |
553 |
BLDEPTH |
1 sign(p5, -zgrid(kbl(i)) - p5*hwide(kbl(i)) - hbl(i)) |
|
./pkg/kpp/kpp_routines.F |
564 |
WSCALE |
I sigma, hbl, ustar, bfsfc, |
|
./pkg/kpp/kpp_routines.F |
587 |
WSCALE |
_KPP_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
613 |
WSCALE |
zehat = vonk*sigma(i)*hbl(i)*bfsfc(i) |
|
./pkg/kpp/kpp_routines.F |
96 |
KPPMIX |
_KPP_RL hbl (imt) |