/[MITgcm]/MITgcm/pkg/seaice/SEAICE.h
ViewVC logotype

Diff of /MITgcm/pkg/seaice/SEAICE.h

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

revision 1.7 by edhill, Thu Oct 9 04:19:20 2003 UTC revision 1.8 by heimbach, Thu Nov 6 22:13:00 2003 UTC
# Line 55  C Line 55  C
55        _RL SEAICE_SALT(1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)        _RL SEAICE_SALT(1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)
56        _RL WATR       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)        _RL WATR       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)
57    
       COMMON/MIX/TMIX,TICE  
58  #ifdef SEAICE_MULTILEVEL  #ifdef SEAICE_MULTILEVEL
59          INTEGER MULTDIM
60          PARAMETER (MULTDIM=7)
61        COMMON/MULTILEVEL/TICES        COMMON/MULTILEVEL/TICES
62          _RL TICES      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,MULTDIM,nSx,nSy)
63  #endif  #endif
64    
65          COMMON/MIX/TMIX,TICE
66        COMMON/GWATXY/GWATX,GWATY        COMMON/GWATXY/GWATX,GWATY
67        COMMON/WIND/WINDX,WINDY        COMMON/WIND/WINDX,WINDY
68        COMMON/RATE/FHEFF,FICE,FO,HCORR        COMMON/RATE/FHEFF,FICE,FO,HCORR
69        COMMON/QFLUX/QNETO,QNETI,QSWO,QSWI        COMMON/QFLUX/QNETO,QNETI,QSWO,QSWI
70        _RL TMIX       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)        _RL TMIX       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)
71        _RL TICE       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)        _RL TICE       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)
 #ifdef SEAICE_MULTILEVEL  
       _RL TICES      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,7,nSx,nSy)  
 #endif  
72        _RL GWATX      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)        _RL GWATX      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)
73        _RL GWATY      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)        _RL GWATY      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)
74        _RL WINDX      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)        _RL WINDX      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22