File |
Line number |
Procedure |
Code |
./pkg/bulk_force/BULKF_PARAMS.h |
80 |
NO PROCEDURE |
_RL ocean_emissivity |
./pkg/bulk_force/BULKF_PARAMS.h |
96 |
NO PROCEDURE |
& atm_emissivity, ocean_emissivity, |
./pkg/bulk_force/bulkf_forcing.F |
95 |
BULKF_FORCING |
flwup(i,j,bi,bj)= ocean_emissivity*SLRU(1) |
./pkg/bulk_force/bulkf_formula_aim.F |
101 |
BULKF_FORMULA_AIM |
EQUIVALENCE ( ocean_emissivity , EMISloc ) |
./pkg/bulk_force/bulkf_formula_lanl.F |
206 |
BULKF_FORMULA_LANL |
flwupa=ocean_emissivity*stefan*tsf**4 |
./pkg/bulk_force/bulkf_formula_lanl.F |
207 |
BULKF_FORMULA_LANL |
dflwupdT=4. _d 0*ocean_emissivity*stefan*tsf**3 |
./pkg/bulk_force/bulkf_formula_lay.F |
246 |
BULKF_FORMULA_LAY |
flwupa = ocean_emissivity*stefan*Ts2*Ts2 |
./pkg/bulk_force/bulkf_formula_lay.F |
247 |
BULKF_FORMULA_LAY |
dflwupdT= ocean_emissivity*stefan*Ts2*Tsf*4. _d 0 |
./pkg/bulk_force/bulkf_readparms.F |
102 |
BULKF_READPARMS |
ocean_emissivity= .985 _d 0 |
./pkg/bulk_force/bulkf_readparms.F |
224 |
BULKF_READPARMS |
WRITE(iUnit,*) 'BlkF: ocean_emissivity=',ocean_emissivity |
./pkg/bulk_force/bulkf_readparms.F |
44 |
BULKF_READPARMS |
& atm_emissivity, ocean_emissivity, |
./pkg/exf/EXF_CONSTANTS.h |
158 |
NO PROCEDURE |
_RL ocean_emissivity |
./pkg/exf/EXF_CONSTANTS.h |
187 |
NO PROCEDURE |
& ocean_emissivity, |
./pkg/exf/exf_radiation.F |
75 |
EXF_RADIATION |
& ocean_emissivity*stefanBoltzmann*TsfSq*TsfSq |
./pkg/exf/exf_radiation.F |
83 |
EXF_RADIATION |
& ocean_emissivity*stefanBoltzmann* |
./pkg/exf/exf_readparms.F |
280 |
EXF_READPARMS |
ocean_emissivity = 5.50 _d-8 / 5.670 _d-8 |
./pkg/exf/exf_readparms.F |
72 |
EXF_READPARMS |
& ocean_emissivity, ice_emissivity, snow_emissivity, |
./pkg/exf/exf_summary.F |
187 |
EXF_SUMMARY |
CALL WRITE_0D_RL( ocean_emissivity, INDEX_NONE, |