| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/KPP_PARAMS.h |
17 |
NO PROCEDURE |
integer mdiff, Nrm1, Nrp1, Nrp2 |
|
./pkg/kpp/KPP_PARAMS.h |
21 |
NO PROCEDURE |
parameter( Nrp1 = Nr+1 ) |
|
./pkg/kpp/kpp_calc.F |
190 |
KPP_CALC |
_RL boplume ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nrp1 ) |
|
./pkg/kpp/kpp_calc.F |
200 |
KPP_CALC |
_RL vddiff( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, 0:Nrp1, mdiff ) |
|
./pkg/kpp/kpp_calc.F |
204 |
KPP_CALC |
_RL TTALPHA( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nrp1 ) |
|
./pkg/kpp/kpp_calc.F |
205 |
KPP_CALC |
_RL SSBETA ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nrp1 ) |
|
./pkg/kpp/kpp_forcing_surf.F |
111 |
KPP_FORCING_SURF |
_RL TTALPHA (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrp1) |
|
./pkg/kpp/kpp_forcing_surf.F |
112 |
KPP_FORCING_SURF |
_RL SSBETA (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrp1) |
|
./pkg/kpp/kpp_forcing_surf.F |
120 |
KPP_FORCING_SURF |
_RL boplume (1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nrp1 ) |
|
./pkg/kpp/kpp_forcing_surf.F |
174 |
KPP_FORCING_SURF |
boplume(I,J,Nrp1) = p0 |
|
./pkg/kpp/kpp_forcing_surf.F |
243 |
KPP_FORCING_SURF |
DO k = 2, Nrp1 |
|
./pkg/kpp/kpp_init_fixed.F |
182 |
KPP_INIT_FIXED |
zgrid(Nrp1) = zgrid(Nr) * 100. |
|
./pkg/kpp/kpp_init_fixed.F |
184 |
KPP_INIT_FIXED |
hwide(Nrp1) = phepsi |
|
./pkg/kpp/kpp_routines.F |
107 |
KPPMIX |
_RL boplume (imt,Nrp1) |
|
./pkg/kpp/kpp_routines.F |
1145 |
Z121 |
_RL v(imt,0:Nrp1) |
|
./pkg/kpp/kpp_routines.F |
1151 |
Z121 |
_RL KRi_range(1:Nrp1) |
|
./pkg/kpp/kpp_routines.F |
1157 |
Z121 |
KRi_range(Nrp1) = p0 |
|
./pkg/kpp/kpp_routines.F |
1173 |
Z121 |
v(i,Nrp1) = v(i,Nr) |
|
./pkg/kpp/kpp_routines.F |
130 |
KPPMIX |
_RL diffus(imt,0:Nrp1,mdiff) |
|
./pkg/kpp/kpp_routines.F |
1331 |
BLMIX |
_RL diffus(imt,0:Nrp1,mdiff) |
|
./pkg/kpp/kpp_routines.F |
1588 |
ENHANCE |
_RL diffus(imt,0:Nrp1,mdiff) |
|
./pkg/kpp/kpp_routines.F |
1677 |
STATEKPP |
_RL TTALPHA( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nrp1 ) |
|
./pkg/kpp/kpp_routines.F |
1678 |
STATEKPP |
_RL SSBETA ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nrp1 ) |
|
./pkg/kpp/kpp_routines.F |
1816 |
STATEKPP |
TTALPHA(I,J,Nrp1) = TTALPHA(I,J,Nr) |
|
./pkg/kpp/kpp_routines.F |
1817 |
STATEKPP |
SSBETA(I,J,Nrp1) = SSBETA(I,J,Nr) |
|
./pkg/kpp/kpp_routines.F |
1879 |
KPP_DOUBLEDIFF |
_RL TTALPHA( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nrp1 ) |
|
./pkg/kpp/kpp_routines.F |
1880 |
KPP_DOUBLEDIFF |
_RL SSBETA ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, Nrp1 ) |
|
./pkg/kpp/kpp_routines.F |
194 |
KPPMIX |
do k=1,Nrp1 |
|
./pkg/kpp/kpp_routines.F |
371 |
BLDEPTH |
_RL boplume (imt,Nrp1) |
|
./pkg/kpp/kpp_routines.F |
986 |
RI_IWMIX |
_RL diffus(imt,0:Nrp1,3) |
|
./pkg/salt_plume/salt_plume_apply.F |
149 |
SALT_PLUME_APPLY |
Nrp1=Nr+1 |
|
./pkg/salt_plume/salt_plume_apply.F |
160 |
SALT_PLUME_APPLY |
work(i,j,Nrp1) = 0. _d 0 |
|
./pkg/salt_plume/salt_plume_apply.F |
76 |
SALT_PLUME_APPLY |
integer kp1, Nrp1 |
|
./pkg/salt_plume/salt_plume_init_varia.F |
28 |
SALT_PLUME_INIT_VARIA |
INTEGER i,j, bi,bj,Nrp1 |
|
./pkg/salt_plume/salt_plume_init_varia.F |
33 |
SALT_PLUME_INIT_VARIA |
Nrp1=Nr+1 |
|
./pkg/salt_plume/salt_plume_init_varia.F |
53 |
SALT_PLUME_INIT_VARIA |
dSPvolkLev2Above (i,j,Nrp1,bi,bj) = 0. _d 0 |
|
./pkg/salt_plume/salt_plume_init_varia.F |
54 |
SALT_PLUME_INIT_VARIA |
SPplumek (i,j,Nrp1,bi,bj) = 1. _d 0 |
|
./pkg/salt_plume/salt_plume_volfrac.F |
68 |
SALT_PLUME_VOLFRAC |
INTEGER i,j,k,kp1,Nlev,Nrp1 |
|
./pkg/salt_plume/salt_plume_volfrac.F |
73 |
SALT_PLUME_VOLFRAC |
Nrp1=Nr+1 |
|
./pkg/salt_plume/salt_plume_volfrac.F |
85 |
SALT_PLUME_VOLFRAC |
SPplumek(i,j,Nrp1,bi,bj) = 1. _d 0 |
|
./pkg/salt_plume/salt_plume_volfrac.F |
93 |
SALT_PLUME_VOLFRAC |
DO k = Nrp1,1,-1 |