File |
Line number |
Procedure |
Code |
./pkg/kpp/kpp_calc.F |
145 |
KPP_CALC |
_RL p0 , p5 , p25 , p125 , p0625 |
./pkg/kpp/kpp_calc.F |
146 |
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 |
1014 |
Z121 |
_RL p0 , p25 , p5 , p2 |
./pkg/kpp/kpp_routines.F |
1015 |
Z121 |
parameter ( p0 = 0.0, p25 = 0.25, p5 = 0.5, p2 = 2.0 ) |
./pkg/kpp/kpp_routines.F |
1101 |
SMOOTH_HORIZ |
_RL p0 , p5 , p25 , p125 , p0625 |
./pkg/kpp/kpp_routines.F |
1102 |
SMOOTH_HORIZ |
parameter( p0=0.0, p5=0.5, p25=0.25, p125=0.125, p0625=0.0625 ) |
./pkg/kpp/kpp_routines.F |
1111 |
SMOOTH_HORIZ |
& p25 * maskC(i ,j ,k,bi,bj) + |
./pkg/kpp/kpp_routines.F |
1120 |
SMOOTH_HORIZ |
IF ( tempVar .GE. p25 ) THEN |
./pkg/kpp/kpp_routines.F |
1122 |
SMOOTH_HORIZ |
& p25 * fld(i ,j )*maskC(i ,j ,k,bi,bj) + |
./pkg/ctrl/ctrl_smooth.F |
35 |
CTRL_SMOOTH |
_RL p0 , p5 , p25 , p125 , p0625 |
./pkg/ctrl/ctrl_smooth.F |
36 |
CTRL_SMOOTH |
parameter( p0=0.0, p5=0.5, p25=0.25, p125=0.125, p0625=0.0625 ) |
./pkg/ctrl/ctrl_smooth.F |
51 |
CTRL_SMOOTH |
& p25 * mask(i ,j ,k,bi,bj) + |
./pkg/ctrl/ctrl_smooth.F |
60 |
CTRL_SMOOTH |
IF ( tempVar .GE. p25 ) THEN |
./pkg/ctrl/ctrl_smooth.F |
62 |
CTRL_SMOOTH |
& p25 * fld(i ,j,bi,bj )*mask(i ,j ,k,bi,bj) + |