37 |
C snow1 - snow depth (mm water) |
C snow1 - snow depth (mm water) |
38 |
C soilw1 - soil wetness (mm water) |
C soilw1 - soil wetness (mm water) |
39 |
C alb1 - land-surface albedo |
C alb1 - land-surface albedo |
40 |
COMMON /FORDAY/ sst1, oice1, stl1, snow1, soilw1, alb1 |
c COMMON /FORDAY/ sst1, oice1, stl1, snow1, soilw1, alb1 |
41 |
|
COMMON /FORDAY/ sst1, stl1, soilw1, alb1 |
42 |
_RL sst1 (NGP,MAX_NO_THREADS) |
_RL sst1 (NGP,MAX_NO_THREADS) |
43 |
_RL oice1 (NGP,MAX_NO_THREADS) |
c _RL oice1 (NGP,MAX_NO_THREADS) |
44 |
_RL stl1 (NGP,MAX_NO_THREADS) |
_RL stl1 (NGP,MAX_NO_THREADS) |
45 |
_RL snow1 (NGP,MAX_NO_THREADS) |
c _RL snow1 (NGP,MAX_NO_THREADS) |
46 |
_RL soilw1 (NGP,MAX_NO_THREADS) |
_RL soilw1 (NGP,MAX_NO_THREADS) |
47 |
_RL alb1 (NGP,MAX_NO_THREADS) |
_RL alb1 (NGP,MAX_NO_THREADS) |
48 |
|
_RL oice1(NGP), snow1(NGP) |
49 |
|
|
50 |
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
51 |
#endif /* ALLOW_AIM */ |
#endif /* ALLOW_AIM */ |