| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_albedo.F |
71 |
THSICE_ALBEDO |
albsno = albOldSnow |
|
./pkg/thsice/thsice_albedo.F |
72 |
THSICE_ALBEDO |
& +(albNewSnow-albOldSnow)*exp(-0.2 _d 0*age/86400. _d 0) |
|
./pkg/thsice/THSICE_PARAMS.h |
73 |
NO PROCEDURE |
& albColdSnow, albWarmSnow, albOldSnow, hNewSnowAge, |
|
./pkg/thsice/THSICE_PARAMS.h |
96 |
NO PROCEDURE |
_RL albOldSnow |
|
./pkg/thsice/thsice_readparms.F |
211 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: albOldSnow =',albOldSnow |
|
./pkg/thsice/thsice_readparms.F |
52 |
THSICE_READPARMS |
& albColdSnow, albWarmSnow, albOldSnow, hNewSnowAge, |
|
./pkg/thsice/thsice_readparms.F |
98 |
THSICE_READPARMS |
albOldSnow = 0.55 _d 0 |
|
./pkg/land/LAND_PARAMS.h |
72 |
NO PROCEDURE |
& albColdSnow, albWarmSnow, albOldSnow, hAlbSnow |
|
./pkg/land/LAND_PARAMS.h |
80 |
NO PROCEDURE |
_RL albColdSnow, albWarmSnow, albOldSnow, hAlbSnow |
|
./pkg/land/land_readparms.F |
100 |
LAND_READPARMS |
& albColdSnow, albWarmSnow, albOldSnow, hAlbSnow |
|
./pkg/land/land_readparms.F |
135 |
LAND_READPARMS |
albOldSnow = 0.55 _d 0 |
|
./pkg/land/land_readparms.F |
325 |
LAND_READPARMS |
CALL WRITE_0D_R8(albOldSnow, INDEX_NONE,'albOldSnow =', |
|
./pkg/land/land_albedo.F |
78 |
LAND_ALBEDO |
albSnow = albOldSnow |
|
./pkg/land/land_albedo.F |
79 |
LAND_ALBEDO |
& +(albSnow-albOldSnow)*exp(-0.2 _d 0*ageSnow) |