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_calc.F |
343 |
KPP_CALC |
dbloc(i,j,k) = p0 |
./pkg/kpp/kpp_calc.F |
344 |
KPP_CALC |
ghat(i,j,k) = p0 |
./pkg/kpp/kpp_calc.F |
345 |
KPP_CALC |
Ritop(i,j,k) = p0 |
./pkg/kpp/kpp_calc.F |
457 |
KPP_CALC |
shsq(i,j,k) = p0 |
./pkg/kpp/kpp_forcing_surf.F |
126 |
KPP_FORCING_SURF |
_RL p0 , p5 , p125 |
./pkg/kpp/kpp_forcing_surf.F |
127 |
KPP_FORCING_SURF |
PARAMETER( p0=0.0, p5=0.5, p125=0.125 ) |
./pkg/kpp/kpp_forcing_surf.F |
167 |
KPP_FORCING_SURF |
ustar(i,j) = p0 |
./pkg/kpp/kpp_forcing_surf.F |
168 |
KPP_FORCING_SURF |
bo (I,J) = p0 |
./pkg/kpp/kpp_forcing_surf.F |
169 |
KPP_FORCING_SURF |
bosol(I,J) = p0 |
./pkg/kpp/kpp_forcing_surf.F |
172 |
KPP_FORCING_SURF |
boplume(I,J,k) = p0 |
./pkg/kpp/kpp_forcing_surf.F |
174 |
KPP_FORCING_SURF |
boplume(I,J,Nrp1) = p0 |
./pkg/kpp/kpp_forcing_surf.F |
282 |
KPP_FORCING_SURF |
dVsq(i,j,k) = p0 |
./pkg/kpp/kpp_forcing_surf.F |
315 |
KPP_FORCING_SURF |
zRef(i,j) = p0 |
./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 |
1157 |
Z121 |
KRi_range(Nrp1) = p0 |
./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 |
1361 |
BLMIX |
_RL p0 , eins |
./pkg/kpp/kpp_routines.F |
1362 |
BLMIX |
parameter (p0=0.0, eins=1.0) |
./pkg/kpp/kpp_routines.F |
1446 |
BLMIX |
dat1m(i) = min(dat1m(i),p0) |
./pkg/kpp/kpp_routines.F |
1447 |
BLMIX |
dat1s(i) = min(dat1s(i),p0) |
./pkg/kpp/kpp_routines.F |
1448 |
BLMIX |
dat1t(i) = min(dat1t(i),p0) |
./model/src/gsw_teos10.F |
53 |
NO PROCEDURE |
_RL s1, p0, cp0 |
./model/src/gsw_teos10.F |
65 |
NO PROCEDURE |
p0 = 0. _d 0 |
./pkg/bulk_force/bulkf_formula_lanl.F |
107 |
BULKF_FORMULA_LANL |
_RL p0 ! reference sea-level atmospheric pressure [mb] |
./pkg/bulk_force/bulkf_formula_lanl.F |
121 |
BULKF_FORMULA_LANL |
DATA p0 / 1013. _d 0 / |
./pkg/bulk_force/bulkf_formula_lanl.F |
151 |
BULKF_FORMULA_LANL |
ssq = ssq0*exp( lath*(ssq1-ssq2/Tsf) ) / p0 |
./pkg/cheapaml/CHEAPAML.h |
101 |
NO PROCEDURE |
_RL xphaseinit, gamma_blk, humid_fac, p0 |
./pkg/cheapaml/CHEAPAML.h |
87 |
NO PROCEDURE |
& xphaseinit, gamma_blk, humid_fac, p0, |
./pkg/cheapaml/cheapaml.F |
477 |
CHEAPAML |
pt=p0*(1-gamma_blk*CheapHgrid(i,j,bi,bj)/ts) |
./pkg/cheapaml/cheapaml.F |
482 |
CHEAPAML |
dm=100.*(p0-pt)*recip_gravity |
./pkg/cheapaml/cheapaml_coare3_flux.F |
104 |
CHEAPAML_COARE3_FLUX |
ssqt=ssq0*EXP( lath*(ssq1-ssq2/tta) ) / p0 |
./pkg/cheapaml/cheapaml_coare3_flux.F |
246 |
CHEAPAML_COARE3_FLUX |
& * qs*p0/(p0 -0.378 _d 0*es) |
./pkg/cheapaml/cheapaml_coare3_flux.F |
86 |
CHEAPAML_COARE3_FLUX |
es = (1.0007 _d 0 + 3.46 _d -6*p0)*6.1121 _d 0 |
./pkg/cheapaml/cheapaml_coare3_flux.F |
90 |
CHEAPAML_COARE3_FLUX |
qs = 0.62197 _d 0*es/(p0 -0.378 _d 0*es) |
./pkg/cheapaml/cheapaml_fields_load.F |
492 |
CHEAPAML_FIELDS_LOAD |
ssqa = ssq0*EXP( lath*(ssq1-ssq2/local)) / p0 |
./pkg/cheapaml/cheapaml_init_varia.F |
134 |
CHEAPAML_INIT_VARIA |
ssqa = ssq0*EXP( lath*(ssq1-ssq2/local) ) / p0 |
./pkg/cheapaml/cheapaml_lanl_flux.F |
133 |
CHEAPAML_LANL_FLUX |
pt=p0*(1-gamma_blk*cheaphgrid(i,j,bi,bj)/ttas) |
./pkg/cheapaml/cheapaml_lanl_flux.F |
137 |
CHEAPAML_LANL_FLUX |
ssq= ssq0*exp( lath*(ssq1-ssq2/toa) ) / p0 |
./pkg/cheapaml/cheapaml_readparms.F |
133 |
CHEAPAML_READPARMS |
p0=1000. _d 0 |
./pkg/cheapaml/cheapaml_readparms.F |
40 |
CHEAPAML_READPARMS |
& xphaseinit,gamma_blk,humid_fac,p0, |
./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 ) |