| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/KPP_PARAMS.h |
39 |
NO PROCEDURE |
INTEGER nzmax ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, nSx, nSy ) |
|
./pkg/kpp/KPP_PARAMS.h |
47 |
NO PROCEDURE |
COMMON /kpp_i/ nzmax |
|
./pkg/kpp/kpp_calc.F |
328 |
KPP_CALC |
if(k.eq.nzmax(i,j,bi,bj)) then |
|
./pkg/kpp/kpp_calc.F |
501 |
KPP_CALC |
work1(i,j) = nzmax(i,j,bi,bj) |
|
./pkg/kpp/kpp_forcing_surf.F |
276 |
KPP_FORCING_SURF |
work1(i,j) = nzmax(i,j,bi,bj) |
|
./pkg/kpp/kpp_forcing_surf.F |
278 |
KPP_FORCING_SURF |
IF ( k .LT. nzmax(i,j,bi,bj) .AND. |
|
./pkg/kpp/kpp_forcing_surf.F |
286 |
KPP_FORCING_SURF |
IF ( k .EQ. 0 .OR. nzmax(i,j,bi,bj) .EQ. 1 ) THEN |
|
./pkg/kpp/kpp_forcing_surf.F |
291 |
KPP_FORCING_SURF |
ELSEIF ( k .LT. nzmax(i,j,bi,bj) ) THEN |
|
./pkg/kpp/kpp_init_varia.F |
45 |
KPP_INIT_VARIA |
nzmax(i,j,bi,bj) = kLowC(I,J,bi,bj) |