| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_routines.F |
134 |
KPPMIX |
I kmtj, shsq, dbloc, ghat |
|
./pkg/kpp/kpp_routines.F |
154 |
KPPMIX |
do k=kmtj(i),Nrp1 |
|
./pkg/kpp/kpp_routines.F |
168 |
KPPMIX |
I , kmtj |
|
./pkg/kpp/kpp_routines.F |
230 |
BLDEPTH |
I , kmtj |
|
./pkg/kpp/kpp_routines.F |
24 |
KPPMIX |
I , kmtj, shsq, dvsq, ustar |
|
./pkg/kpp/kpp_routines.F |
281 |
BLDEPTH |
integer kmtj(imt) |
|
./pkg/kpp/kpp_routines.F |
337 |
BLDEPTH |
kbl(i) = max(kmtj(i),1) |
|
./pkg/kpp/kpp_routines.F |
427 |
BLDEPTH |
if (kbl(i).eq.kmtj(i) .and. Rib(i,kl).gt.Ricr) kbl(i) = kl |
|
./pkg/kpp/kpp_routines.F |
437 |
BLDEPTH |
if (kl.gt.1 .and. kl.lt.kmtj(i)) then |
|
./pkg/kpp/kpp_routines.F |
501 |
BLDEPTH |
kbl(i) = kmtj(i) |
|
./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 |
660 |
RI_IWMIX |
I kmtj, shsq, dbloc, dblocSm |
|
./pkg/kpp/kpp_routines.F |
681 |
RI_IWMIX |
integer kmtj (imt) |
|
./pkg/kpp/kpp_routines.F |
734 |
RI_IWMIX |
if (kmtj(i) .LE. 1 ) then |
|
./pkg/kpp/kpp_routines.F |
737 |
RI_IWMIX |
elseif (ki .GE. kmtj(i)) then |
|
./pkg/kpp/kpp_routines.F |
75 |
KPPMIX |
integer kmtj (imt ) |