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

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

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

revision 1.1.2.2 by dimitri, Fri Feb 14 22:30:15 2003 UTC revision 1.8 by jmc, Sun Jan 3 00:27:36 2010 UTC
# Line 1  Line 1 
1  C  C $Header$
2    C $Name$
 #ifdef ALLOW_SEAICE  
3    
4  C     /==========================================================\  C     /==========================================================\
5  C     | SEAICE_DIAGS.h                                           |  C     | SEAICE_DIAGS.h                                           |
# Line 14  C     Keep track of time Line 13  C     Keep track of time
13        COMMON /SEAICE_TAVE/ SEAICE_TimeAve        COMMON /SEAICE_TAVE/ SEAICE_TimeAve
14    
15  C     Storage arrays for time-averages  C     Storage arrays for time-averages
16        _RL FUtave    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)        _RL FUtave    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
17        _RL FVtave    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)        _RL FVtave    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
18        _RL EmPmRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)        _RL EmPmRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
19        _RL QNETtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)        _RL QNETtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
20        _RL QSWtave   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)        _RL QSWtave   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
21        _RL UICEtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)        _RL UICEtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
22        _RL VICEtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)        _RL VICEtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
23        _RL HEFFtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)        _RL HEFFtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
24        _RL AREAtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)        _RL AREAtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
25        COMMON /SEAICE_TAVE_DIAGS/        COMMON /SEAICE_TAVE_DIAGS/
26       &        FUtave, FVtave, EmPmRtave, QNETtave, QSWtave,       &        FUtave, FVtave, EmPmRtave, QNETtave, QSWtave,
27       &        UICEtave, VICEtave, HEFFtave, AREAtave       &        UICEtave, VICEtave, HEFFtave, AREAtave
28    
29  #endif /* ALLOW_TIMEAVE */  #endif /* ALLOW_TIMEAVE */
30    
31  #endif /* ALLOW_SEAICE */  CEH3 ;;; Local Variables: ***
32    CEH3 ;;; mode:fortran ***
33    CEH3 ;;; End: ***
Legend:
Removed from v.1.1.2.2  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22