File |
Line number |
Procedure |
Code |
./pkg/kpp/KPP_PARAMS.h |
158 |
NO PROCEDURE |
_RL wmt(0:nni+1,0:nnj+1), wst(0:nni+1,0:nnj+1) |
./pkg/kpp/KPP_PARAMS.h |
160 |
NO PROCEDURE |
common /kmixcws/ wmt, wst, |
./pkg/kpp/kpp_init_fixed.F |
144 |
KPP_INIT_FIXED |
wmt(i,j) = vonk*usta/(1. + conc1*zeta) |
./pkg/kpp/kpp_init_fixed.F |
145 |
KPP_INIT_FIXED |
wst(i,j) = wmt(i,j) |
./pkg/kpp/kpp_init_fixed.F |
148 |
KPP_INIT_FIXED |
wmt(i,j) = vonk*usta*(1. - conc2*zeta)**p25 |
./pkg/kpp/kpp_init_fixed.F |
150 |
KPP_INIT_FIXED |
wmt(i,j) = vonk*(conam*usta**3 - concm*zehat)**p33 |
./pkg/kpp/kpp_routines.F |
914 |
WSCALE |
wam = fzfrac * wmt(iz,jup1) + zfrac * wmt(izp1,jup1) |
./pkg/kpp/kpp_routines.F |
915 |
WSCALE |
wbm = fzfrac * wmt(iz,ju ) + zfrac * wmt(izp1,ju ) |