| File |
Line number |
Procedure |
Code |
|
./pkg/layers/layers_fluxcalc.F |
108 |
LAYERS_FLUXCALC |
INTEGER i,j,k,kk,kg,kci,kp1,kloc |
|
./pkg/layers/layers_fluxcalc.F |
215 |
LAYERS_FLUXCALC |
kloc = kgu(i,j) |
|
./pkg/layers/layers_fluxcalc.F |
219 |
LAYERS_FLUXCALC |
UH(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
220 |
LAYERS_FLUXCALC |
& UH(i,j,kloc,bi,bj) + |
|
./pkg/layers/layers_fluxcalc.F |
240 |
LAYERS_FLUXCALC |
UH(i,j,kloc,bi,bj) = UH(i,j,kloc,bi,bj) |
|
./pkg/layers/layers_fluxcalc.F |
247 |
LAYERS_FLUXCALC |
Hw(i,j,kloc,bi,bj) = Hw(i,j,kloc,bi,bj) + dzfac |
|
./pkg/layers/layers_fluxcalc.F |
295 |
LAYERS_FLUXCALC |
kloc = kgv(i,j) |
|
./pkg/layers/layers_fluxcalc.F |
309 |
LAYERS_FLUXCALC |
VH(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
310 |
LAYERS_FLUXCALC |
& VH(i,j,kloc,bi,bj) + dzfac * vVel(i,j,kci,bi,bj) |
|
./pkg/layers/layers_fluxcalc.F |
329 |
LAYERS_FLUXCALC |
VH(i,j,kloc,bi,bj) = VH(i,j,kloc,bi,bj) |
|
./pkg/layers/layers_fluxcalc.F |
336 |
LAYERS_FLUXCALC |
Hs(i,j,kloc,bi,bj) = Hs(i,j,kloc,bi,bj) + dzfac |
|
./pkg/layers/layers_fluxcalc.F |
454 |
LAYERS_DIAPYCNAL |
INTEGER i,j,k,kk,kg,kci,kloc |
|
./pkg/layers/layers_fluxcalc.F |
617 |
LAYERS_DIAPYCNAL |
kloc = kgcw(i,j) |
|
./pkg/layers/layers_fluxcalc.F |
620 |
LAYERS_DIAPYCNAL |
Hcw(i,j,kloc,bi,bj) = Hcw(i,j,kloc,bi,bj) |
|
./pkg/layers/layers_fluxcalc.F |
627 |
LAYERS_DIAPYCNAL |
dzfac = dzfac * layers_recip_delta(kloc,iLa) |
|
./pkg/layers/layers_fluxcalc.F |
635 |
LAYERS_DIAPYCNAL |
TtendSurf(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
636 |
LAYERS_DIAPYCNAL |
& TtendSurf(i,j,kloc,bi,bj) + |
|
./pkg/layers/layers_fluxcalc.F |
638 |
LAYERS_DIAPYCNAL |
StendSurf(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
639 |
LAYERS_DIAPYCNAL |
& StendSurf(i,j,kloc,bi,bj) + |
|
./pkg/layers/layers_fluxcalc.F |
644 |
LAYERS_DIAPYCNAL |
TtendSurf(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
645 |
LAYERS_DIAPYCNAL |
& TtendSurf(i,j,kloc,bi,bj) + |
|
./pkg/layers/layers_fluxcalc.F |
650 |
LAYERS_DIAPYCNAL |
TtendDiffh(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
651 |
LAYERS_DIAPYCNAL |
& TtendDiffh(i,j,kloc,bi,bj) + dzfac * Tfac * |
|
./pkg/layers/layers_fluxcalc.F |
654 |
LAYERS_DIAPYCNAL |
TtendDiffr(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
655 |
LAYERS_DIAPYCNAL |
& TtendDiffr(i,j,kloc,bi,bj) + |
|
./pkg/layers/layers_fluxcalc.F |
657 |
LAYERS_DIAPYCNAL |
StendDiffh(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
658 |
LAYERS_DIAPYCNAL |
& StendDiffh(i,j,kloc,bi,bj) + dzfac * Sfac * |
|
./pkg/layers/layers_fluxcalc.F |
661 |
LAYERS_DIAPYCNAL |
StendDiffr(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
662 |
LAYERS_DIAPYCNAL |
& StendDiffr(i,j,kloc,bi,bj) + |
|
./pkg/layers/layers_fluxcalc.F |
665 |
LAYERS_DIAPYCNAL |
TtendAdvh(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
666 |
LAYERS_DIAPYCNAL |
& TtendAdvh(i,j,kloc,bi,bj) + dzfac * Tfac * |
|
./pkg/layers/layers_fluxcalc.F |
669 |
LAYERS_DIAPYCNAL |
TtendAdvr(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
670 |
LAYERS_DIAPYCNAL |
& TtendAdvr(i,j,kloc,bi,bj) + |
|
./pkg/layers/layers_fluxcalc.F |
672 |
LAYERS_DIAPYCNAL |
StendAdvh(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
673 |
LAYERS_DIAPYCNAL |
& StendAdvh(i,j,kloc,bi,bj) + dzfac * Sfac * |
|
./pkg/layers/layers_fluxcalc.F |
676 |
LAYERS_DIAPYCNAL |
StendAdvr(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
677 |
LAYERS_DIAPYCNAL |
& StendAdvr(i,j,kloc,bi,bj) + |
|
./pkg/layers/layers_fluxcalc.F |
680 |
LAYERS_DIAPYCNAL |
Ttendtot(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
681 |
LAYERS_DIAPYCNAL |
& Ttendtot(i,j,kloc,bi,bj) + |
|
./pkg/layers/layers_fluxcalc.F |
683 |
LAYERS_DIAPYCNAL |
Stendtot(i,j,kloc,bi,bj) = |
|
./pkg/layers/layers_fluxcalc.F |
684 |
LAYERS_DIAPYCNAL |
& Stendtot(i,j,kloc,bi,bj) + |