| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE_PARAMS.h |
479 |
NO PROCEDURE |
_RL SEAICE_emissivity, SEAICE_ice_emiss, SEAICE_snow_emiss |
|
./pkg/seaice/SEAICE_PARAMS.h |
532 |
NO PROCEDURE |
& SEAICE_emissivity, SEAICE_ice_emiss, SEAICE_snow_emiss, |
|
./pkg/seaice/seaice_budget_ocean.F |
125 |
SEAICE_BUDGET_OCEAN |
lwflux(I,J,bi,bj) = - lwdownLoc(I,J)*SEAICE_emissivity |
|
./pkg/seaice/seaice_budget_ocean.F |
78 |
SEAICE_BUDGET_OCEAN |
D3=SEAICE_emissivity*SEAICE_boltzmann |
|
./pkg/seaice/seaice_readparms.F |
1297 |
SEAICE_READPARMS |
IF ( SEAICE_emissivity .LT. 1. _d -04 ) THEN |
|
./pkg/seaice/seaice_readparms.F |
1308 |
SEAICE_READPARMS |
& SEAICE_emissivity, '/5.67e-8.' |
|
./pkg/seaice/seaice_readparms.F |
155 |
SEAICE_READPARMS |
& SEAICE_emissivity, SEAICE_ice_emiss, SEAICE_snow_emiss, |
|
./pkg/seaice/seaice_readparms.F |
409 |
SEAICE_READPARMS |
SEAICE_emissivity = ocean_emissivity |
|
./pkg/seaice/seaice_readparms.F |
422 |
SEAICE_READPARMS |
SEAICE_emissivity = 5.5 _d -08/5.670 _d -08 |
|
./pkg/seaice/seaice_readparms.F |
423 |
SEAICE_READPARMS |
SEAICE_ice_emiss = SEAICE_emissivity |
|
./pkg/seaice/seaice_readparms.F |
424 |
SEAICE_READPARMS |
SEAICE_snow_emiss = SEAICE_emissivity |
|
./pkg/seaice/seaice_summary.F |
561 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL( SEAICE_emissivity, INDEX_NONE, |