| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_calc.F |
320 |
KPP_CALC |
Ritop(i,j,k) = (zgrid(1)-zgrid(k)) * Ritop(i,j,k) |
|
./pkg/kpp/kpp_routines.F |
1160 |
BLMIX |
delhat = 0.5*hwide(kn) - zgrid(kn) - hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1223 |
BLMIX |
sig = (-zgrid(ki) + 0.5 * hwide(ki)) / hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1242 |
BLMIX |
sig = (-zgrid(ki) + 0.5 * hwide(ki)) / hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1274 |
BLMIX |
sig = -zgrid(kbl(i)-1) / hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1291 |
BLMIX |
sig = -zgrid(kbl(i)-1) / hbl(i) |
|
./pkg/kpp/kpp_routines.F |
1354 |
ENHANCE |
delta = (hbl(i) + zgrid(ki)) / (zgrid(ki) - zgrid(ki+1)) |
|
./pkg/kpp/kpp_routines.F |
338 |
BLDEPTH |
hbl(i) = -zgrid(kbl(i)) |
|
./pkg/kpp/kpp_routines.F |
350 |
BLDEPTH |
worka(i) = zgrid(kl) |
|
./pkg/kpp/kpp_routines.F |
364 |
BLDEPTH |
casea(i) = -zgrid(kl) |
|
./pkg/kpp/kpp_routines.F |
390 |
BLDEPTH |
1 ( dbloc(i,kl-1) / (zgrid(kl-1)-zgrid(kl ))+ |
|
./pkg/kpp/kpp_routines.F |
391 |
BLDEPTH |
2 dbloc(i,kl ) / (zgrid(kl )-zgrid(kl+1))) |
|
./pkg/kpp/kpp_routines.F |
396 |
BLDEPTH |
vtsq = -zgrid(kl) * ws(i) * sqrt(abs(bvsq)) * Vtc |
|
./pkg/kpp/kpp_routines.F |
439 |
BLDEPTH |
hbl(i) = -zgrid(kl-1) + (zgrid(kl-1)-zgrid(kl)) * |
|
./pkg/kpp/kpp_routines.F |
492 |
BLDEPTH |
& + (stable(i)-1.) * zgrid(Nr) |
|
./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 |
553 |
BLDEPTH |
1 sign(p5, -zgrid(kbl(i)) - p5*hwide(kbl(i)) - hbl(i)) |
|
./pkg/kpp/kpp_routines.F |
741 |
RI_IWMIX |
diffus(i,ki,1) = dblocSm(i,ki) * (zgrid(ki)-zgrid(ki+1)) |
|
./pkg/kpp/kpp_routines.F |
743 |
RI_IWMIX |
diffus(i,ki,2) = dbloc(i,ki) / (zgrid(ki)-zgrid(ki+1)) |
|
./pkg/kpp/kpp_init.F |
106 |
KPP_INIT |
zgrid(0) = phepsi |
|
./pkg/kpp/kpp_init.F |
116 |
KPP_INIT |
zgrid(k) = rC(k) |
|
./pkg/kpp/kpp_init.F |
120 |
KPP_INIT |
zgrid(Nrp1) = zgrid(Nr) * 100. |
|
./pkg/kpp/KPP_PARAMS.h |
49 |
NO PROCEDURE |
_KPP_RL zgrid ( 0:Nr+1 ) |
|
./pkg/kpp/KPP_PARAMS.h |
57 |
NO PROCEDURE |
COMMON /kpp_r1/ zgrid, hwide |