| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/kpp_calc.F |
150 |
KPP_CALC |
_RL p0 , p5 , p25 , p125 , p0625 |
|
./pkg/kpp/kpp_calc.F |
151 |
KPP_CALC |
parameter( p0=0.0, p5=0.5, p25=0.25, p125=0.125, p0625=0.0625 ) |
|
./pkg/kpp/kpp_init_fixed.F |
121 |
KPP_INIT_FIXED |
p25 = 0.25 _d 0 |
|
./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 |
43 |
KPP_INIT_FIXED |
_RL p25, p33 |
|
./pkg/kpp/kpp_routines.F |
1154 |
Z121 |
_RL p0 , p25 , p5 , p2 |
|
./pkg/kpp/kpp_routines.F |
1155 |
Z121 |
parameter ( p0 = 0.0, p25 = 0.25, p5 = 0.5, p2 = 2.0 ) |
|
./pkg/kpp/kpp_routines.F |
1244 |
SMOOTH_HORIZ |
_RL p0 , p5 , p25 , p125 , p0625 |
|
./pkg/kpp/kpp_routines.F |
1245 |
SMOOTH_HORIZ |
parameter( p0=0.0, p5=0.5, p25=0.25, p125=0.125, p0625=0.0625 ) |
|
./pkg/kpp/kpp_routines.F |
1254 |
SMOOTH_HORIZ |
& p25 * maskC(i ,j ,k,bi,bj) + |
|
./pkg/kpp/kpp_routines.F |
1263 |
SMOOTH_HORIZ |
IF ( tempVar .GE. p25 ) THEN |
|
./pkg/kpp/kpp_routines.F |
1265 |
SMOOTH_HORIZ |
& p25 * fld(i ,j )*maskC(i ,j ,k,bi,bj) + |
|
./pkg/ctrl/ctrl_smooth.F |
33 |
CTRL_SMOOTH |
_RL p0 , p5 , p25 , p125 , p0625 |
|
./pkg/ctrl/ctrl_smooth.F |
34 |
CTRL_SMOOTH |
parameter( p0=0. _d 0 , p5=0.5 _d 0 , p25=0.25 _d 0 ) |
|
./pkg/ctrl/ctrl_smooth.F |
48 |
CTRL_SMOOTH |
& p25 * mask(i ,j ,k,bi,bj) + |
|
./pkg/ctrl/ctrl_smooth.F |
57 |
CTRL_SMOOTH |
IF ( tempVar .GE. p25 ) THEN |
|
./pkg/ctrl/ctrl_smooth.F |
59 |
CTRL_SMOOTH |
& p25 * fld(i ,j,bi,bj )*mask(i ,j ,k,bi,bj) + |