File |
Line number |
Procedure |
Code |
./pkg/kpp/kpp_calc.F |
182 |
KPP_CALC |
_RL worka ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy ) |
./pkg/kpp/kpp_calc.F |
629 |
KPP_CALC |
worka(i,j) = KPPhbl(i,j,bi,bj) |
./pkg/kpp/kpp_calc.F |
634 |
KPP_CALC |
U worka, |
./pkg/kpp/kpp_calc.F |
638 |
KPP_CALC |
KPPfrac(i,j,bi,bj) = worka(i,j) |
./pkg/kpp/kpp_calc.F |
650 |
KPP_CALC |
worka(i,j) = KPPhbl(i,j,bi,bj) |
./pkg/kpp/kpp_calc.F |
662 |
KPP_CALC |
U worka, |
./pkg/kpp/kpp_calc.F |
666 |
KPP_CALC |
KPPplumefrac(i,j,bi,bj) = 1. _d 0 - worka(i,j) |
./pkg/kpp/kpp_routines.F |
402 |
BLDEPTH |
_RL worka(imt) |
./pkg/kpp/kpp_routines.F |
461 |
BLDEPTH |
worka(i) = zgrid(kl) |
./pkg/kpp/kpp_routines.F |
468 |
BLDEPTH |
U worka, |
./pkg/kpp/kpp_routines.F |
482 |
BLDEPTH |
bfsfc(i) = bo(i) + bosol(i)*(1. - worka(i)) |
./pkg/kpp/kpp_routines.F |
490 |
BLDEPTH |
worka(i) = zgrid(kl) |
./pkg/kpp/kpp_routines.F |
498 |
BLDEPTH |
U worka, |
./pkg/kpp/kpp_routines.F |
501 |
BLDEPTH |
bfsfc(i) = bfsfc(i) + boplume(i,1)*(worka(i)) |
./pkg/kpp/kpp_routines.F |
629 |
BLDEPTH |
worka(i) = hbl(i) |
./pkg/kpp/kpp_routines.F |
638 |
BLDEPTH |
U worka, |
./pkg/kpp/kpp_routines.F |
647 |
BLDEPTH |
bfsfc(i) = bo(i) + bosol(i) * (1. - worka(i)) |
./pkg/kpp/kpp_routines.F |
654 |
BLDEPTH |
worka(i) = hbl(i) |
./pkg/kpp/kpp_routines.F |
661 |
BLDEPTH |
U worka, |
./pkg/kpp/kpp_routines.F |
664 |
BLDEPTH |
bfsfc(i) = bfsfc(i) + boplume(i,1) * (worka(i)) |
./pkg/kpp/kpp_routines.F |
752 |
BLDEPTH |
worka(i) = hbl(i) |
./pkg/kpp/kpp_routines.F |
761 |
BLDEPTH |
U worka, |
./pkg/kpp/kpp_routines.F |
770 |
BLDEPTH |
bfsfc(i) = bo(i) + bosol(i) * (1. - worka(i)) |
./pkg/kpp/kpp_routines.F |
777 |
BLDEPTH |
worka(i) = hbl(i) |
./pkg/kpp/kpp_routines.F |
784 |
BLDEPTH |
U worka, |
./pkg/kpp/kpp_routines.F |
787 |
BLDEPTH |
bfsfc(i) = bfsfc(i) + boplume(i,1) * (worka(i)) |