/[MITgcm]/MITgcm/pkg/dic/DIC_LOAD.h
ViewVC logotype

Diff of /MITgcm/pkg/dic/DIC_LOAD.h

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

revision 1.7 by jmc, Sat Jan 2 22:52:55 2010 UTC revision 1.8 by jmc, Sun Apr 17 21:08:40 2011 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2  C $Name$  C $Name$
3    
4        COMMON /dic_load/  C--   COMMON /DIC_LOAD/
5    C     DIC_ldRec     :: time-record currently loaded (in temp arrays *[1])
6    
7          COMMON /DIC_LOAD_I/ DIC_ldRec
8          COMMON /DIC_LOAD_RS/
9       &    dicwind0, dicwind1, ice0, ice1, atmosp0,       &    dicwind0, dicwind1, ice0, ice1, atmosp0,
10       &    atmosp1, silica0, silica1       &    atmosp1, silica0, silica1
11  #ifdef READ_PAR  #ifdef READ_PAR
# Line 10  C $Name$ Line 14  C $Name$
14  #ifdef ALLOW_FE  #ifdef ALLOW_FE
15       &    ,feinput0,feinput1       &    ,feinput0,feinput1
16  #endif  #endif
17                _RS dicwind0  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  
18                _RS dicwind1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        INTEGER DIC_ldRec(nSx,nSy)
19                _RS ice0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS dicwind0  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
20                _RS ice1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS dicwind1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
21                _RS atmosp0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS ice0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
22                _RS atmosp1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS ice1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
23                _RS silica0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS atmosp0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
24                _RS silica1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS atmosp1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
25          _RS silica0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
26          _RS silica1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
27  #ifdef READ_PAR  #ifdef READ_PAR
28                _RS par0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS par0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
29                _RS par1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS par1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
30  #endif  #endif
31  #ifdef ALLOW_FE  #ifdef ALLOW_FE
32                _RS feinput0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS feinput0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
33                _RS feinput1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS feinput1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
34  #endif  #endif
35    
   
36  CEH3 ;;; Local Variables: ***  CEH3 ;;; Local Variables: ***
37  CEH3 ;;; mode:fortran ***  CEH3 ;;; mode:fortran ***
38  CEH3 ;;; End: ***  CEH3 ;;; End: ***
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22