/[MITgcm]/MITgcm/pkg/aim_v23/com_forcing.h
ViewVC logotype

Diff of /MITgcm/pkg/aim_v23/com_forcing.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.2 by jmc, Tue Dec 10 02:35:27 2002 UTC revision 1.3 by jmc, Thu Mar 11 14:33:19 2004 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2  C $Name$  C $Name$
 C $Namer: $  
3    
4  #ifdef ALLOW_AIM  #ifdef ALLOW_AIM
5    
6  C--   COMMON /LSMASK/ land-sea masks (initial. in INFORC)  C--   COMMON /LSMASK/ land-sea masks (initial. in INFORC)
7  C     fmask1 - fractional land-sea mask  C     fmask1 - fractional land / sea / sea-ice mask
8    C     1:land fraction ; 2:ice-free ocean ; 3:sea-ice frac.; (1)+(2)+(3)=1.
9  c_FM  COMMON /LSMASK/ fmask1, fmask0, fmasko1, fmaskl1  c_FM  COMMON /LSMASK/ fmask1, fmask0, fmasko1, fmaskl1
10        COMMON /LSMASK/ fmask1        COMMON /LSMASK/ fmask1
11        _RL fmask1(NGP,MAX_NO_THREADS)        _RL fmask1(NGP,3,MAX_NO_THREADS)
12  c     _RL fmask0(NGP,MAX_NO_THREADS)  c     _RL fmask0(NGP,MAX_NO_THREADS)
13  c     _RL fmasko1(NGP,MAX_NO_THREADS)  c     _RL fmasko1(NGP,MAX_NO_THREADS)
14  c     _RL fmaskl1(NGP,MAX_NO_THREADS)  c     _RL fmaskl1(NGP,MAX_NO_THREADS)
# Line 33  c    &                soilw12(ix,il,12) Line 33  c    &                soilw12(ix,il,12)
33  C--   COMMON /FORDAY/ Daily forcing fields (updated in FORDATE)  C--   COMMON /FORDAY/ Daily forcing fields (updated in FORDATE)
34  C     sst1   - SST  C     sst1   - SST
35  C     oice1  - sea ice fraction  C     oice1  - sea ice fraction
36  C     stl1   - land-surface temperature  C     sti1   - sea-ice surface temperature [K]
37    C     stl1   - land-surface temperature    [K]
38  C     snow1  - snow depth (mm water)  C     snow1  - snow depth (mm water)
39  C     soilw1 - soil wetness (mm water)  C     soilw1 - soil wetness (mm water)
40  C     alb1   - land-surface albedo  C     alb1   - surface albedo (1:land, 2:ocean, 3:sea-ice, 0:average)
41  c     COMMON /FORDAY/ sst1, oice1, stl1, snow1, soilw1, alb1  c     COMMON /FORDAY/ sst1, oice1, stl1, snow1, soilw1, alb1
42        COMMON /FORDAY/ sst1, stl1, soilw1, alb1        COMMON /FORDAY/ sst1, sti1, stl1, soilw1, alb1
43        _RL sst1   (NGP,MAX_NO_THREADS)        _RL sst1   (NGP,MAX_NO_THREADS)
44  c     _RL oice1  (NGP,MAX_NO_THREADS)  c     _RL oice1  (NGP,MAX_NO_THREADS)
45          _RL sti1   (NGP,MAX_NO_THREADS)
46        _RL stl1   (NGP,MAX_NO_THREADS)        _RL stl1   (NGP,MAX_NO_THREADS)
47  c     _RL snow1  (NGP,MAX_NO_THREADS)  c     _RL snow1  (NGP,MAX_NO_THREADS)
48        _RL soilw1 (NGP,MAX_NO_THREADS)        _RL soilw1 (NGP,MAX_NO_THREADS)
49        _RL alb1   (NGP,MAX_NO_THREADS)        _RL alb1   (NGP,0:3,MAX_NO_THREADS)
50        _RL oice1(NGP), snow1(NGP)        _RL oice1(NGP), snow1(NGP)
51    
52  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22