/[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.1 by stephd, Mon Oct 6 20:11:10 2003 UTC revision 1.7 by jmc, Sat Jan 2 22:52:55 2010 UTC
# Line 1  Line 1 
1  #include "GCHEM_OPTIONS.h"  C $Header$
2    C $Name$
3    
4        COMMON /dic_load/        COMMON /dic_load/
5       &    wspeed0, wspeed1, ice0, ice1, atmosp0,       &    dicwind0, dicwind1, ice0, ice1, atmosp0,
6       &    atmosp1, silica0, silica1       &    atmosp1, silica0, silica1
7    #ifdef READ_PAR
8         &    ,par0, par1
9    #endif
10  #ifdef ALLOW_FE  #ifdef ALLOW_FE
11       &    ,feinput0,feinput1       &    ,feinput0,feinput1
12  #endif  #endif
13             _RS wspeed0  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)                _RS dicwind0  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
14                _RS wspeed1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)                _RS dicwind1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
15                _RS wind  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)                _RS ice0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
16                _RS ice0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)                _RS ice1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
17                _RS ice1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)                _RS atmosp0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
18                _RS atmosp0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)                _RS atmosp1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
19                _RS atmosp1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)                _RS silica0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
20                _RS silica0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)                _RS silica1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
21                _RS silica1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  #ifdef READ_PAR
22                  _RS par0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
23                  _RS par1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
24    #endif
25  #ifdef ALLOW_FE  #ifdef ALLOW_FE
26                _RS feinput0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)                _RS feinput0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
27                _RS feinput1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)                _RS feinput1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
28  #endif  #endif
29    
30    
31    CEH3 ;;; Local Variables: ***
32    CEH3 ;;; mode:fortran ***
33    CEH3 ;;; End: ***
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22